R语言绘图—“金字塔图”

这里我主要模拟一些数据，大家可以根据自己数据的情况来绘制。

#模拟数据
set.seed(1234)
mydata<-data.frame(
  age=rnorm(n=6000,mean=40,sd=10),
  gender=rep(c("male"
1
2
3
4
5