login
A021796
Decimal expansion of 1/792.
1
0, 0, 1, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6
OFFSET
0,4
EXAMPLE
0.001262626262626262626262626262626262626262626262626...
MATHEMATICA
First[RealDigits[1/792, 10, 100, -1]] (* or *)
PadRight[{0, 0, 1}, 100, {6, 2}] (* Paolo Xausa, Sep 07 2025 *)
PROG
(Scheme) (define (A021796 n) (cond ((<= n 1) 0) ((= 2 n) 1) ((even? n) 6) (else 2))) ;; Antti Karttunen, Sep 14 2017
CROSSREFS
Cf. A021444.
Sequence in context: A128045 A011325 A010696 * A127356 A232273 A307892
KEYWORD
nonn,cons,easy
STATUS
approved