R语言_car_可视化

原创

于 2017-05-22 16:49:48 发布 · 2k 阅读

CC 4.0 BY-SA版权

使用R语言的ggplot2、plyr和reshape2库进行车辆数据的可视化分析，包括不同年份的平均油耗、发动机排量趋势、按变速器类型划分的占比以及四缸车的制造商变化。通过数据发现，近年来小型车的平均燃油效率有所提升，并且手动挡车的比例逐渐减少。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

library(ggplot2)
library(plyr)
library(reshape2)
#!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
#ggplot()不要分行写，都放在一行，要不然不好使！！！！！！！！！！！！！！！！
#!!!!!!!!!!!!!!!!!!!!!!!!!
vehicles<-read.csv("F:/Data/exe/vehicles.csv",stringsAsFactors=F)
head(vehicles)
colors<-c("green","red","yellow","blue")
colors_factors<-factor(colors)
colors[1]<colors[2]
nrow(vehicles)
ncol(vehicles)
names(vehicles)
length(unique(vehicles[,"year"]))#35
first_year<-min(vehicles[,"year"])
last_year<-max(vehicles[,"year"])
length(unique(vehicles$year))#验证是否每一年都有数据
head(vehicles$fuelType1)
table(vehicles$fuelType1)
vehicles$trany[vehicles$trany==""]<-NA
head(vehicles$trany)
head(substr(vehicles$trany,1,4))
#ifsubstr(vehicles$trany,1,4)=="Auto",则为"Auto"，否则为"Manual"
vehicles$trany2<-ifelse(substr(vehicles$trany,1,4)=="Auto","Auto","Manual")
head(vehicles$trany2)
#将新变量变成因子
vehicles$t