人口统计图中的颜色图例

Question

我有一些来自包demography的demogdata，我想在图中添加一个颜色图例。有人能帮助我吗？

例如，在这张照片中，我想用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)