闪亮的dateRangeInput - 从用户输入中提取月份和年份

Question

我想知道是否可以在用户输入后从dateRangeInput中将月份和年份提取到单独的变量中。

ui.R

shinyUI(fluidPage(
    titlePanel("Time Series forecasting with arima+stl"),
    sidebarLayout(
    sidebarPanel(
    dateRangeInput('dateRange',
                 label = paste('Date range selection'),
                 start = "2010-01-01",
                 end   = "2012-12-31", 
                 min = "2010-01-01",
                 max = "2012-12-31",
                 separator = " - ", 
                 weekstart = 1
   ),
   actionButton("Go", "Go!")
),

)
))

server.R

shinyServer(

    function(input, output, session){

       forecast <- eventReactive(input$Go, {

          })

})

到目前为止，根据我对此主题的阅读，我只知道如何从用户输入中提取整个日期。在上面的代码中有一种方法让我使用一个变量，它包含从server.ui中的dateRangeInput获得的开始和结束月份？任何帮助表示赞赏。