Displaying 1 result from an estimated 1 matches for "taugp".
Did you mean:
taug
2009 May 09
1
Strip labels: use xyplot() to plot columns in parallel with outer=TRUE
...the
different panels are for different levelf of a conditioning
factor.
tau <- (0:5)/2.5; m <- length(tau); n <- 200; SD <- 2
x0 <- rnorm(n, mean=12.5, sd=SD)
matdf <- data.frame(
x = as.vector(sapply((0:5)/2.5, function(s)x0+rnorm(n, sd=2*s))),
y <- rep(15+2.5*x0, m), taugp = factor(rep(tau, rep(n,m))))
names(matdf) <- c("x","y","taugp")
lab <- c(list("0 (No error in x)"),
lapply(tau[-1], function(x)substitute(A*s[z], list(A=x))))
xyplot(y ~ x | taugp, data=matdf,
strip=strip.custom(strip.names=TRUE,...