如何解决如何在R中编辑时间序列ggplot的格式
我想编辑在R中一起输出的上述绘图的格式。我正在尝试:
- 使它们对齐,因为它们的日期相同,所以它们彼此直接位于下面;
- 更改日期格式,因为它们太在一起了,例如至2014、01、02等。
- 将图例的标题更改为“旅行者种类”。
with tables_cte(Categorgy,Amount) as (
select Categorgy,Amount from Auxiliary
union all
select Categorgy,Amount from BulkContribution
union all
select Categorgy,Amount from Expenditure)
select Categorgy,sum(Amount) Amount
from tables_cte
group by Categorgy
order by 1;
dat1 <- dat
dat1$Date <- format(dat1$Date,"%Y/%m")
plot_dat <- dat1 %>%
group_by(Date) %>%
summarise(Sharksucker_Remora = sum(Sharksucker_Remora),Golden_Trevally = sum(Golden_Trevally),Red_Snapper = sum(Red_Snapper),Juvenile_Remora = sum(Juvenile_Remora)) %>%
melt("Date") %>%
filter(Date > '2014-01-01') %>%
arrange(Date)
new_data <- dat1 %>%
group_by(Date) %>%
summarise(n = n(),Sharksucker_Remora = sum(Sharksucker_Remora),Juvenile_Remora = sum(Juvenile_Remora),Red_Snapper = sum(Red_Snapper)) %>%
mutate(Sharksucker_Remora = Sharksucker_Remora / n,Juvenile_Remora = Juvenile_Remora / n,Golden_Trevally = Golden_Trevally / n,Red_Snapper = Red_Snapper / n) %>%
melt(c("Date","n")) %>%
filter(Date > '2014-01-01') %>%
arrange(Date)
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。