![](/img/trans.png)
[英]Use annotate(“rect”) for one facet in ggplot when plotting time series on x-axis
[英]ggplot time series: Plotting a full month on the x-axis
Ola,我有一個關於 ggplot 的問題。
在這段代碼中,我有 31 天,每天有大約 200次測量時間和降水總和。
延遲以秒為單位,Precip 以毫米為單位(乘以 100,用於繪圖測量)。
下面的代碼只是為了讓您可以很好地了解這一點。
我目前正在努力將其形成一個 ggplot 圖。
X ARRIVAL DELAY PRECIP DATDEP
1 08:12 -10 0 01AUG2019
2 11:22 120 19.2222 01AUG2019
3 09:22 22 0.4444 01AUG2019
4 21:22 0 33.2222 01AUG2019
5 08:22 2 744.4444 02AUG2019
etc. etc.
我如何設法將本月繪制成有 2 條線的圖(一條用於 DELAY,另一條用於 PRECIP)? 我無法將 DATDEP 轉換為 x 軸上的一個很好的時間框架。
Q2:也比如4個月? 您將如何設法在 x 軸上形成一個很好的時間框架。
為您的日期使用包 lubridate。 並使您的數據變長。 這里有很多關於這個主題的主題。
library(tidyverse)
library(lubridate)
#devtools::install_github('alistaire47/read.so')
mydf <- read.so::read.so(' X ARRIVAL DELAY PRECIP DATDEP
1 08:12 -10 0 01AUG2019
2 11:22 120 19.2222 01AUG2019
3 09:22 22 0.4444 01AUG2019
4 21:22 0 33.2222 01AUG2019
5 08:22 2 744.4444 02AUG2019')
mydf <- mydf %>% pivot_longer(names_to = 'key', values_to = 'value', cols = DELAY:PRECIP)
ggplot(mydf, aes(dmy(DATDEP), value)) + geom_line(aes(color = key))
由reprex 包(v0.3.0) 於 2020 年 3 月 20 日創建
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.