我试图在闪亮的情况下相互绘制两个数据框架变量(我是新手,仍然试图找出反应性)。这个想法是用户可以从下拉列表中选择任意两个变量,R将绘制它们。首先,我不能完全确定我是否可以按照我的方式去做。其次,我收到了一个错误:
警告:as.double中出错:无法将类型'closure'强制类型为'double'类型的向量
堆栈跟踪(最里面的第一个): 82:xy.coords 81:plot.default 80:情节 79:renderPlot [app / Plotapp2.R#39] 71:输出$ plot 4: 3:do.call 2:print.shiny.appobj 1:打印
这是代码。任何帮助将非常感激。谢谢!
library(shiny)
All.choice = c ("Sepal.Length", "Sepal.Width","Petal.Length", "Petal.Width", "Species")
ui <- pageWithSidebar(
headerPanel("Plot 2 variables"),
sidebarPanel(
selectInput(inputId = "x",
label = "Choose the x axis",
All.choice),
selectInput(inputId = "y",
label = "Choose the y axis",
All.choice)
),
mainPanel(
plotOutput("plot")
)
)
server <- function(input, output) {
x11 = reactive({
x1 = input$x
iris$x1
})
y11 = reactive({
y1 = input$y
iris$y1
})
output$plot = renderPlot({
plot(x11,y11)
})
}
shinyApp(ui = ui, server = server)
更新:我将最后一行更改为
plot(x11(),y11())
并将错误消息更改为:需要有限的'xlim'值
答案 0 :(得分:0)
使用iris[[x1]]
和iris[[y1]]
代替iris$x1
和iris$y1