Mercurial > repos > iuc > dropletutils

diff scripts/dropletutils.Rscript @ 8:a9caad671439 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/dropletutils/ commit 9d465ee72398a8a74fe499a2e4b74f507a5845cc"
author iuc
date Mon, 05 Jul 2021 13:40:00 +0000
parents 2c1200fba922
children
line wrap: on
line diff
--- a/scripts/dropletutils.Rscript	Thu Jan 07 19:36:54 2021 +0000
+++ b/scripts/dropletutils.Rscript	Mon Jul 05 13:40:00 2021 +0000
@@ -161,13 +161,12 @@
     o <- order(brout$rank)
     lines(brout$rank[o], brout$fitted[o], col = "red")
 
-    abline(h = brout$knee, col = "dodgerblue", lty = 2)
-    abline(h = brout$inflection, col = "forestgreen", lty = 2)
+    abline(h = metadata(brout)$knee, col = "dodgerblue", lty = 2)
+    abline(h = metadata(brout)$inflection, col = "forestgreen", lty = 2)
     legend("bottomleft", lty = 2, col = c("dodgerblue", "forestgreen"),
            legend = c("knee", "inflection"))
     dev.off()
-
-    print(paste("knee =", brout$knee, ", inflection = ", brout$inflection))
+    print(paste("knee =", metadata(brout)$knee, ", inflection = ", metadata(brout)$inflection))
 }
 
 ## Main