login
A225755
Decimal expansion of the constant obtained through Lüroth retro-expansion of the prime sequence.
1
2, 3, 6, 7, 8, 7, 5, 3, 1, 9, 8, 0, 7, 7, 0, 9, 6, 0, 5, 0, 3, 3, 5, 0, 2, 1, 1, 7, 7, 0, 0, 7, 9, 3, 8, 4, 8, 8, 8, 1, 0, 2, 5, 5, 2, 0, 7, 9, 0, 4, 5, 0, 4, 9, 9, 8, 8, 8, 7, 8, 0, 1, 7, 2, 0, 6, 9, 9, 6, 5, 5, 1, 6, 0, 1, 4, 8, 0, 5, 9, 9, 7, 5, 3, 4, 3, 7, 9, 4, 5, 2, 4, 8, 3, 5, 8, 9, 6, 9, 5, 4, 7, 3, 1, 1
OFFSET
1,1
LINKS
Arnold Knopfmacher and John Knopfmacher, Representations for real numbers via k-th powers of integers, University of Witwatersrand, Johannesburg, South Africa 2050, February 1987.
EXAMPLE
n=2+1/3+1/[(3-1)*3*5]+1/[(3-1)*3*(5-1)*5*7]+... = 2.3678753198077096050335021177007938488810255207904504998...
MAPLE
with(numtheory); A225755:=proc(q) local a, b, n;
b:=3; a:=2+1/b; for n from 3 to q do
b:=b*(ithprime(n-1)-1)*ithprime(n); a:=a+1/b;
od; print(evalf(a, 2000)); end: A225755(10^4);
CROSSREFS
Sequence in context: A245444 A088573 A181514 * A126388 A039247 A377463
KEYWORD
nonn,cons
AUTHOR
Paolo P. Lava, May 28 2013
STATUS
approved