This shows you the differences between two versions of the page.
Next revision | Previous revision | ||
r-credplot [2012/05/06 21:22] matt created |
r-credplot [2013/03/19 15:56] matt |
||
---|---|---|---|
Line 15: | Line 15: | ||
require(lattice) | require(lattice) | ||
if(is.null(names(m))) | if(is.null(names(m))) | ||
- | names(m) <- LETTERS[1:length(m)] | + | names(m) <- as.character(1:length(m)) |
rge <- range(c(mlo, mhi)) | rge <- range(c(mlo, mhi)) | ||
rge[1] <- rge[1] - 0.05 * diff(rge) | rge[1] <- rge[1] - 0.05 * diff(rge) | ||
Line 48: | Line 48: | ||
The following code generates a plot similar to that below. | The following code generates a plot similar to that below. | ||
<code c> | <code c> | ||
- | m <- rnorm(10, 0, 1/10) | + | m <- rnorm(50, 0, 1/10) |
mlo <- m - 1/10 | mlo <- m - 1/10 | ||
mhi <- m + 1/10 | mhi <- m + 1/10 |