我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

利用R语言的ggplot2包绘制直方图

小编给大家分享一下利用R语言的ggplot2包绘制直方图,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!

成都创新互联是一家专注于网站设计制作、成都网站建设与策划设计,西宁网站建设哪家好?成都创新互联做网站,专注于网站建设十年,网设计领域的专业建站公司;建站业务涵盖:西宁等地区。西宁做网站价格咨询:13518219792

一 绘制基本直方图

准备数据及R包

library(ggplot2)set.seed(1234)df <- data.frame(sex = factor(rep(c("F", "M"),each=200)),weight=round(c(rnorm(200, mean=55, sd=5), rnorm(200, mean=65, sd=5)))  )head(df) sex weight1   F     492   F     563   F     604   F     435   F     576   F     58

1.1 基本直方图

ggplot(df, aes(x=weight)) +geom_histogram(binwidth=1,color="black",fill="white")# 改变 bins 和 颜色

利用R语言的ggplot2包绘制直方图

1.2 添加均值线

ggplot(df, aes(x=weight)) +geom_histogram(binwidth=1,color="black", fill="lightblue",linetype="dashed")+ #设置框线类型,颜色和fill的颜色geom_vline(aes(xintercept=mean(weight)), color="blue", linetype="dashed", size=1) #添加均值线,设置线型,颜色等

利用R语言的ggplot2包绘制直方图

1.3 添加密度曲线

ggplot(df, aes(x=weight)) + geom_histogram(aes(y=..density..), colour="black", fill="white")+ # 需要密度形式 geom_density(alpha=.2, fill="#FF6666")

利用R语言的ggplot2包绘制直方图

二 分组设置颜色 线型等

2.1 分组更改线型颜色

ggplot(df, aes(x=weight, color=sex)) +geom_histogram(fill="white", alpha=0.5, position="identity")

其中position可选 “identity”, “stack”, “dodge”. 默认值是 “stack”.

利用R语言的ggplot2包绘制直方图

2.2 分组添加均值线

library(plyr)mu <- ddply(df, "sex", summarise, grp.mean=mean(weight))p<-ggplot(df, aes(x=weight, color=sex)) +  geom_histogram(fill="white", position="dodge")+  geom_vline(data=mu, aes(xintercept=grp.mean, color=sex),             linetype="dashed")+  theme(legend.position="top")p

利用R语言的ggplot2包绘制直方图

自定义颜色

# Use custom color palettesp+scale_color_manual(values=c("#999999", "#E69F00", "#56B4E9"))# Use brewer color palettesp+scale_color_brewer(palette="Dark2")# Use grey scalep + scale_color_grey() + theme_classic() + theme(legend.position="top")

分组更改fill的颜色

ggplot(df, aes(x=weight, fill=sex, color=sex)) +  geom_histogram(binwidth=1,position="identity", alpha=0.5)+ geom_vline(data=mu, aes(xintercept=grp.mean),linetype="dashed")

利用R语言的ggplot2包绘制直方图

三 汇总展示

ggplot(df, aes(x=weight, color=sex, fill=sex))+geom_histogram(binwidth=1,aes(y=..density..), position="identity", alpha=0.5)+geom_density(alpha=0.6)+geom_vline(data=mu, aes(xintercept=grp.mean, color=sex),linetype="dashed")+scale_color_manual(values=c("#999999", "#E69F00", "#56B4E9"))+scale_fill_manual(values=c("#999999", "#E69F00", "#56B4E9"))+labs(title="Weight histogram plot",x="Weight(kg)", y ="Density")+theme_classic()

利用R语言的ggplot2包绘制直方图

以上是“利用R语言的ggplot2包绘制直方图”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


网站名称:利用R语言的ggplot2包绘制直方图
文章起源:http://shouzuofang.com/article/jdpcec.html

其他资讯