x的每个元素都是个矩阵,想把所有的矩阵叠加起来,不知道有什么更好的方法么……
<br />
> x=list(a=matrix(0,2,2),b=matrix(1,2,2),c=matrix(2,2,2),d=matrix(3,2,2))<br />
> x<br />
$a<br />
[,1] [,2]<br />
[1,] 0 0<br />
[2,] 0 0</p>
<p>$b<br />
[,1] [,2]<br />
[1,] 1 1<br />
[2,] 1 1</p>
<p>$c<br />
[,1] [,2]<br />
[1,] 2 2<br />
[2,] 2 2</p>
<p>$d<br />
[,1] [,2]<br />
[1,] 3 3<br />
[2,] 3 3</p>
<p>> y <- eval(parse(text=paste("rbind(",paste("x[[",1:length(x),"]]",sep="",collapse=","),")",sep="")))<br />
> y<br />
[,1] [,2]<br />
[1,] 0 0<br />
[2,] 0 0<br />
[3,] 1 1<br />
[4,] 1 1<br />
[5,] 2 2<br />
[6,] 2 2<br />
[7,] 3 3<br />
[8,] 3 3</p>
<p>
</p>