plotCII {MCPAN} | R Documentation |
A function for convenient plotting of confidence intervals.
plotCII(estimate, lower = NULL, upper = NULL, alternative = c("two.sided", "less", "greater"), lines = NULL, lineslty = 2, lineslwd = 1, linescol = "black", CIvert = FALSE, CIlty = 1, CIlwd = 1, CIcex = 1, CIcol = "black", HL = TRUE, ...)
estimate |
a (named) numeric vector, the names of the elements are taken as labels of the CI |
lower |
an optional numeric vector, of the same length as estimate |
upper |
an optional numeric vector, of the same length as estimate |
alternative |
a single character string, one of "two.sided" , "less" , "greater" |
lines |
a numeric (vector) giving the position(s) of line(s) to draw into the plots orthogonal to the confidence intervals |
lineslty |
possible a vector of line type of the lines , see the options for lty in par |
lineslwd |
possible a vector of line width of the lines , see the options for lwd in par |
linescol |
possible a vector of line colors of the lines |
CIvert |
logical indicating, whether confidence intervals shall be drawn horizontal (default), or vertical (if set to TRUE) |
CIlty |
single value, to specify the line type used for the CI, see options for lty in ?par |
CIlwd |
single value, to specify the width type used for the CI, see options for lty in ?par |
CIcex |
single value, to specify the extension of sympols in the plot, see options for cex in ?par |
CIcol |
single value, to specify the color used for the CI |
HL |
a logical, if TRUE (default), plot margins of the are adjusted depending on the length of the names by appropriate calls to par ; this might be incompatible with combining the plot with others in the same device. If set to FALSE,
its up to the user to choose appropriate plot margins by calling to par . |
... |
further arguments to be passed to plot |
Test version.
A plot.
plotCI
, for more convenient methods
est<-c(1,2,3) names(est)<-c("A", "B", "C") lw=c(0,1,2) up=c(2,3,4) plotCII(estimate=est, lower=lw, upper=up) plotCII(estimate=est, lower=lw, upper=up, lines=c(-1,0,1), lineslty=c(3,1,3), lineslwd=c(1,2,1)) ########### names(est)<-c("very long names", "e v e n l o n g e r n a m e s", "C") plotCII(estimate=est, lower=lw, upper=up, CIcol=c("black","green","red"), HL=TRUE ) ########### names(est)<-c("very long names", "e v e n l o n g e r n a m e s", "C") plotCII(estimate=est, lower=lw, upper=up, CIcol=c("black","green","red"), HL=TRUE ) op<-par(no.readonly = TRUE) layout(matrix(1:2, ncol=1)) par(mar=c(5,14,3,1)) plotCII(estimate=est, lower=lw, upper=up, main="Lala 1", CIcol=c("black","green","red"), lines=-1, HL=FALSE ) plotCII(estimate=est, lower=lw, upper=up, main="Lala 2", CIcol=c("black","green","red"), lines=c(0,1), HL=FALSE ) par(op)