OFFSET
1,3
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..1000
EXAMPLE
a(23) = gcd(prime(23)+1,23+1) = gcd(83+1,24) = gcd(84,24) = 12*gcd(7,2) = 12.
MATHEMATICA
Table[GCD[Prime[w]+1, w+1], {w, 1, 128}]
PROG
(PARI) { for (n=1, 1000, write("b066752.txt", n, " ", gcd(prime(n) + 1, n + 1)) ) } \\ Harry J. Smith, Mar 22 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jan 16 2002
EXTENSIONS
More terms from Labos Elemer, Jun 13 2003
STATUS
approved