R Shiny DateRangeInput 帮助选择日期答案

【问题标题】：R Shiny DateRangeInput help to select datesR Shiny DateRangeInput 帮助选择日期
【发布时间】：2018-12-10 15:32:42
【问题描述】：

library(shiny)
ui <- fluidPage(dateRangeInput(inputId = "turkat$time",format = "yyyy-mm- 
dd",min=min(turkat$time),max = max(turkat$time),start="1990-01- 
01",separator="-" ),
            headerPanel("Earthquake"),

            mainPanel(plotOutput("map"))

)

server <- function(input, output) {
 turkat <-  reactive({
 turkat[,turkat$time]
 })
 output$map<-renderPlot({ par(mar=c(5.1, 4.1, 3.1, 2.1))

    plot(turkiye, axes=TRUE,ylim=c(38,42),xlim=c(26,42))
    points(turkat$longitude,turkat$latitude,pch=15,cex="0.5",col="green")

     })
   }

    shinyApp(ui = ui, server = server)

我想用 R 闪亮绘制用户选择日期之间的地震地图。我是新手，一直在犯这个错误。我还想使用 cex 参数根据大小绘制它。我该怎么做？

标签错误 %AND% tags$label(class= "control-label", for = controlName, : 参数“label”缺失，没有默认值

提前致谢

【问题讨论】：

您初始化dateRangeInput 并在服务器中调用它的方式不正确。请花一些时间查看此处列出的示例shiny.rstudio.com/reference/shiny/0.14/dateRangeInput.html
谢谢查博。我现在明白了。但是我无法正确加载我的数据并收到此错误。 "未定义的列选择"

标签： r shiny

【解决方案1】：

试试这个：

library(shiny)
ui <- fluidPage(
  dateRangeInput("turkat_time",format = "yyyy-mm-dd",min=min(turkat$time),max = max(turkat$time),start="1990-01-01",separator="-" ),
  headerPanel("Earthquake"),
  mainPanel(plotOutput("map"))
)

server <- function(input, output) {

  myturkat <- reactive({
    turkat[,input$turkat_time]
  })

  output$map <- renderPlot({ 
    req(myturkat())

    par(mar=c(5.1, 4.1, 3.1, 2.1))
    plot(myturkat(), axes=TRUE,ylim=c(38,42),xlim=c(26,42))
    points(myturkat()$longitude,myturkat()$latitude,pch=15,cex="0.5",col="green")
  })

}

shinyApp(ui = ui, server = server)

【讨论】：

提供所有相关数据
没有必要。感谢两位朋友，我设法找到了解决方案。
首先这是一个子集选择问题。那么dateRangeInput的使用也有问题。 myturkat <- reactive({turkat[turkat$time>=input$time[1] & turkat$time<=input$time[2],] }) 这解决了我的问题。