diff options
-rw-r--r-- | R/sim.R | 5 | ||||
-rw-r--r-- | man/sim.Rd | 5 |
2 files changed, 6 insertions, 4 deletions
@@ -21,8 +21,9 @@ #' #' @examples #' # ARX Model -#' u <- rnorm(200,sd=1) -#' model <- idpoly(A=c(1,-1.5,0.7),B=c(0.8,-0.25),ioDelay=1) +#' u <- idinput(300,"rgs") +#' model <- idpoly(A=c(1,-1.5,0.7),B=c(0.8,-0.25),ioDelay=1, +#' noiseVar=0.1) #' y <- sim(model,u,addNoise=T) #' #' @export @@ -33,8 +33,9 @@ include support for MIMO systems. } \examples{ # ARX Model -u <- rnorm(200,sd=1) -model <- idpoly(A=c(1,-1.5,0.7),B=c(0.8,-0.25),ioDelay=1) +u <- idinput(300,"rgs") +model <- idpoly(A=c(1,-1.5,0.7),B=c(0.8,-0.25),ioDelay=1, +noiseVar=0.1) y <- sim(model,u,addNoise=T) } |