[R] Efficient way to repeat rows (or columns) of a matrix?

James W. MacDonald jmacdon at med.umich.edu
Thu Mar 1 00:20:32 CET 2007


Hi Talbot,

ma <- matrix(1:6, nrow  = 2)
rma <- ma[rep(1:2, c(2,3)),]

Best,

Jim



Talbot Katz wrote:
> Hi.
> 
> If I have a vector, v_1, and another vector of positive integers, i_1, the 
> same length as v_1, then rep(v_1,i_1) will repeat v_i[j] exactly i_1[j] 
> times, like so:
> 
> 
>>rep(c(1,2,3),c(3,2,1))
> 
> [1] 1 1 1 2 2 3
> 
> 
> I'd like to do the same sort of thing where I replace v_1 with a matrix, and 
> the jth row of the matrix is repeated i_1 times.
> 
> Obviously, I could do this with for loops, like the following:
> 
> 
>>(ma1=matrix(1:6,nrow=2))
> 
>      [,1] [,2] [,3]
> [1,]    1    3    5
> [2,]    2    4    6
> 
>>vr1=c(2,3)
>>rma1=NULL
>>for(i in 1:length(vr1)){for(j in 1:vr1[i]){rma1=rbind(rma1,ma1[i,])}}
>>rma1
> 
>      [,1] [,2] [,3]
> [1,]    1    3    5
> [2,]    1    3    5
> [3,]    2    4    6
> [4,]    2    4    6
> [5,]    2    4    6
> 
> 
> I just thought some of you clever programmers could show me a more efficient 
> way.  (I apologize if this question has come up before and you're tired of 
> answering it ;-)
> 
> Thanks!
> 
> --  TMK  --
> 212-460-5430	home
> 917-656-5351	cell
> 
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.


-- 
James W. MacDonald
University of Michigan
Affymetrix and cDNA Microarray Core
1500 E Medical Center Drive
Ann Arbor MI 48109
734-647-5623



**********************************************************
Electronic Mail is not secure, may not be read every day, and should not be used for urgent or sensitive issues.



More information about the R-help mailing list