R：Shiny： `textInput`によって作成されたテキスト入力コントロールの幅を増やす

StackOverflow https://stackoverflow.com//questions/21043945

  •  21-12-2019
  •  | 
  •  
役に立ちましたか？

解決

あなたのtextInputが次のようになっている場合：

textInput(inputId="someid", label="somelable", value = 0.0)
tags$head(tags$style(type="text/css", "#someid {width: 150px}")),
.

いくつかのCSSを追加できます。

または

tags$head(
    tags$link(rel = 'stylesheet', type = 'text/css', href = 'styles.css'),
)
.

とstyles.css

に適切なエントリを追加する

他のヒント

私はこのようなもののためのcustom.cssファイルを作成しました。

custom.cssファイルをApp Homeディレクトリのwwwディレクトリに入れます。

custom.cssファイルにこの行を追加して、すべての選択された入力をコンテナの全幅に合わせます。 

.shiny-input-container:not(.shiny-input-container-inline) {
  width: 100%;
}
.

これは、長い名前のオプション、または多くのオプションを持つテキスト入力またはドロップダウンに非常に役立ちます。それはまたアプリをより完全に見せるだけです。私はページの上部に私のすべてのフィルタを入れて、入力を強制的にコンテナーを埋めることができないのであれば、たくさんの空白があります。

その後、入力コンテナを含む列の幅を設定することで、UI.Rファイルで入力サイズを簡単に制御できます。このようなもの... 

fluidRow(
  column(4, offset = 0, align = 'center', uiOutput(ns("select_category_type"))),
  column(4, offset = 0, align = 'center', uiOutput(ns("select_category_group"))),
  column(4, offset = 0, align = 'center', uiOutput(ns("select_category")))
),
fluidRow(
  column(6, offset = 3, align = 'center', uiOutput(ns("select_year")))
)
.

`` `` `` `

ui.rファイルにcustom.cssファイルを読み込む必要もあります。これは、光沢のあるダッシュボードを使用する場合、または標準UIを使用している場合はdashboardBody関数でこれを実行できます。 

dashboardBody(
  includeCSS("www/custom.css"),
  tabItems(...
.

ライセンス： CC-BY-SA と 帰属
所属していません StackOverflow
scroll top