[英]Time-Series Data
我正在嘗試繪制每小時在R中記錄的時間序列數據。我想用我的x軸間隔每月繪制隨時間的溫度。 目前正在針對日志編號(61、62等)繪制Temp,並且在將x軸切換為月份時遇到麻煩。
`library(readr)
Apex_Log_Data <- read_csv("Aquaria/Apex Log Data.csv")
colnames(Apex_Log_Data)[16] <- "Salx2"
Apex_Log_Data[25] <- NULL
par(mfrow=c(2,1))
par(mar=c(4,2,1,1))
apex <- subset(Apex_Log_Data, Date!="NA")
plot(apex$Tmp, type = "l", ylim = c(25.5, 27.5), xlab = NA, ylab = NA)
使用lubridate
嘗試此解決方案以lubridate
日期處理,使用ggplot()
進行非常靈活的繪圖:
# example data
apex <- data.frame(ID = 60:64,
Date = c("9/1/18", "9/2/18", "10/1/18", "10/3/18", "11/2/18"),
Time = c("10:00:00", "11:00:00", "12:00:00", "1:00:00", "2:00:00"),
Tmp = c(27, 26.9, 26.9, 26.8, 26.8))
library(ggplot2)
library(lubridate)
ggplot(apex) +
geom_line(aes(x = mdy(Date), y = Tmp)) +
ylim(c(25.5, 27.5)) +
labs(x = "", y = "")
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.