1 301
> a[,,"a1"] # First table by name
col
row 1 2
1 1 201
2 101 301
>
> -Original Message-
> From: r-help-boun...@r-project.org [mailto:r-help-bounces@r-
> project.org] On Behalf Of bantex
> Sent: Thursday, August 16, 2012 7:28 AM
> To: r-help
Thanks guys for the help. I finally know what to do know :)
--
View this message in context:
http://r.789695.n4.nabble.com/Column-Extraction-from-matrix-tp4640465p4640482.html
Sent from the R help mailing list archive at Nabble.com.
__
R-help@r-proj
> -Original Message-
> I have a 4 by 100 matrix. I wish to extract each column and
> make it into a 2 by 2 matrix.
#make a toy 4x100 matrix:
m <- matrix(rnorm(400), ncol=100)
#use lapply after on-the-fly conversion to a list-like object:
a.list <- lapply(as.data.frame(m),function(x) mat
set.seed(2)
a=matrix(rnorm(400),ncol=100)
#use a list
aList<-list()
for(i in 1:dim(a)[2]){
aList[[i]]<-matrix(a[,i],ncol=2)
}
#get lots of variables
for(i in 1:dim(a)[2]){
assign(paste("a",i,sep=""),matrix(a[,i],ncol=2))
}
On 16.08.2012, at 08:07, bantex wrote:
> Hi all,
>
> I
Hi all,
I have a 4 by 100 matrix. I wish to extract each column and make it into a 2
by 2 matrix.
I also want to assign names for each 2X2 matrix.
For example
set.seed(2)
a=matrix(rnorm(400),ncol=100)
a1=matrix(a[,1],ncol=2)
a2=matrix(a[,2],ncol=2)
.
.
.
a100=matrix(a[,100],ncol=2)
Any sim
5 matches
Mail list logo
