A180173 a(n) = gcd(prime(n)-2, n).

1, 1, 3, 1, 1, 1, 1, 1, 3, 1, 1, 1, 13, 1, 15, 1, 1, 1, 1, 1, 1, 11, 1, 3, 5, 1, 1, 7, 1, 3, 1, 1, 3, 1, 7, 1, 1, 1, 3, 1, 1, 1, 1, 1, 15, 1, 1, 1, 1, 1, 3, 1, 1, 3, 5, 1, 3, 1, 1, 3, 1, 1, 1, 1, 1, 3, 1, 1, 69, 1, 1, 3, 73, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 3

Offset

1,3

Links

Table of n, a(n) for n=1..102.

Mathematica

Table[GCD[n, Prime[n]-2], {n, 200}]

Crossrefs

Cf. A084309, A084310, A180172.

Sequence in context: A014491 A214071 A226915 * A318668 A322361 A219208

Adjacent sequences: A180170 A180171 A180172 * A180174 A180175 A180176

Keyword

nonn

Author

Zak Seidov, Aug 15 2010

Status

approved