Look at your first function:
Grx<-function(x,r)
{
G0=Grx(x,0)
G0=1;
fu1<-function(t){exp(-t^2/(2*r*(r+1)))*Grx(x,r-1)}
return(integrate(fu1,0,x)$value)
}
It immediately calls itself for infinite recursion. How did you
expect to stop it? I would have expected some type of test before the
call.
Hi,
I wanted to compute the value of the function ifn at certain values of n. But I
am receiving the following error when I was using the following code(given at
the end).
Error: evaluation nested too deeply: infinite recursion / options(expressions=)?
I feel that since the function Grx is re
2 matches
Mail list logo
