数据集如下所示:
CarType SaleYear TotalNoSales
Ferrari 1991 1343
Ford 1991 32432
Tesla 2017 42343
Ferrari 2001 1234
Tesla 2018 12343
Toyota 1992 1235
....
我想做什么,我使用ggplot
与R
有一个geom_line()
的情节,我可以用来Ferrari
TotalNoSales
与CarType
的其余部分进行比较
我做了什么?
这是我提出的代码,但它仅适用于一个CarType
,而我希望在同一图表上的另一行显示其他CarType
的总销售额总和
cartype_ferrari <- car_dataset %>%
filter(CarType == "Ferrari") %>%
group_by(SaleYear, TotalNoSales) %>%
summarize(n = sum(Count))
ggplot(cartype_ferrari, aes(x = SaleYear, y = n))+
geom_line()+
xlab("Year")+
ylab("Total Car Sales")
这个怎么样?我没有你的数据。如果您仍有问题,请提供一些数据。
cartype_ferrari <- car_dataset %>%
mutate(Ferrari = as.numeric(CarType == "Ferrari")) %>%
group_by(SaleYear, Ferrari) %>%
summarize(n = sum(TotalNoSales))
ggplot(cartype_ferrari, aes(x = SaleYear, y = n, color = Ferrari))+
geom_line()+
xlab("Year")+
ylab("Total Car Sales")