Add plot example, update static docs

1 files changed, 6 insertions, 0 deletions

diff --git a/R/chent.R b/R/chent.R
index d988e97..6983561 100644
--- a/R/chent.R
+++ b/R/chent.R
@@ -471,6 +471,12 @@ draw_svg.chent = function(x, width = 300, height = 150,
 #' @param x The chent object to be plotted
 #' @param ... Further arguments passed to \code{\link{grid.picture}}
 #' @export
+#' @examples
+#' caffeine <- chent$new("caffeine")
+#' print(caffeine)
+#' if (!is.null(caffeine$Picture)) {
+#'   plot(caffeine)
+#' }
 plot.chent = function(x, ...) {
   if (is.null(x$Picture)) stop("No Picture object in chent, was RDKit available during creation?")
   grid.picture(x$Picture)