У меня огромная база данных, из которой я извлек только три дня, чтобы исследовать температуру каждый час в день. Данные выглядят так:
head(agosto123)
X date Hour temp HR place placeconse datetime
1 2266 0001-08-15 00:00:00 27.801 82.797 fundo 8905 0001-08-15 00:00:00
2 2269 0001-08-15 01:00:00 27.949 83.745 fundo 8906 0001-08-15 01:00:00
3 2302 0001-08-15 02:00:00 28.196 84.343 fundo 8907 0001-08-15 02:00:00
4 2317 0001-08-15 03:00:00 28.345 84.375 fundo 8908 0001-08-15 03:00:00
5 2320 0001-08-15 04:00:00 28.444 84.740 fundo 8909 0001-08-15 04:00:00
6 2323 0001-08-15 05:00:00 28.518 84.699 fundo 8910 0001-08-15 05:00:00
.... плюс другие 90 наблюдений
Я попробовал следующий вариант:
agosto123$datetime<-as.POSIXct(agosto123$datetime, format="%d-%m-%Y %H:%M:%S")
tempagosto123<-ggplot(agosto123,
aes(aes(datetime, temp)))+
geom_point(colour= "blue")+
geom_line(aes(colour = "red"))
temapgosto123
Появляется следующая ошибка:
Не знаю, как автоматически выбирать масштаб для объекта типа «Неравен.». По умолчанию - непрерывный. Ошибка: эстетика должна быть либо длиной 1, либо такой же, как данные (96): x
Затем я попробовал второй вариант:
tempagosto123<-ggplot(agosto123,
aes(aes(datetime, temp)))+
geom_point(colour= "blue")+
geom_line(aes(colour = "red"))+
scale_x_datetime(breaks = date_breaks("60 min"))
tempagosto123
И появляется следующая ошибка: Ошибка : Эстетика должна быть либо длиной 1, либо такой же, как данные (96): x
Подскажите, пожалуйста, что я делаю не так? Заранее благодарим за вашу помощь!
График, который я получаю, когда удаляю один aes в этом коде:
tempagosto123<-ggplot(agosto123(aes(datetime, temp))+ geom_point(colour= "blue")+ geom_line(aes(colour = "red"))+ scale_x_datetime(breaks = date_breaks("60 min")) tempagosto123
введите описание изображения здесь
Данные за каждый час складываются за день, и это неверно. Спасибо за вашу помощь!