OFFSET
1,9
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
t1=Table[Prime[n+1]-Prime[n], {n, 1, 256}]; t2=Table[GCD[Prime[n+1]-Prime[n], 65536], {n, 1, 256}]; t1/t2
#/2^IntegerExponent[#, 2]&/@Differences[Prime[Range[110]]] (* Harvey P. Dale, Feb 20 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Dec 03 2004
STATUS
approved