R/marginalize_out.R

#' @export
marginalize_out = function(a, index){

  indices = 1:length(dim(a))


  apply(a, indices[-index], mean)
}
davharris/sdmstack documentation built on May 14, 2019, 9:29 p.m.