|
|
A195606
|
|
Numerator of floor(gamma*10^n)/10^n, where gamma=A001620 is the Euler-Mascheroni constant.
|
|
2
|
|
|
0, 1, 57, 577, 1443, 57721, 115443, 1443039, 28860783, 36075979, 5772156649, 5772156649, 577215664901, 1154431329803, 57721566490153, 144303916225383, 180379895281729, 28860783245076643, 28860783245076643, 2886078324507664303
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
Numerator of the decimal fraction of gamma=0.5772... truncated to a given number of decimal places.
|
|
LINKS
|
|
|
EXAMPLE
|
a(3) = 577 is the numerator of 0.577 = 577/1000.
a(4) = 1443 is the numerator of 0.5772 = 5772/10000 = 1443/2500.
|
|
MATHEMATICA
|
Numerator[Table[Floor[EulerGamma*10^n]/10^n, {n, 0, 50}]] (* G. C. Greubel, Aug 27 2018 *)
|
|
PROG
|
(PARI) a(n, c=Euler)=numerator(c\.1^n/10^n) \\ M. F. Hasler, Sep 21 2011
(Magma) R:=RealField(100); [Numerator(Floor(EulerGamma(R)*10^n)/10^n): n in [0..50]]; // G. C. Greubel, Aug 27 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|