|
|
A021378
|
|
Decimal expansion of 1/374.
|
|
0
|
|
|
0, 0, 2, 6, 7, 3, 7, 9, 6, 7, 9, 1, 4, 4, 3, 8, 5, 0, 2, 6, 7, 3, 7, 9, 6, 7, 9, 1, 4, 4, 3, 8, 5, 0, 2, 6, 7, 3, 7, 9, 6, 7, 9, 1, 4, 4, 3, 8, 5, 0, 2, 6, 7, 3, 7, 9, 6, 7, 9, 1, 4, 4, 3, 8, 5, 0, 2, 6, 7, 3, 7, 9, 6, 7, 9, 1, 4, 4, 3, 8, 5, 0, 2, 6, 7, 3, 7, 9, 6, 7, 9, 1, 4, 4, 3, 8, 5, 0, 2
(list;
constant;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
Table of n, a(n) for n=0..98.
|
|
FORMULA
|
a(n)=(1/640)*{147*(n mod 16)-173*[(n+1) mod 16]+67*[(n+2) mod 16]+27*[(n+3) mod 16]-93*[(n+4) mod 16]+347*[(n+5) mod 16]-53*[(n+6) mod 16]-13*[(n+7) mod 16]+147*[(n+8) mod 16]-53*[(n+9) mod 16]-133*[(n+10) mod 16]+187*[(n+11) mod 16]-13*[(n+12) mod 16]-133*[(n+13) mod 16]-53*[(n+14) mod 16]+227*[(n+15) mod 16]}-5*[C(2*n,n) mod 2], with n>=0 [From Paolo P. Lava, Nov 11 2009]
|
|
MATHEMATICA
|
Join[{0, 0}, RealDigits[1/374, 10, 120][[1]]] (* or *) PadRight[{0}, 120, {5, 0, 2, 6, 7, 3, 7, 9, 6, 7, 9, 1, 4, 4, 3, 8}] (* Harvey P. Dale, Aug 13 2018 *)
|
|
CROSSREFS
|
Sequence in context: A020771 A242113 A261804 * A329246 A201891 A198430
Adjacent sequences: A021375 A021376 A021377 * A021379 A021380 A021381
|
|
KEYWORD
|
nonn,cons
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
STATUS
|
approved
|
|
|
|