[R] Selecting and then joining data blocks

arun smartpink111 at yahoo.com
Thu Apr 25 14:14:14 CEST 2013

#creating the four matrix in a list

lst1<-lapply(1:4,function(x) matrix(sample(1:40,20,replace=TRUE),ncol=5))
names(lst1)<- paste0("B",1:4)
vec<- c(1,2,4,3,2,3,1)
res<-do.call(rbind,lapply(vec,function(i) lst1[[i]]))
#[1] 28  5

B1<- lst1[[1]]
 B2<- lst1[[2]]
 B3<- lst1[[3]]
 B4<- lst1[[4]]

 res2<-do.call(rbind,lapply(vec,function(i) get(paste0("B",i))))
#[1] TRUE

----- Original Message -----
From: Preetam Pal <lordpreetam at gmail.com>
To: r-help at r-project.org
Sent: Thursday, April 25, 2013 7:51 AM
Subject: [R] Selecting and then joining data blocks

Hi all,

I have 4 matrices, each having  5 columns and 4 rows .....denoted by
I have generated a vector of 7 indices, say (1,2,4,3,2,3,1} which refers to
the index of the matrices to be chosen and then appended one on the top of
the next: like, in this case, I wish to have the following mega matrix:
B1over B2 over B4 over B3 over B2 over B3 over B1.

1> How can I achieve this?
2> I don't want to manually identify and arrange the matrices for each
vector of index values generated   (for which the code  I used is :
index=sample( 4,7,replace=T)). How can I automate the process?

Basically, I am doing bootstrapping , but the observations are actually 4X5

Appreciate your help.



Preetam Pal
M-Stat 2nd Year,                                             Room No. N-114
Statistics Division,                                           C.V.Raman
Indian Statistical Institute,                                 B.H.O.S.

    [[alternative HTML version deleted]]

R-help at r-project.org mailing list
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

More information about the R-help mailing list