OFFSET
0,2
LINKS
Eric Weisstein's World of Mathematics, Hypercube Line Picking
EXAMPLE
0.12947724200657085786...
MATHEMATICA
Clear[f]; f[n_] := f[n] = RealDigits[ NIntegrate[ Erf[x]^3/(E^(2*x^2)*x), {x, 0, n}, WorkingPrecision -> 110], 10, 105] // First; f[10]; f[n = 20]; While[ f[n] != f[n-10], n = n+10]; A115290 = f[n] (* Jean-François Alcover, Feb 07 2013 *)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Eric W. Weisstein, Jan 19 2006
STATUS
approved