Description Usage Arguments Examples
Create overview bubble graph of GLRI data. Testing Mac.
1 2 3 4 5 6 | createBubbleGraph(DF, xCol = "class", yCol = "site", colCol = "max",
radCol = "percentDetect", colorTitle = "Maximum Concentration",
radiusTitle = "Frequency of detection [%]", colorScale = c(0.01, 0.1, 1,
10, Inf), radiusScale = c(0, 20, 40, 60, 80, 100), countCol = "count",
savePDF = FALSE, fileName = "bubble.pdf", colorGradient = FALSE,
radiusGradient = TRUE)
|
DF |
data.frame |
xCol |
string column from DF defining x axis |
yCol |
string column from DF defining y axis |
colCol |
string column from DF defining color |
radCol |
string column from DF defining radius |
colorTitle |
string title for color legend |
radiusTitle |
string title for radius legend |
colorScale |
vector scale for color |
radiusScale |
vector scale for radius |
countCol |
string column from DF defining count |
savePDF |
logical |
fileName |
string |
colorGradient |
logical use a linear color gradient or discrete colors (number set by colorScale) |
radiusGradient |
logical use a linear radius gradient or discrete radii (number set by radiusScale) |
1 2 3 4 5 6 7 8 9 10 11 12 | genericCensoringValue <- function(qualifier,value, detectionLimit){
valueToUse <- ifelse("<" == qualifier, detectionLimit, value)
return(valueToUse)
}
filteredData <- filterGLRIData(QWPortalGLRI, genericCensoringValue)
wideDF <- wideGLRIData(filteredData)
keyDF <- pcodeINFO
classCol <- "class"
pCodeCol <- "parameter_cd"
dataByClass <- PCodeClassSummary(wideDF,keyDF,pCodeCol,classCol)
summaryByClass <- statClassSummary(dataByClass)
createBubbleGraph(summaryByClass, xCol="class", yCol="site", colCol="max", radCol="percentDetect",colorTitle="Maxiumum",radiusTitle="Detection",countCol="count")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.