私は私のUIのドロップダウンメニューを持っているシャイニー

Question

のベクトルとしてローカルのCSVファイルの内容を保存します約100の異なるオプションを含むベクトル。これらのオプションは.csvファイルに保存されていますが、ベクトルとして保存するために.csvファイル（私のディレクトリにアップロードしたファイル）のデータを取得することはできません。ローカルの.csvファイルからのデータをメニューオプションとして使用するためにR shinyに保存するにはどうすればよいですか？私は他の機能の中でread.csvを試してきましたが、これまでのところ運がありません。

手動ですべてを手動でコピーする必要はありますか？私は簡単な方法があると思います。

Answer 1

Example data 
write.table(rownames(mtcars), "mtcars.csv", 
      row.names = FALSE, col.names = FALSE, quote = FALSE) 

library(shiny) 

# User interface that lets you to select input 
ui <- fluidPage(
    selectInput("mySelection", "Select input", "") 
) 

server <- function(input, output, session) { 
    observe({ 
     # Load your csv file 
     x <- read.csv("mtcars.csv", header = FALSE) 

     # Update selection mySelection (passed to UI)  
     updateSelectInput(session, "mySelection", 
      label = "Select input", 
      choices = x[, 1], 
      selected = x[, 1][1] 
     ) 
    }) 
} 

shinyApp(ui, server)