Closed leppott closed 6 years ago
Example code fails.
myIndex <- "MBSS.2005.Fish"
thresh <- metrics_scoring
(myMetrics.Fish <- as.character(droplevels(unique(thresh[thresh[,"Index.Name"]==myIndex,"Metric"]))))
myDF.Fish <- taxa_fish myMetric.Values.Fish <- metric.values(myDF.Fish, "SampleID", "fish", myMetrics.Fish) View(myMetric.Values.Fish)
Extra parameter. Hold over from previous version of the code. Remove "SampleID".
Fixed in v1.0.1.
https://github.com/leppott/MBSStools/commit/5904ca6830d66a4caab96d80739681d6d7d90abf
Example code fails.
Metrics, MBSS Index, Fish
myIndex <- "MBSS.2005.Fish"
Thresholds
thresh <- metrics_scoring
get metric names for myIndex
(myMetrics.Fish <- as.character(droplevels(unique(thresh[thresh[,"Index.Name"]==myIndex,"Metric"]))))
Taxa Data
myDF.Fish <- taxa_fish myMetric.Values.Fish <- metric.values(myDF.Fish, "SampleID", "fish", myMetrics.Fish) View(myMetric.Values.Fish)