2016-05-11 11 views
2

私は手動で入力した値のドロップダウンがある光沢のあるアプリを持っています。しかし、ドロップダウンに値を設定する必要があるため、ユーザーがテキストボックスに単語を入力させ、アプリケーションが一致する要素(ブラウザのようなもの)のみを表示できるようにするとよいでしょう。現在、私はコードを使用しています:光沢のあるアプリでテキストを入力しているときに検索結果を取得する

lapply(1:num, function(i) { 
    selectInput(paste0("n_input_", i), label = paste0("n_input", i), 
       choices = list("IN120" = 1, "CR23" = 2, "FG45" = 3,"OR45"=4), 
       selected = 1) 
}) 

私たちはこれを光沢のあるものにすることはできますか?そうでない場合は、CSVファイルから値を読み取り、ドロップダウンに値を設定するにはどうすればよいですか?これは、.csvファイルを読み込み、目的のリスト内で一意の値のリストを作成する必要があります

myData <- read.csv("my_csv_file_path.csv", row.names=NULL, na.strings="", stringsAsFactors=FALSE) 

myList <- as.list(unique(myData[[1]])) ## The number should be the column/field in myData that has the desired list. 

lapply(1:num, function(i) { 
    selectInput(paste0("n_input_", i), label = paste0("n_input", i), 
       choices = myList) 
}) 

:あなたの2番目の質問の試みに答えるために

+0

このリンクのいくつかのアイデアhttps://groups.google.com/forum/#!topic/shiny-discuss/09UoBQEoCv8「shinysky」からの「先読みテキスト入力」の使用を含め、直接 'javascript library 'という名前の' select2'(リンクのサンプルコード) –

+0

私は同じことをお勧めします。 https://stackoverflow.com/questions/35265920/auto-complete-and-selection-of-multiple-values-in-text-box-shinyとhttps://github.com/AnalytixWare/ShinySkyを見てください。それでも最後のセクションで助けが必要な場合は、[CSVファイルを読み込み、選択項目を読み込む、それは 'updateSelectInput'関数を使って行われます]、私に教えてください。 – IndranilGayen

+0

あなたはui内でselectizeinputを使用し、updateselectizeInputを使用してサーバー側ですべてのオプションを設定することができます – vikash

答えて

1

選択肢= myListを使用してスクリプトを編集し、= 1部分を削除しました。これが省略された場合、ドロップダウンはリストの最初の項目にデフォルト設定されます。 1つの手法は、ユーザがドロップダウンから何かを選択するまで、リストの先頭に初期値(例えば、「何かを選択」)を表示することである。

乾杯!

関連する問題