## 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)
Run the code above in your browser using DataLab