Skip to content

Instantly share code, notes, and snippets.

@robinkraft
Last active December 10, 2015 14:38
Show Gist options
  • Select an option

  • Save robinkraft/4448738 to your computer and use it in GitHub Desktop.

Select an option

Save robinkraft/4448738 to your computer and use it in GitHub Desktop.
FORMA costs, by workflow step
# Dataframe:
structure(list(step = structure(1:10, .Label = c("adjusted",
"estimated", "fires", "forma-tap", "ndvi-filtered", "ndvi-series",
"neighbors", "rain", "rain-series", "trends"), class = "factor"),
storage = c(147, 4.8, 4.9, 15.4, 93, 715.1, 25.7, 0.22, 407.8,
21.39), time = c(100L, 22L, 33L, 16L, 100L, 190L, 53L, 6L,
26L, 116L), storecost = c(6.51913043478261, 0.212869565217391,
0.217304347826087, 0.68295652173913, 4.12434782608696, 31.7131304347826,
1.13973913043478, 0.00975652173913044, 18.0850434782609,
0.9486), timecost = c(13.7, 3.014, 4.521, 2.192, 13.7, 26.03,
7.261, 0.822, 3.562, 15.892)), .Names = c("step", "storage",
"time", "storecost", "timecost"), row.names = c(NA, -10L), class = "data.frame")
# plot it:
ggplot(v[order(v$storage),], aes(x=v$storecost, y=v$timecost, label=v$step))
+ geom_point(shape=1)
+ geom_text(label=v$step, vjust=-1, size=3)
+ xlim(0,35)
+ ylim(0,35)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment