Re: [R] Loop problem

From: Daniel Malter <daniel_at_umd.edu>
Date: Mon, 14 Jul 2008 01:59:58 -0700 (PDT)

Hi, do you mean this?

pk<-matrix(rnorm(12),nrow=4,ncol=3)
ck1<-cbind(rep(pk[,1],4),rep(pk[,2],4),rep(pk[,3],4)) ## or
ck2<-cbind(rep(pk[,1],each=4),rep(pk[,2],each=4),rep(pk[,3],each=4))

pk
ck1
ck2

best,
Daniel

fernanda lopez wrote:
>
> Dear all,
> I want to
> write ck<-cbind(rep(pk[1,1],4),rep(pk[1,2],4),rep(pk[1,3],4)) state
> ment
> in a loop . How can I write it ?
>
>
>
>
>

>> pk

> [,1] [,2] [,3]
> [1,] -1.1354816 0.9808877 -0.9446314
> [2,] 0.7787378 0.4536944 0.3204882
> [3,] -1.7274907 1.5112011 1.4481839
> [4,] 1.0629145 0.5976109 -0.5277638
>
>
>
>> pk<-matrix(rnorm(12),nrow=4,ncol=3)
>> pk

> [,1] [,2] [,3]
> [1,] -1.1354816 0.9808877 -0.9446314
> [2,] 0.7787378 0.4536944 0.3204882
> [3,] -1.7274907 1.5112011 1.4481839
> [4,] 1.0629145 0.5976109 -0.5277638
>
>> ck<-cbind(rep(pk[1,1],4),rep(pk[1,2],4),rep(pk[1,3],4))
>> ck

> [,1] [,2] [,3]
> [1,] -1.135482 0.9808877 -0.9446314
> [2,] -1.135482 0.9808877 -0.9446314
> [3,] -1.135482 0.9808877 -0.9446314
> [4,] -1.135482 0.9808877 -0.9446314
>
>
> Thanks for your help
>
> Fernanda Lopez
> Netherlands
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help_at_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.
>
>
-- 
View this message in context: http://www.nabble.com/Loop-problem-tp18439649p18439918.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
R-help_at_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.
Received on Mon 14 Jul 2008 - 09:13:06 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Mon 14 Jul 2008 - 09:31:29 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.

list of date sections of archive