login
A331756
a(n) = A306302(n)/2.
0
0, 2, 8, 23, 52, 107, 190, 324, 514, 781, 1128, 1604, 2192, 2962, 3896, 5026, 6372, 8030, 9940, 12243, 14874, 17899, 21324, 25324, 29772, 34850, 40496, 46827, 53798, 61687, 70244, 79852, 90348, 101842, 114312, 127946, 142576, 158700, 176048, 194788, 214812
OFFSET
0,2
MATHEMATICA
z[n_] := Sum[If[GCD[i, j] == 1, (n-i+1)(n-j+1), 0], {i, n}, {j, n}];
a[n_] := If[n == 0, 0, (z[n] + n^2 + 2n)/2];
Table[a[n], {n, 0, 33}] (* Jean-François Alcover, Sep 14 2022 *)
CROSSREFS
Cf. A306302.
Sequence in context: A161463 A190021 A014285 * A330152 A079460 A154144
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 04 2020
STATUS
approved