|
| |
|
|
A022797
|
|
n-th prime + n-th nonprime.
|
|
3
| |
|
|
3, 7, 11, 15, 20, 23, 29, 33, 38, 45, 49, 57, 62, 65, 71, 78, 85, 88, 95, 101, 105, 112, 117, 124, 133, 139, 142, 147, 151, 157, 172, 177, 185, 188, 199, 202, 209, 217, 222, 229, 236, 239, 251, 255, 260, 263, 276, 289, 295, 298, 303, 311, 315, 326
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| a(n) = A000040(n) + A018252(n). [From Jaroslav Krizek (jaroslav.krizek(AT)atlas.cz), Nov 18 2009]
|
|
|
LINKS
| Harvey P. Dale, Table of n, a(n) for n = 1..1000
|
|
|
MATHEMATICA
| ppnp[terms_]:=Module[{prs=Prime[Range[terms]], nprs, lenprs}, nprs = Complement[Range[Prime[terms]], prs]; lenprs=Length[prs]; Total/@ Thread[{prs, Take[nprs, lenprs]}]]; ppnp[60] (* From Harvey P. Dale, Nov 29 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A191151 A194440 A189364 * A190884 A109507 A160802
Adjacent sequences: A022794 A022795 A022796 * A022798 A022799 A022800
|
|
|
KEYWORD
| nonn,easy,nice
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
| |
|
|
