Caro Benilton, Segue um exemplo reproduzível. library(RColorBrewer) dfm <- data.frame(Solo=c("LVA", "LVD"), col=rep("#000000", 2)) mypalette <- brewer.pal(3,"Greys") var <- data.frame(wrong=unique(dfm$Sol), right=mypalette[2:3]) for (i in seq(along = dimnames(var)[[1L]])){ dfm[,2][which(dfm[,1] == var[[i,1]])] <- var[[i,2]] } Obrigado Alisson Lucrécio da Costa ________________________________ From: Benilton Carvalho <beniltoncarvalho@gmail.com> To: r-br <r-br@listas.c3sl.ufpr.br>; Alisson Lucrecio <alissonluc@yahoo.com.br> Sent: Wednesday, May 22, 2013 10:26 AM Subject: Re: [R-br] Duvida plot base1 dificil, muito dificil, ser preciso na ausencia de um exemplo reproduzivel... mas, acho que o problema resume-se 'a falta de aspas em torno do valor... blah <- '#D9D9D9' b Em 22 de maio de 2013 10:16, Alisson Lucrecio <alissonluc@yahoo.com.br> escreveu:
Caro Colegas, Bom dia.
Eu estou tentando construir uma PCA no base, mas estou entendo alguns problema.
Tenho uma data.frame com uma célula com valor "#F7F7F7" (dm.x[,1+i]) e gostaria de substitui-la por outro valor de acordo com o valor de uma célula especifica,
assim tenho:
dm.x[,2][which(dm.x[,1] == 0)] <- #D9D9D9
Erro.
Mensagens de aviso perdidas: In `[<-.factor`(`*tmp*`, which(dm.x[, 1 + i] == var[[ii, 1]]), value = c(NA_integer_, : invalid factor level, NAs generated
Obrigando
Alisson Lucrécio da Costa
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.