View source: R/addtable2plot.R
addtable2plot | R Documentation |
Displays a table of values at a user-specified position on an existing plot
addtable2plot(x,y=NULL,table,lwd=par("lwd"),bty="n",bg=par("bg"),
cex=1,xjust=0,yjust=1,xpad=0.1,ypad=0.5,box.col=par("fg"),text.col=par("fg"),
display.colnames=TRUE,display.rownames=FALSE,hlines=FALSE,vlines=FALSE,
title=NULL)
x,y |
Either x and y coordinates to locate the table or an ‘xy.coords’ object. |
table |
A data frame, matrix or similar object that will be displayed. |
lwd |
The line width for the box and horizontal dividers. |
bty |
Whether to draw a box around the table ("o") or not ("n"). |
bg |
The background color for the table. |
cex |
Character expansion for the table. |
xjust,yjust |
Positioning for the table relative to ‘x,y’. |
xpad,ypad |
The amount of padding around text in the cells as a proportion of the maximum width and height of the strings in each column. |
box.col |
The color for the box and lines. |
text.col |
The color for the text. |
display.colnames |
Whether to display the column names in the table. |
display.rownames |
Whether to display the row names in the table. |
hlines |
Whether to draw horizontal lines between each row of the table. |
vlines |
Whether to draw vertical lines between each column of the table. |
title |
Optional title placed over the table. |
‘addtable2plot’ displays the values in ‘table’ at a position in user coordinates specified by ‘x,y’. The two justification arguments, ‘xjust’ and ‘yjust’ are the same as in the ‘legend’ function, and ‘addtable2plot’ has been programmed to be as similar to ‘legend’ as possible. The function now accepts the positional arguments such as "topright" if passed as ‘x’. The defaults are those that were most popular in scientific journals at the time of programming.
If ‘bg’ is a matrix of colors of the same dimensions as ‘x’, those colors will be the backgrounds of the cells. The default is no background color.
nil
Original by John Kane, mods by Jim Lemon and Brian Diggs. Thanks to Andrija Djurovic for asking for the individual cell colors and Gabor Grothendieck for alerting me to the problem of widely varying column widths.
legend
testdf <- data.frame(Before = c(10, 7, 5, 9), During = c(8, 6, 2, 5),
After = c(5, 3, 4, 3))
rownames(testdf) <- c("Red", "Green", "Blue", "Lightblue")
barp(testdf, main = "Test addtable2plot", ylab = "Value",
names.arg = colnames(testdf), col = 2:5)
# show most of the options including the christmas tree colors
abg <- matrix(c(2, 3, 5, 6, 7, 8), nrow=4, ncol=3)
addtable2plot(2, 8, testdf, bty = "o", display.rownames = TRUE, hlines = TRUE,
vlines = TRUE, title = "The table", bg = abg)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.