R/productsef.R

Defines functions productsef

productsef <-
function(f, k, n, j){
res<-1
for(i in 0:(n-j-1)) res<-res*(1-f*k^i)
res
}

Try the carcass package in your browser

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

carcass documentation built on Oct. 3, 2023, 9:08 a.m.