1.基本频数分布直方图
library(ggplot2)
library(patchwork)
设置配色:
install.packages("MetBrewer")
isfahan <- MetBrewer::met.brewer("Isfahan1")
length(isfahan)#八种颜色
isfahan[1]
1.ggplot直方图绘制
ggplot()+
geom_histogram(data = mydata,
bins = 50,
aes(x=GRS,weight=GRS),
fill=colorspace::lighten(isfahan[2],0.35),
color="white")
fill:可以直接填充其他喜欢的颜色,weight表示需要计算的频数。
将weigt去掉,即可
2.基本概率密度分布图
ggplot(data=mydata,aes(x=GRS))+
geom_histogram(bins = 50,
aes(y=..density..),
binwidth = 0.2,#柱子宽度,相当于hist中的breaks=
fill=colorspace::lighten(isfahan[2],0.35),#填充颜色
color="white")+
geom_density(alpha=0.3,fill="lightblue",color="red",lwd=1)
y=..density..设置为密度图,geom_density设置密度线,alpha不透明度,fill填充的颜色,color线条颜色,lwd设置线宽度,lty设置线的类型。