4 files changed, 4 insertions, 4 deletions
diff --git a/R/iv.R b/R/iv.R
index abc732e..47fb187 100644
--- a/R/iv.R
+++ b/R/iv.R
@@ -135,7 +135,7 @@ ivcompute <- function(z,x,order,filt=NULL){
 #' @examples
 #' mod_dgp <- idpoly(A=c(1,-0.5),B=c(0.6,-.2),C=c(1,0.6),ioDelay = 2,noiseVar = 0.1)
 #' u <- idinput(400,"prbs")
-#' y <- sim(mod_dgp,u,T)
+#' y <- sim(mod_dgp,u,addNoise=TRUE)
 #' z <- idframe(y,u)
 #' mod_iv4 <- iv4(z,c(1,2,2))
 #' 
diff --git a/R/sim.R b/R/sim.R
index ea1f225..2efa74e 100644
--- a/R/sim.R
+++ b/R/sim.R
@@ -24,7 +24,7 @@
 #' 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)
+#' y <- sim(model,u,addNoise=TRUE)
 #' 
 #' @export
 sim <- function(model,input,addNoise = F,innov=NULL,seed=NULL) UseMethod("sim")
diff --git a/man/iv4.Rd b/man/iv4.Rd
index 45755fc..77b794c 100644
--- a/man/iv4.Rd
+++ b/man/iv4.Rd
@@ -40,7 +40,7 @@ to the IV function with the same instrument filters as in the second stage.
 \examples{
 mod_dgp <- idpoly(A=c(1,-0.5),B=c(0.6,-.2),C=c(1,0.6),ioDelay = 2,noiseVar = 0.1)
 u <- idinput(400,"prbs")
-y <- sim(mod_dgp,u,T)
+y <- sim(mod_dgp,u,addNoise=TRUE)
 z <- idframe(y,u)
 mod_iv4 <- iv4(z,c(1,2,2))
 
diff --git a/man/sim.Rd b/man/sim.Rd
index 9aa1d11..a40ba29 100644
--- a/man/sim.Rd
+++ b/man/sim.Rd
@@ -36,7 +36,7 @@ include support for MIMO systems.
 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)
+y <- sim(model,u,addNoise=TRUE)
 
 }