我正在尝试使用 R Shiny 开发仪表板,它从 MySQL 数据库中提取数据并以图形形式表示。我需要使用多个数据创建一个时间序列。但是当 MySQL 中的时间戳值无法转换为时间序列中的日期时间值时,就会出现问题。以下是我的server.R
代码:
con <- dbConnect(MySQL(),user="root",password="891208",host="localhost",dbname="openPos")
shinyServer(function(input, output) {
query1 <- reactive({ "SELECT sale_time,sum(quantity_purchased * item_unit_price)
AS revenue, sum(quantity_purchased * item_cost_price) AS cost,
sum(quantity_purchased * item_unit_price)-sum(quantity_purchased * item_cost_price) as profit
FROM ospos_sales, ospos_sales_items
WHERE ospos_sales.sale_id = ospos_sales_items.sale_id
GROUP BY sale_time"})
result1 <- reactive({dbGetQuery(con,query1())})
z <- reactive({ts(result1())})
output$ts <- renderPlot({p<-ts.plot(z())
print(p)})
output$table <-renderTable({z()})
表的输出将如下所示
谁能告诉我为什么我不能用这些数据库值创建一个时间序列?