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.