请原谅我的问题,因为我正在学习r和闪亮。 我正在研究具有超过45k行的Walmart数据集。我想要做的是在R中使用闪亮我想要在特定日期之间绘制折线图。例如,在我的数据集中,我在每周销售额的列中有每周销售数字。我可以使用下面的代码绘制2010年到2013年的折线图,但该图表过于拥挤。我的代码如下:
# ui.R
library(shiny)
library(plotly)
shinyUI(fluidPage(
titlePanel("Store Data"),
sidebarLayout(sidebarPanel(
selectInput("state",
"State Name",
choices = c(unique(
as.character(myData$state)
))),
selectInput("deptname",
"Department Name",
choices = c(unique(
as.character(myData$deptname)
))),
dateRangeInput("dates",
"Select Dates",
start = "2010-01-01", end = "2013-12-31"),
radioButtons("plotType", "Plot type",
c("Scatter"="p", "Line"="l")
)
),
mainPanel(plotOutput("statelinePlot")))
))
我的服务器文件如下:
#server.R
shinyServer(function(input, output) {
output$statelinePlot <- renderPlot({
plot(
myData$store,
myData$dept,
type = input$plotType
#input$dates[1], input$dates[2]
)
})
})
我对如何从用户获取日期范围并使图表互动感到困惑。
在这方面的任何帮助将受到高度赞赏。
此致