R/simGaussian.R

In eddelbuettel/rcppsmc: Rcpp Bindings for Sequential Monte Carlo

Defines functions simGaussian

Documented in simGaussian

simGaussian <- function(len = 250)
{
  sim <- list()
  sim$state <- cumsum(rnorm(len))
  sim$data  <- sim$state + rnorm(len)

  invisible(sim)
}