Displaying 1 result from an estimated 1 matches for "tp4635309p4635316".
Did you mean:
tp4630309p4630316
2012 Jul 03
1
integral with error:non-finite function value
Hi guys,
I'm trying to use the the integral function to estimate the area under a
PDF and a crossing curve. first I stated the function with several vectors
in it:
fn=function(a,b,F,mu,alpha,xi)
{
x<-vector()
fs<-function(x)
{
c <- (mu+(alpha*(1-(1-F)^xi)/xi))
tmp <- (1 + (xi * (x - mu))/alpha)
((as.numeric(tmp > 0) * (tmp^(-1/xi - 1) *