Remove["Global`*"] f= ; (* Funktion eingeben *) xu= ; (* untere Integrationsgrenze *) xo= ; (* obere Integrationsgrenze *) NIntegrate[f,{x,xu,xo}]
Falls die Funktion im Integrationsbereich Unendlichkeitsstellen hat, versagt die numerische Integration. Dann muß mit dem CauchyPrincipalValue gearbeitet werden. Als Parameter sind dann die Unendlichkeitsstellen anzugeben.
Needs["NumericalMath`CauchyPrincipalValue`"] x1= ; (* erste Unendlichkeitsstelle *) x2= ; (* mögliche zweite Unendlichkeitsstelle *) CauchyPrincipalValue[f,{x,xu,{x1},{x2},xo}]