R语言数据可视化分析报告(附代码数据)

数据可视化分析报告可见1此图形是一个传统的堆积条形图。这个图形在内置于ggplot2库中的mpg数据集上工作。library(ggplot2)ggplot(mpg,aes(class,fill=trans))+geom_bar(position="stack")echo=TRUE可见2这个boxplot也是使用mpg数据集建立的。ggplot(mpg)+geom_boxplot(aes(manufacturer,hwy))+theme_classic()+coord_flip()+labs(y="HighwayFuelEfficiency(mile/gallon)",x="VehicleManufacturer")echo=TRUEVis3这个图形是用另一个数据集菱形建立的，也是内置在ggplot2包中的数据集。library(ggthemes)ggplot(diamonds)+geom_density(aes(price,fill=cut,color=cut),alpha=0.4,size=0.5)+labs(title='DiamondPriceDensity',x='DiamondPrice(USD)',y='Density')+theme_economist()echo=TRUE另外，我正在使用ggplot2软件包来将线性模型拟合到框架内的所有数据上。ggplot(iris,aes(Sepal.Length,Petal.Length))+geom_point()+geom_smooth(method=lm)+theme_minimal()+theme(panel.grid.major=element_line(size=1),panel.grid.minor=element_line(size=0.7))+labs(title='relationshipbetweenPetalandSepalLength',x='IrisSepalLength',y='IrisPetalLength')echo=TRUEVis5Finally,inthisvisIextendonthelastexample,byplottingthesamedatabutusinganadditionalchanneltocommunicatespeciesleveldifferences.AgainIfitalinearmodeltothedatabutthistimeoneforeachspecies,andaddadditionalthemeandlabelingmodicitations.ggplot(iris,aes(x=iris$Sepal.Length,y=iris$Petal.Length,fill=Species,color=Species))+geom_point()+theme_minimal()+labs(x="IrisSepalLength",y="IrisPetalLength",title="RelationshipbetweenSepalandPetalLength")+g