login
A049622
a(n) = T(n,n+2), array T as in A049615.
4
1, 2, 6, 9, 16, 19, 28, 33, 44, 49, 64, 67, 84, 93, 110, 119, 140, 143, 168, 179, 204, 215, 244, 251, 282, 297, 328, 339, 378, 381, 420, 435, 470, 495, 538, 551, 596, 613, 658, 675, 730, 733, 788, 811, 860, 883, 940, 949, 1012, 1039, 1098, 1119, 1184, 1201, 1270, 1307, 1370, 1393, 1468, 1471, 1548, 1577
OFFSET
0,2
LINKS
MATHEMATICA
T[n_, k_]:= Length[Select[Flatten[Table[{x, y}, {x, 0, n}, {y, 0, k}], 1], GCD @@ # > 1 &]]; Table[T[n, n+2], {n, 0, 65}] (* G. C. Greubel, Dec 16 2019 *)
KEYWORD
nonn
EXTENSIONS
Terms a(37) onward added by G. C. Greubel, Dec 16 2019
STATUS
approved