R/diracS1.R

"diracS1" <-
function(u,x)
{
if(u>x) diracS1<-1 else diracS1<-0
	resultdiracS1<-diracS1
}

Try the fgac package in your browser

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

fgac documentation built on May 2, 2019, 6:07 a.m.