Bom dia senhores!
Novamente venho recorrer a ajuda dos senhores! Vamos supor o seguinte:
DADOSS <-
expand.grid(sitio=1,ponto=as.character(c('SS')),serie=2,camara=as.character(LETTERS[1:5]),tempo=c(0,15,30,45),armazen=c('VIDRO','HEAD','PP'))
which <- 'armazen'
x <- DADOSS[,c(1,3,5)]
y <- DADOSS
vars <- list()
for(i in levels(y[[which]])){
vars[[i]] <- subset(cbind(x,groups=y[[which]]), groups==i)
vars[[i]][,!(colnames(dd[[i]]) %in% c('groups'))]
}
vars
Vejam que o meu objetivo é remover a coluna 'groups' de cada lista. No entanto,
a linha "
vars[[i]][,!(colnames(dd[[i]]) %in% c('groups'))]" não funciona!
Alguém tem alguma sugestão?
OBS: 'Éder, peguei o seu CMR emprestado ok?'
Desde já, grato novamente!
\begin{signature}
<<>>=
Prof. Dr. Ivan Bezerra Allaman
Universidade Estadual de Santa Cruz
Departamento de Ciências Exatas e Tecnológicas
Ilhéus/BA - Brasil
Fone: +55 73 3680-5596
E-mail: ivanala...@yahoo.com.br/ivanala...@gmail.com
@
\end{signature}
_______________________________________________
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.