x <- as.rv(1:10)
y <- rvnorm(mean=x)
par(mfrow=c(2,2))
plot(x, y, main="Fixed x-coordinate")
plot(y, x, main="Fixed y-coordinate")
plot(x, y, lwd=4, rvcol="red", main="Color and line width changed")
plot(x, y, type="b", main="Intervals and random lines", rvcol="blue", col="gray")
## Not run: ------------------------------------
# # Don't use the rv-only parameters when plotting fixed vectors.
# plot(x, E(y), rvcol="blue", col="gray")
# plot(x, E(y), rvcol="blue", col="gray")
#
## ---------------------------------------------
Run the code above in your browser using DataLab