A122754 a(n) = 10*n - A101306(n).

8, 15, 20, 23, 32, 39, 42, 43, 50, 51, 60, 63, 72, 79, 82, 89, 90, 99, 102, 111, 118, 119, 126, 127, 130, 139, 146, 149, 150, 157, 160, 169, 172, 173, 174, 183, 186, 193, 196, 203, 204, 213, 222, 229, 232, 233, 242, 249, 252, 253

Offset

1,1

Links

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

Formula

a(n) = Sum_{i=1..n} (10 - A007652(n)).

Mathematica

Table[Sum[10 - Mod[Prime[n], 10], {n, 1, m}], {m, 1, 50}]

Crossrefs

Cf. A101306.

Partial sums of A072003.

Sequence in context: A133157 A014544 A237610 * A355490 A082867 A075713

Adjacent sequences: A122751 A122752 A122753 * A122755 A122756 A122757

Keyword

nonn,base,easy

Author

Roger L. Bagula, Sep 21 2006

Extensions

Definition simplified by the Assoc. Eds. of the OEIS, Mar 27 2010

Status

approved