data(ITS1, ITS2, meta)
data <- list(ITS1=ITS1, ITS2=ITS2)
# dissim.alleig.plot returns a ggplot2 object:
my.eig.plot <- dissim.alleig.plot(data)
my.eig.plot # view the plot
# update ggplot theme
require("grid")
new_theme <-RAM.color()
my.eig.plot <- my.eig.plot + new_theme
my.eig.plotRun the code above in your browser using DataLab