<html><body><div style="color:#000; background-color:#fff; font-family:arial, helvetica, sans-serif;font-size:12pt"><div><span>A primeira opção é a ideal, pois fica generalizada para qualquer base de dados.</span></div><div style="color: rgb(0, 0, 0); font-size: 16px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"><br><span></span></div><div style="color: rgb(0, 0, 0); font-size: 16px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"><span>Valeuuuuuuuuuuuuuuuuuu Benilton!<br></span></div><div> </div><div style="background-color:transparent;" align="center"><font style="background-color:transparent;" face="comic sans ms" size="2"><font size="1"><b><br></b></font></font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif"
size="2">\begin{signature}</font></font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2"><<>>=</font></font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Prof. Dr. Ivan Bezerra Allaman</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Universidade Estadual de Santa Cruz</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Departamento de Ciências Exatas e Tecnológicas</font></div><div style="text-align:left;background-color:transparent;"
align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Ilhéus/BA - Brasil</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Fone: +55 73 3680-5596</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">E-mail: ivanalaman@yahoo.com.br/ivanalaman@gmail.com</font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">@</font></font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif"
size="2">\end{signature}</font></font></div><div><br></div> <div style="font-family: arial, helvetica, sans-serif; font-size: 12pt;"> <div style="font-family: times new roman, new york, times, serif; font-size: 12pt;"> <div dir="ltr"> <font face="Arial" size="2"> <hr size="1"> <b><span style="font-weight:bold;">De:</span></b> Benilton Carvalho <beniltoncarvalho@gmail.com><br> <b><span style="font-weight: bold;">Para:</span></b> r-br@listas.c3sl.ufpr.br; Ivan Bezerra Allaman <ivanalaman@yahoo.com.br> <br> <b><span style="font-weight: bold;">Enviadas:</span></b> Sexta-feira, 28 de Setembro de 2012 11:23<br> <b><span style="font-weight: bold;">Assunto:</span></b> Re: [R-br] Remover coluna de um data.frame dentro de uma lista!<br> </font> </div> <br>vars[[i]][['groups']] <- NULL<br><br>ou faca a selecao retornando apenas as variaveis de interesse<br><br>subset(cbind(x,groups=y[[which]]), groups==i, c('sitio', 'serie',
'tempo'))<br><br>2012/9/28 Ivan Bezerra Allaman <<a ymailto="mailto:ivanalaman@yahoo.com.br" href="mailto:ivanalaman@yahoo.com.br">ivanalaman@yahoo.com.br</a>>:<br>> Bom dia senhores!<br>><br>> Novamente venho recorrer a ajuda dos senhores! Vamos supor o seguinte:<br>><br>> DADOSS <-<br>> 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'))<br>> which <- 'armazen'<br>> x <- DADOSS[,c(1,3,5)]<br>> y <- DADOSS<br>> vars <- list()<br>> for(i in levels(y[[which]])){<br>> vars[[i]] <- subset(cbind(x,groups=y[[which]]), groups==i)<br>> vars[[i]][,!(colnames(dd[[i]]) %in% c('groups'))]<br>> }<br>> vars<br>><br>> Vejam que o meu objetivo é remover a coluna 'groups' de cada lista. No<br>> entanto, a linha "<br>> vars[[i]][,!(colnames(dd[[i]]) %in% c('groups'))]"
não funciona!<br>><br>> Alguém tem alguma sugestão?<br>><br>> OBS: 'Éder, peguei o seu CMR emprestado ok?'<br>><br>> Desde já, grato novamente!<br>><br>> \begin{signature}<br>> <<>>=<br>> Prof. Dr. Ivan Bezerra Allaman<br>> Universidade Estadual de Santa Cruz<br>> Departamento de Ciências Exatas e Tecnológicas<br>> Ilhéus/BA - Brasil<br>> Fone: +55 73 3680-5596<br>> E-mail: <a ymailto="mailto:ivanalaman@yahoo.com.br" href="mailto:ivanalaman@yahoo.com.br">ivanalaman@yahoo.com.br</a>/<a ymailto="mailto:ivanalaman@gmail.com" href="mailto:ivanalaman@gmail.com">ivanalaman@gmail.com</a><br>> @<br>> \end{signature}<br>><br>> _______________________________________________<br>> R-br mailing list<br>> <a ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>> <a
href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código<br>> mínimo reproduzível.<br><br><br> </div> </div> </div></body></html>