shuffle_rows | R Documentation |
Shuffle along the first dimension multiple arrays in sync
shuffle_rows(...)
... |
arrays of various dimensions (vectors and data.frames OK too) |
A list of objects passed on to ...
, or if a single object was
supplied, then the single object shuffled
x <- 1:3
y <- matrix(1:9, ncol = 3)
z <- array(1:27, c(3,3,3))
if(require(zeallot)) {
c(xs, ys, zs) %<-% shuffle_rows(x, y, z)
l <- lapply(seq_along_rows(y), function(r) {
list(x = x[r], y = y[r,], z = z[r,,])
})
ls <- lapply(seq_along_rows(y), function(r) {
list(x = xs[r], y = ys[r,], z = zs[r,,])
})
stopifnot(
length(unique(c(l, ls))) == length(l))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.