R/xybarplot.R

Defines functions `xybarplot`

`xybarplot` <-
function(x, y, wbox = min(diff(x))*0.9, ofs=0.5, ...) {
  barplot(y, wbox, space = c(x[1] - wbox * ofs, (diff(x) - wbox)) / wbox, ...)
}
rsachse/limnotools documentation built on Jan. 8, 2021, 5:37 a.m.