执行 R 代码"Cannot coerce type 'environment' to vector of type 'character'"时出错

Question

require(shiny)
setwd("C://Users//Harshad//Desktop//Equiskill - BA")
cars <- read.table(file = "cars.csv", sep = ",", header = TRUE, quote="")
var_list <- as.character(names(cars))

ui <- fluidPage
(
  selectInput(inputId = "var",label = "Select Dependent Variable:",choices =    c(var_list))
)
server <- function(input,output)
{
}
shinyApp(ui <- ui, server <- server)

我在 R studio 中执行上述闪亮的应用程序代码时收到错误"错误：无法将类型'环境'强制为类型'字符'的向量"。请帮我解决问题。

Answer 1

您应该避免在函数名称后放置newlines甚至spaces。请参阅风格指南或此处。下面的代码工作得很好。

require(shiny)
# load your data I am using default mtcars data here
cars <- mtcars
var_list <- as.character(names(cars))
ui <- fluidPage(
        selectInput(inputId = "var",label = "Select Dependent Variable:", choices = c(var_list))
    )
server <- function(input,output)
{
}
shinyApp(ui = ui, server = server)