data(finches)
data(galapagos)
bar <- barplot_rd3(finches, galapagos, select="Certhidea olivacea")
img <- system.file("extdata", "p.Crassirostris.png",
package="rD3plot")
bar <- rd3_addImage(bar,img)
multi <- rd3_multigraph(barplot=bar)
if (FALSE) {
rd3_multiPages(multi,"Graph image example",show=TRUE)
}
Run the code above in your browser using DataLab