list para data.frame
Caros, estou com um grande dúvida, tenho a seguinte lista x <- list() x$s1 <- list() x$s2 <- list() x$s1$tp1 <- data.frame(v1=1:10,v2=3:12,s=1,tp=1) x$s1$tp2 <- data.frame(v1=1:10,v2=3:12,s=1,tp=2) x$s1$tp3 <- data.frame(v1=1:10,v2=3:12,s=1,tp=3) x$s2$tp1 <- data.frame(v1=1:10,v2=3:12,s=2,tp=1) x$s2$tp2 <- data.frame(v1=1:10,v2=3:12,s=2,tp=2) x$s2$tp3 <- data.frame(v1=1:10,v2=3:12,s=2,tp=3) quero juntar de tal forma que : s1 <- rbind(x[[1]][[1]],x[[1]][[2]],x[[1]][[3]]) s2 <- rbind(x[[1]][[1]],x[[1]][[2]],x[[1]][[3]]) no entanto, s varia de 1 a 300. isto é possivel?
Uma possibilidade é essa: o <- lapply(x,function(x) do.call(rbind,x)) for (i in 1:length(o)) { assign(names(o)[i],o[[i]]) } []'s 2012/6/5 Leandro Marino <leandromarino@leandromarino.com.br>
Caros,
estou com um grande dúvida, tenho a seguinte lista
x <- list() x$s1 <- list() x$s2 <- list() x$s1$tp1 <- data.frame(v1=1:10,v2=3:12,s=1,tp=1) x$s1$tp2 <- data.frame(v1=1:10,v2=3:12,s=1,tp=2) x$s1$tp3 <- data.frame(v1=1:10,v2=3:12,s=1,tp=3) x$s2$tp1 <- data.frame(v1=1:10,v2=3:12,s=2,tp=1) x$s2$tp2 <- data.frame(v1=1:10,v2=3:12,s=2,tp=2) x$s2$tp3 <- data.frame(v1=1:10,v2=3:12,s=2,tp=3)
quero juntar de tal forma que : s1 <- rbind(x[[1]][[1]],x[[1]][[2]],x[[1]][[3]]) s2 <- rbind(x[[1]][[1]],x[[1]][[2]],x[[1]][[3]])
no entanto, s varia de 1 a 300. isto é possivel? _______________________________________________ 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.
Rodrigo, perfeito!!! Não conhecia esta funçao (assign)! !!!!!!!!!!!!!!!!!!! Obrigado! Em 5 de junho de 2012 17:30, Rodrigo Coster <rcoster@gmail.com> escreveu:
Uma possibilidade é essa:
o <- lapply(x,function(x) do.call(rbind,x))
for (i in 1:length(o)) { assign(names(o)[i],o[[i]]) }
participantes (2)
-
Leandro Marino -
Rodrigo Coster