OFFSET
-1,1
COMMENTS
This is the probability that k, k+1, ... k+6 all are cubefree, or equivalently, the asymptotic density of A328016.
LINKS
Leon Mirsky, Arithmetical pattern problems relating to divisibility by rth powers, Proceedings of the London Mathematical Society, Vol. s2-50, No. 1 (1949), pp. 497-508.
EXAMPLE
0.084543731398668546996036273756803789380467263312806...
MATHEMATICA
$MaxExtraPrecision = 600; m = 600; c = LinearRecurrence[{0, 0, 7}, {0, 0, -7}, m]; RealDigits[(1/8) * Exp[3*NSum[Indexed[c, n]*(PrimeZetaP[n] - 1/2^n)/n, {n, 2, m}, NSumTerms -> m, WorkingPrecision -> m]], 10, 100][[1]]
PROG
(PARI) prodeulerrat(1 - 7/p^3) \\ Amiram Eldar, Mar 17 2021
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Amiram Eldar, Oct 01 2019
EXTENSIONS
More terms from Vaclav Kotesovec, May 29 2020
STATUS
approved