#' Plot crowd object
#'
#' @param x
#' @param ...
#'
#' @return
#' @export
#'
#' @examples
plot.crowd <- function(x, ...){
plot(x=x$coord[,1], y=x$coord[,2], xlab="x", ylab="y", main="Crowd plot", ...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.