graphicsQC-package: Quality Control for Graphics

Description Details Author(s) References See Also Examples

Description

Generates graphics files, compares them with "model" files, and reports the results.

Details

To generate files, use plotExpr, plotFile, or plotFunction. To compare sets of these, use compare. To generate a report based on the comparison, use writeReport.

One possible way of using these functions is to create a set of plots in a directory in an old version of R (say, the control group) using one of the plotting functions. Then to load a new version of R and create the same plots in a different directory (say, the test group). A comparison can then be done by specifying the control and test directories. Then a report can be made on the comparison object.

It is highly recommended to use separate directories for the test and control. If the same directory is used for both, all the prefixes in the test and all the prefixes in the control must be unique, and auto-detect will not work if the same directory is given twice.

Author(s)

Stephen Gardiner

References

Free Software Foundation, Inc. 2008 Diffutils. http://www.gnu.org/software/diffutils/diffutils.html

ImageMagick Studio LLC. 2008 ImageMagick. http://www.imagemagick.org/

Murrell, P. & Hornik, K. 2003 Quality Assurance for Graphics in R http://www.ci.tuwien.ac.at/Conferences/DSC-2003/Proceedings/MurrellHornik.pdf.

See Also

plotExpr, plotFile, plotFunction, compare, writeReport

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
## Not run: 
  # Create some plots to compare (1st and 3rd plots have differences)
  comp1 <- plotExpr(c("plot(1:10)", "plot(4:40)", "x<-3", "plot(2:23)"),
                    c("pdf", "ps"), "myPrefix", "comp1")
  comp2 <- plotExpr(c("plot(1:11)", "plot(4:40)", "x<-3", "plot(5:15)"),
                    c("pdf", "ps"), "myPrefix", "comp2")

  # Compare them
  compExpr <- compare(comp1, comp2)

  # Write a HTML report
  writeReport(compExpr)

## End(Not run)

graphicsQC documentation built on May 2, 2019, 1:05 p.m.