lib/unifqsum.R

unifqsum <-
function(x){
  x <- matrix(x,ncol=2)
  c(x[1,1],sum(x[,2]),length(x[,1]))
}
taylerablake/thin-plate-splines documentation built on May 8, 2019, 11:16 p.m.