OFFSET
1,2
COMMENTS
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..10000
EXAMPLE
For n = 3:
k 2*3*5-k 2*3*5-k GCD
1 29 31 1
2 28 32 4
3 27 33 3
4 26 34 2
For n = 4:
k 2*3*5*7-k 2*3*5*7-k GCD
1 29 31 1
2 28 32 4
3 27 33 3
4 26 34 2
MATHEMATICA
z = 120; f[n_] := f[n] = Product[Prime[k], {k, 1, n}];
t[n_, k_] := t[n, k] = GCD[f[n] - k, f[n] + k];
Table[t[50, k], {k, 1, z}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Sep 17 2015
STATUS
approved