Try this;

do.call(rbind, lapply(split(x, seq(nrow(x))), cbind, y))

On Mon, Aug 24, 2009 at 1:16 PM, Daniel Nordlund <djnordlund@verizon.net>wrote:

> If I have two matrices like
>
> x <- matrix(rep(c(1,2,3),3),3)
> y <- matrix(rep(c(4,5,6),3),3)
>
> How can I combine  them to get ?
>
> 1 1 1 4 4 4
> 1 1 1 5 5 5
> 1 1 1 6 6 6
> 2 2 2 4 4 4
> 2 2 2 5 5 5
> 2 2 2 6 6 6
> 3 3 3 4 4 4
> 3 3 3 5 5 5
> 3 3 3 6 6 6
>
> The number of rows and the actual numbers above are unimportant, they are
> given so as to illustrate how I want to combine the matrices.  I.e., I am
> looking for a general way to combine the first row of x with each row of y,
> then the second row of x with y, ....
>
> Thanks,
>
> Dan
>
> Daniel Nordlund
> Bothell, WA USA
>
> Thanks for
>
> ______________________________________________
> R-help@r-project.org 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.
>



-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O

	[[alternative HTML version deleted]]


