try this:
pk <- matrix(rnorm(12), 4, 3)
matrix(rep(pk[1, ], each = 4), 4)
I hope it helps.
Best,
Dimitris
----
Dimitris Rizopoulos
Biostatistical Centre
School of Public Health
Catholic University of Leuven
Address: Kapucijnenvoer 35, Leuven, Belgium
Tel: +32/(0)16/336899
Fax: +32/(0)16/337015
Web: http://med.kuleuven.be/biostat/
http://www.student.kuleuven.be/~m0390867/dimitris.htm
----- Original Message -----
From: "fernanda lopez" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, July 14, 2008 10:33 AM
Subject: [R] Loop problem
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@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.
Disclaimer: http://www.kuleuven.be/cwis/email_disclaimer.htm
______________________________________________
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.