login
A085193
Repeating part of A085192.
5
2, 6, 2, 4, 18, 2, 6, 2, 4, 10, 2, 4, 8, 58, 2, 6, 2, 4, 18, 2, 6, 2, 4, 10, 2, 4, 8, 26, 2, 6, 2, 4, 10, 2, 4, 8, 18, 2, 4, 8, 16, 202, 2, 6, 2, 4, 18, 2, 6, 2, 4, 10, 2, 4, 8, 58, 2, 6, 2, 4, 18, 2, 6, 2, 4, 10, 2, 4, 8, 26, 2, 6, 2, 4, 10, 2, 4, 8, 18, 2, 4, 8, 16, 74, 2, 6, 2, 4, 18, 2, 6, 2, 4, 10
OFFSET
0,1
FORMULA
a(n) = A085192(A081291(n+1)-1).
a(n) = 4*A085193(A085182(n+1)-1) + 2 - (2^A007001(n+1)) if A007001(n+2)==1, otherwise 2^A007001(n+1).
PROG
(MIT/GNU Scheme) (define (A085193 nn) (let ((n (1+ nn))) (cond ((= 1 (A007001 (+ n 1))) (- (* 4 (A085193 (-1+ (A085182 n)))) (- (expt 2 (A007001 n)) 2))) (else (expt 2 (A007001 n))))))
CROSSREFS
Same sequence divided by 2: A085194. Cf. A085190.
Sequence in context: A194953 A057606 A021385 * A220242 A220375 A220430
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jun 14 2003
STATUS
approved