我想創建一個shiny應用程式，它采用資料集名稱并生成一個scatterplot，其中x軸是資料集中的第一列，y軸是資料集中的第二列。
到目前為止，我已經嘗試過這個：
library(shiny)
library(ggplot2)
ui = fluidPage(
textInput("dataset", "Please enter dataset name"),
plotOutput("plot")
)
server = function(input, output, session) {
output$plot = renderPlot({
req(input$dataset)
data = get(input$dataset, "package:datasets")
ggplot(data, aes(names(data)[1], names(data)[2])) geom_point()
})
}
shinyApp(ui, server)
但是，它并沒有完成這項作業。例如，當我輸入資料集名稱時iris，我得到以下資訊：
uj5u.com熱心網友回復：
該aes部分可
library(shiny)
library(ggplot2)
ui = fluidPage(
textInput("dataset", "Please enter dataset name"),
plotOutput("plot")
)
server = function(input, output, session) {
output$plot = renderPlot({
req(input$dataset)
data = get(input$dataset, "package:datasets")
ggplot(data, aes(.data[[names(data)[1]]], .data[[names(data)[2]]])) geom_point()
})
}
shinyApp(ui, server)
-輸出
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/315856.html