Nothing
#' Draw blank plot
#'
#' \code{blank.plot} draws a blank plot (no data, axis, or labels) on
#' the current device.
#'
#' Used by the \code{autoimage} function to fill remaining regions
#' with white space when there are more plotting regions than images
#' to plot.
#'
#' @seealso \code{autoimage}
#' @return NULL
#' @examples
#' blank.plot()
#' @export
blank.plot <- function() {
curmar <- par()$mar
par(mar = rep(0, 4))
graphics::plot(0, 0, type = "n", axes = FALSE, ann = FALSE)
par(mar = curmar)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.