使用ggplot绘制单个类别数据与使用R的整个数据集

数据集如下所示：

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（）

绘图，我可以使用该绘图将

法拉利
TotalNoSales
与
车型的其余部分进行比较

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
，而我希望在同一图表上另一行显示其他
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%
过滤器（CarType==“法拉利”）%>%
各组（销售年度，总销售额）%>%
汇总（n=总和（计数））
ggplot（cartype_ferrari，aes（x=SaleYear，y=n））+
geom_线（）+
xlab（“年度”）+
ylab（“汽车销售总额”）
这个怎么样？我没有你的数据。如果您仍然有问题，请提供一些数据

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")

cartype_ferrari%
变异（Ferrari=as.numeric（CarType==“Ferrari”））%>%
组别（SaleYear，法拉利）%>%
汇总（n=总和（总计））
ggplot（cartype_ferrari，aes（x=SaleYear，y=n，color=ferrari））+
geom_线（）+
xlab（“年度”）+
ylab（“汽车销售总额”）