<p dir="ltr">Oi pessoal,</p>
<p dir="ltr">Eu preciso fazer um PCA que varie as cores em função dos anos. O mais antigo em vermelho e a medida que chega as datas mais recentes vai ficando roxo (uma escala de cor).</p>
<p dir="ltr">eu tenho esse exemplo hipotético.</p>
<p dir="ltr">mat5 <- matrix(rnorm(2000), ,4) # minha matriz<br>
mat5<br>
ages<-seq(1, 50000, by = 100) #idades<br>
ages</p>
<p dir="ltr">library(plotrix)<br>
agecol<-color.scale(ages,extremes=c("purple","red")) # encaixando a escala de cor nas idades</p>
<p dir="ltr">rownames(mat5) <- c(seq ) # fazendo as idades os nomes da linhas da matriz</p>
<p dir="ltr">library("vegan")<br>
test.pca<-rda(mat5) # calculando componentes principais <br>
plot(test.pca,display="sites", cex=1, type="p",scaling=-3) # plotando componentes princiapais.</p>
<p dir="ltr">O problema é: Como fazer os pontos do gráfico ficarem coloridos como estabelecido  em " agecol<-color.scale(ages,extremes=c("purple","red")) "</p>
<p dir="ltr">Agradeço desde já a ajuda</p>
<p dir="ltr">Abraços<br>
Jackson</p>