Nothing
#' @rdname plot-distribution-method
#' @export
setMethod("points",
signature = signature(x = "distribution"),
definition = function(x,
cut = FALSE,
draw = TRUE,
length.out = 100,
...) {
d = lines(x, cut, length.out, FALSE, ...)
if (draw)
points(d$x, d$y, ...)
invisible(d)
}
)
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.