时间戳

首页 > 解决方案 > 如何在一年中的几个月的 y 轴上生成多条线的媒体图

r - 如何在一年中的几个月的 y 轴上生成多条线的媒体图

问题描述

我想知道如何为一年中的月份生成多条 Y 线图。从 2000 年到 2002 年，我有一个数据框，其中包含 3 年以上的 3 个温度监测站。

我想计算 X 轴和 Y 轴上的月平均温度来放置三个站点。

这个怎么做？

按照这个例子 在此处输入图像描述

我的数据框

  sample_station <-c('A','A','A','A','A','A','A','A','A','A','A','B','B','B','B','B','B','B','B','B','B','C','C','C','C','C','C','C','C','C','C')
Date <-c('01/01/2000','08/08/2000','16/03/2001','22/09/2001','01/06/2002','05/01/2002','26/01/2002','16/02/2002','09/03/2002','30/03/2002','20/04/2002','04/01/2000','11/08/2000','19/03/2001','25/09/2001','04/06/2002','08/01/2002','29/01/2002','19/02/2002','12/03/2002','13/09/2001','08/01/2000','15/08/2000','23/03/2001','29/09/2001','08/06/2002','12/01/2002','02/02/2002','23/02/2002','16/03/2002','06/04/2002')
Temp <-c(17,20,24,19,17,19,23,26,19,19,21,15,23,18,22,22,23,18,19,26,21,22,23,27,19,19,21,23,24,25,26)

df<-data.frame(sample_station,Date,Temp)

标签： rggplot2

解决方案

你可以试试 ：

library(dplyr)
library(ggplot2)

df %>%
  mutate(Date = lubridate::dmy(Date)) %>%
  ggplot() + aes(Date, Temp, color = sample_station) + 
  geom_line() + 
  scale_x_date(breaks = '6 months', date_labels = '%b %Y')

推荐阅读