人口统计图中的颜色图例

Question

我有一些来自包的demogdata demography,我想在情节中添加一个颜色图例.有人能帮我吗？

例如,在这张照片中,我希望在1940年至2009年期间使用横向颜色传奇.

plot.demogdata(portugal,series='male',years=1940:2009)

Answer 1

这是(用可重复的例子证明):

library(demography)

fr.mort_age = extract.ages(fr.mort,0:60,F)    
fr.mort_age_yr = extract.years(fr.mort_age,1918:1950)    
plot.demogdata(fr.mort_age_yr,series='male')   
legend("bottomright",legend=unique(fr.mort_age_yr$year),
  col=rainbow(length(fr.mort_age_yr$year)*1.25), ncol=5, pch=19, 
  title="Year", cex=0.5)