R/vpow.R

Defines functions vpow

vpow <-
function(x,sill,range)
{
  if( range==0) return(rep(sill,length(x)))
  sill * x^range
}

Try the ltsk package in your browser

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

ltsk documentation built on Sept. 3, 2023, 1:06 a.m.