[問題] shiny相關問題

看板R_Language作者s86116 (hsiuy)時間9年前 (2015/07/16 02:03)推噓0(0推 0噓 1→)

留言1則, 1人參與討論串1/2 (看更多)

[問題類型]: 我想用R 都shiny寫一個上傳檔案的app，但是我不知道要怎麼用R 寫出來。 [軟體熟悉度]: R基本的語法可以但shiny套件太新，所以很生疏。 [問題敘述]: 我想用R 都shiny寫一個上傳檔案的app，但是我不知道要怎麼用R 寫出來。已經把shiny. rstudio.com中gallery提供的程式複製到rstudio了，但還是跑不出來。麻煩各位幫幫忙了！ [程式範例]: library(shiny) ui<-fluidPage() server<-function(input,output){} shinyApp(ui=ui,server=server) 以上的程式是沒有問題的視窗也有跑出來但下面的程式就卡住了 library(shiny) shinyUI(fluidPage( titlePanel("Uploading Files"), sidebarLayout( sidebarPanel( fileInput('file1', 'Choose CSV File', accept=c('text/csv', 'text/comma-separated-values,text/plain', '.csv')), tags$hr(), checkboxInput('header', 'Header', TRUE), radioButtons('sep', 'Separator', c(Comma=',', Semicolon=';', Tab='\t'), ','), radioButtons('quote', 'Quote', c(None='', 'Double Quote'='"', 'Single Quote'="'"), '"') ), mainPanel( tableOutput('contents') ) ) )) library(shiny) shinyServer(function(input, output) { output$contents <- renderTable({ # input$file1 will be NULL initially. After the user selects # and uploads a file, it will be a data frame with 'name', # 'size', 'type', and 'datapath' columns. The 'datapath' # column will contain the local filenames where the data can # be found. inFile <- input$file1 if (is.null(inFile)) return(NULL) read.csv(inFile$datapath, header=input$header, sep=input$sep, quote=input$quote) }) }) [環境敘述]: 我是用rstudio跑的 [關鍵字]: 選擇性，也許未來有用因為我平常不用ptt，這是我朋友的帳號，方便的話可以用line聯絡我，我的ID是jingchi ，問題解決了會很有誠意的請你吃個飯，真的拜託大家了！ -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 27.245.45.28 ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1436983415.A.1C4.html ※ 編輯: s86116 (27.245.45.28), 07/16/2015 02:05:51