#' A function for creating simplystats themed scatterplots
#'
#' This function creates scatterplots. To use it, you should pass a vector
#' of numeric color values (it will create a palette to match the length). You can
#' also specify whether to add the simplystats logo or not.
#'
#' @param ... Pass any usual plotting parameters
#' @param col A numeric vector specifying the colors of points
#' @param pch The default pch is 19, cause it is the best.
#' @param logo Logical, if true, then the simplystats logo is added to the plot
#' @param theme Options are "black" or "white"
#'
#' @export
#'
#'
simplyplot = function(...,col=1,pch=19,logo=TRUE,theme="black"){
op = set_simplypar(theme)
simplycols = get_simplycols(col)
plot(...,
panel.first = grid(lty="dashed"),
bty="n",xaxt="n",yaxt="n",
pch=19,col=simplycols[col])
add_simplyaxis()
if(logo){add_simply_logo(theme)}
par(op,new=TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.