R/myFunc_errorbars.R

In jcapelladesto/isoSCAN: Automatic Integration for GC-CI-MS Isotope Labeling Data

Defines functions myFunc.errorbars

Documented in myFunc.errorbars

#' Mean +- Standard Deviation
#' 
#' Error plotting for metBarPlot
#' @export
myFunc.errorbars  <-  function(x) {
	x <- na.omit(x)
	data.frame(y = mean(x),
						 ymin = mean(x)-sd(x),
						 ymax = mean(x)+sd(x))
}