R/DiffMeans.R

DiffMeans <- function (y, tr, tl, ...) {
  ## Difference of means
  mean.default(y[tr == tl]) - mean.default(y[tr != tl])
}

Try the NPC package in your browser

Any scripts or data that you put into this service are public.

NPC documentation built on May 2, 2019, 5:07 a.m.