Я создал этот график, но я хочу объединить Time
и Date
вместе по оси X.(обратите внимание, что в моем наборе данных Time
и Date
находятся в отдельных столбцах):
Код:
library(shiny)
library(shinydashboard)
library(ggplot2)
library(scales)
shinyServer(function(input,output){
output$Histogram <- renderPlot({
Energy <- read.csv("Energy.csv")
Energy$Date <- as.POSIXct(Energy$Date)
ggplot(data=Energy, mapping=aes(x=Date, Time, y=kWh)) +
scale_x_datetime(date_breaks= "1 month") +
geom_point(aes(color=Time)) +
theme(axis.text.x = element_text(angle = 25, vjust = 1.0, hjust = 1.0))
})
Что я могу сделатьсделать «Время» и «Дата» по оси X вместе?