Remover coluna de um data.frame dentro de uma lista!
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: ivanalaman@yahoo.com.br/ivanalaman@gmail.com @ \end{signature}
Faltou salvar o vars[[i]][,!(colnames(vars[[i]]) %in% c('groups'))] em cima de vars[[i]], nao? 2012/9/28 Ivan Bezerra Allaman <ivanalaman@yahoo.com.br>
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: ivanalaman@yahoo.com.br/ivanalaman@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.
vars[[i]][['groups']] <- NULL ou faca a selecao retornando apenas as variaveis de interesse subset(cbind(x,groups=y[[which]]), groups==i, c('sitio', 'serie', 'tempo')) 2012/9/28 Ivan Bezerra Allaman <ivanalaman@yahoo.com.br>:
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: ivanalaman@yahoo.com.br/ivanalaman@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.
A primeira opção é a ideal, pois fica generalizada para qualquer base de dados. Valeuuuuuuuuuuuuuuuuuu Benilton! \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: ivanalaman@yahoo.com.br/ivanalaman@gmail.com @ \end{signature} ________________________________ De: Benilton Carvalho <beniltoncarvalho@gmail.com> Para: r-br@listas.c3sl.ufpr.br; Ivan Bezerra Allaman <ivanalaman@yahoo.com.br> Enviadas: Sexta-feira, 28 de Setembro de 2012 11:23 Assunto: Re: [R-br] Remover coluna de um data.frame dentro de uma lista! vars[[i]][['groups']] <- NULL ou faca a selecao retornando apenas as variaveis de interesse subset(cbind(x,groups=y[[which]]), groups==i, c('sitio', 'serie', 'tempo')) 2012/9/28 Ivan Bezerra Allaman <ivanalaman@yahoo.com.br>:
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: ivanalaman@yahoo.com.br/ivanalaman@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.
participantes (3)
-
Benilton Carvalho -
Ivan Bezerra Allaman -
Rodrigo Coster