A161522 prime(n)*( prime(n)-n ).

2, 3, 10, 21, 66, 91, 170, 209, 322, 551, 620, 925, 1148, 1247, 1504, 1961, 2478, 2623, 3216, 3621, 3796, 4503, 4980, 5785, 6984, 7575, 7828, 8453, 8720, 9379, 12192, 12969, 14248, 14595, 16986, 17365, 18840, 20375, 21376, 23009, 24702, 25159, 28268, 28757

Offset

1,1

Links

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

Formula

a(n) = A000040(n)*A014689(n) = A001248(n)-A033286(n).

Mathematica

f[n_]:=Module[{pn=Prime[n]}, pn(pn-n)]; Array[f, 50] (* Harvey P. Dale, Sep 23 2011 *)

Crossrefs

Cf. A000040, A014689.

Sequence in context: A069565 A139694 A064497 * A120484 A113202 A079078

Adjacent sequences: A161519 A161520 A161521 * A161523 A161524 A161525

Keyword

nonn

Author

Juri-Stepan Gerasimov, Jun 12 2009

Extensions

Entries checked by R. J. Mathar, Sep 23 2009

Status

approved