Description Usage Examples
3D + time movement
1
my.random.walk(Nobs, Nt, d)
1 2 3 4 5 6 7
library(rgl) library(onion) Nobs <- 5;Nt <- 100; d <- 3 X = my.random.walk(Nobs,Nt,d) X.k <- my.k.diff(X) X.d <- my.array.dist(X) X.mf <- array(c(t(apply(X.k,2,my.moving.frame.array))),c(Nobs,Nt-2,3,3))
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.