I'm not grasping why cbind (in the code below) warns that
Warning message: number of rows of result is not a multiple of vector length (arg 2) in: cbind(z, p)
when I do
sections <- function(length, parts) { p <- 1:parts q <- length %/% parts z <- array(p, dim=c(parts,q))
r <- length %% parts if ( r > 0 ) { p[r+1:length(p)] <- NA z <- cbind(z,p) }
z <- na.omit(as.vector(t(z))) }
and then
sections(32,5) -> a
As I see it, rows in result are 5 and the vector length of p (which is 5) is a multiple of 5.
kind regards, Paul
-- Paul Lemmens NICI, University of Nijmegen ASCII Ribbon Campaign /"\ Montessorilaan 3 (B.01.03) Against HTML Mail \ / NL-6525 HR Nijmegen X The Netherlands / \ Phonenumber +31-24-3612648 Fax +31-24-3616066
______________________________________________ [EMAIL PROTECTED] mailing list https://www.stat.math.ethz.ch/mailman/listinfo/r-help