diff --git a/R/scenario1-master.R b/R/scenario1-master.R index 7493db4..c7072dc 100644 --- a/R/scenario1-master.R +++ b/R/scenario1-master.R @@ -322,7 +322,7 @@ scenario1Server <- function(id){ ) return(x) }) - reportServer('report', params = params, report_template = "report_pdf.Rmd") + reportServer('report', params = params, report_template = "scenario1_report_pdf.Rmd") } ) diff --git a/inst/extdata/report_templates/open_report_pdf.Rmd b/inst/extdata/report_templates/scenario1_report_pdf.Rmd similarity index 97% rename from inst/extdata/report_templates/open_report_pdf.Rmd rename to inst/extdata/report_templates/scenario1_report_pdf.Rmd index 36684a3..aa52a3e 100644 --- a/inst/extdata/report_templates/open_report_pdf.Rmd +++ b/inst/extdata/report_templates/scenario1_report_pdf.Rmd @@ -59,11 +59,11 @@ Handwriter has been tested on handwriting examples from publicly available handw Handwriter processes handwriting by converting the writing to black and white, thinning the writing to 1 pixel in width, and following a set of rules to break the writing into component shapes called *graphs*. Graphs capture shapes, not necessarily individual letters. Graphs might be a part of a letter or contain parts of multiple letters. ```{r graphs1, echo=FALSE, fig.cap="Graphs from the first document.", fig.align="center"} -handwriter::plot_graphs(params$graphs1, ncol=5) +handwriter::plotNodes(params$graphs1) ``` ```{r graphs2, echo=FALSE, fig.cap="Graphs from the second document.", fig.align="center"} -handwriter::plot_graphs(params$graphs2, ncol=5) +handwriter::plotNodes(params$graphs2) ``` ## Clusters