如何解决在ggplot中删除数据之间的线,分组和平滑
这里是问题: 我必须绘制时间序列(非连续数据的9年)。在我使用的数据框中,有一个 NA。的行,它分隔每年年。我的目的是用平滑线绘制该系列。 当我绘制时间序列时,使用平滑代码:
df$Date <- as.Date(df$Date,"%Y/%m/%d")
ggplot(df,aes(x = Date,y = antSO4 )) +
geom_line(color="gray40")+
scale_y_continuous(expand = c(0,0),limits = c(0,3000)) +
scale_x_date(breaks="year",labels=date_format("%Y")) +
geom_smooth(aes(x= Date,y=antSO4),method = lm,formula = y ~ splines::bs(x,3),se = FALSE,colour = 'red')
我得到这个:
如您所见,有一些线连接了两个不同的年度系列,但不是全部。为了消除这个问题,我将数据集按年份进行分组,
ggplot(df,group = year(Date),y = antSO4))
这是我获得的情节。
分组数据消除了连接,但同时正确地,平滑度是每年计算的,而不是在完整数据集中。 我在使用R方面还很陌生,因此我在之前的文章中进行了搜索,但是我发现许多问题与N.A.分隔行的存在有关,通常,每个系列之间都有这种联系。 预先感谢您的任何帮助!
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。