A115014 a(n) = Sum_{i=1..n, gcd(6,i)=1} i.

1, 1, 1, 1, 6, 6, 13, 13, 13, 13, 24, 24, 37, 37, 37, 37, 54, 54, 73, 73, 73, 73, 96, 96, 121, 121, 121, 121, 150, 150, 181, 181, 181, 181, 216, 216, 253, 253, 253, 253, 294, 294, 337, 337, 337, 337, 384, 384, 433, 433, 433, 433, 486, 486, 541, 541, 541, 541, 600, 600, 661

Offset

1,5

Links

Table of n, a(n) for n=1..61.

Mathematica

Table[Sum[k*KroneckerDelta[GCD[6, k], 1], {k, n}], {n, 80}] (* Wesley Ivan Hurt, Jan 20 2024 *)

Crossrefs

Cf. A115012.

Sequence in context: A272349 A262850 A262849 * A168332 A214828 A229828

Adjacent sequences: A115011 A115012 A115013 * A115015 A115016 A115017

Keyword

nonn,easy

Author

N. J. A. Sloane, Feb 24 2006

Status

approved