tmpDf <- data.frame(lo = c(1, 2, 3),
mean = c(1.5, 3, 5),
hi = c(2, 4, 10),
color = c('green', 'red', 'blue'));
### A simple diamond plot
diamondPlot(tmpDf);
### A diamond plot using the specified colours
diamondPlot(tmpDf, colorCol = 4);
### A diamond plot using automatically generated colours
### using a gradient
diamondPlot(tmpDf, generateColors=c('green', 'red'));
### A diamond plot using automatically generated colours
### using a gradient, specifying the minimum and maximum
### possible values that can be attained
diamondPlot(tmpDf, generateColors=c('green', 'red'),
fullColorRange=c(1, 10));
Run the code above in your browser using DataLab