反应式SQl查询中的dateRangeInput-日期输出格式错误
有人遇到过反应式SQl查询中的dateRangeInput-日期输出格式错误,sql,r,Sql,R,有人遇到过dateRangeInput的问题吗?我想用它来过滤我的数据,但是dateRangeInput的输出错误为2016-02-21,我需要它为2016年2月21日。我以为格式=dd.mm.yyyy会解决这个问题,但是我没有得到任何改变 我的代码: library(ROracle) library(shiny) library(DT) server <- shinyServer( function(input, output, session) { con <-
dateRangeInput的问题吗?
我想用它来过滤我的数据,但是dateRangeInput的输出错误为2016-02-21,我需要它为2016年2月21日。我以为格式=dd.mm.yyyy
会解决这个问题,但是我没有得到任何改变
我的代码:
library(ROracle)
library(shiny)
library(DT)
server <- shinyServer(
function(input, output, session) {
con <- dbConnect(dbDriver("Oracle"),"xx/K",username="user",password="pwd")
tableList <- dbListTables(con,schema="K")
updateSelectizeInput(session, "tabnames", server = TRUE, choices = tableList)
output$date_ui=renderUI({
dateRangeInput('date',
label = 'Datum: dd.mm.yyyy',
start = Sys.Date()-1, end = Sys.Date()+1,
separator = " bis ",
format = 'dd.mm.yyyy',language = "de")
})
sqlOutput <- reactive({
sqlInput <- paste("select rownum * from K.",input$tabnames, "where dati_create between to_date('",format(input$date[1]),"','dd.mm.yyyy') and to_date('",input$date[2],"','dd.mm.yyyy')")
print(sqlInput) # I have printed it to see the format of the date
dbGetQuery(con$cc, sqlInput, stringsAsFactors = T)
})
output$table <- DT::renderDataTable(sqlOutput(), server=TRUE, rownames=TRUE, filter="top", options=list(pageLength=10))
session$onSessionEnded(function() { dbDisconnect(con) })
})
ui_panel <-
tabPanel("Test",
sidebarLayout(
sidebarPanel(
),
mainPanel(
selectizeInput("tabnames",label = "server side", choices = NULL),
uiOutput("date_ui"),
tableOutput("out"),
tableOutput("table")
)
)
)
ui <- shinyUI(navbarPage("Test",ui_panel))
runApp(list(ui=ui,server=server))
有人知道如何在dateRangeInput
中更改日期格式吗
谢谢你的帮助 您能否向我们展示您打算单独执行的原始SQL查询
21.02.2016
听起来不像我在SQL中常见的任何日期格式。请尝试格式(输入$date[1],“%d.%m.%Y”)
即R端的格式。嘿!SQL查询(有效):sqlInput谢谢danas.zuokas,您的答案非常有效!
[1] "select rownum * from K.xy where dati_create between to_date(' 2016-02-21 ','dd.mm.yyyy') and to_date(' 2016-02-23 ','dd.mm.yyyy')"
Error in .oci.GetQuery(conn, statement, data = data, prefetch = prefetch, :
ORA-01861: literal does not match format string