login
A286540
a(n) = gcd(A259934(n), A259934(n-1)) = A009191(A259934(n)).
4
2, 2, 6, 6, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 2, 2, 2, 1, 1, 1, 3, 8, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 2, 2, 2, 6, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 6, 2, 2, 6, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 8, 8, 24, 18, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 2, 2, 2, 2, 6
OFFSET
1,1
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..64800 (computed from the b-file of A259934 provided by Robert Israel)
FORMULA
a(n) = gcd(A259934(n), A259934(n-1)) = gcd(A259934(n), A259935(n)).
a(n) = A009191(A259934(n)).
PROG
(Scheme)
(define (A286540 n) (gcd (A259934 n) (A259934 (- n 1))))
(define (A286540 n) (gcd (A259934 n) (A259935 n)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, May 21 2017
STATUS
approved