I'm trying to calculate the function:
CoshIntegral[x] Sinh[x] - Cosh[x] SinhIntegral[x]
unfortunately mathematicaUnfortunately Mathematica seems to hit a point (x~20) and things become unstable (see plot below), there shouldn't be any infinities in the area, so I am rather confused as to what is going on!
Does anyone know why this is happening and how to fix it? Cheers, Jake