login
prime(n)*( prime(n)-n ).
0

%I #6 Nov 21 2013 12:49:38

%S 2,3,10,21,66,91,170,209,322,551,620,925,1148,1247,1504,1961,2478,

%T 2623,3216,3621,3796,4503,4980,5785,6984,7575,7828,8453,8720,9379,

%U 12192,12969,14248,14595,16986,17365,18840,20375,21376,23009,24702,25159,28268,28757

%N prime(n)*( prime(n)-n ).

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

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

%Y Cf. A000040, A014689.

%K nonn

%O 1,1

%A _Juri-Stepan Gerasimov_, Jun 12 2009

%E Entries checked by _R. J. Mathar_, Sep 23 2009