|
| |
|
|
A121558
|
|
Primes of the form n + partition number of n.
|
|
3
| |
|
|
2, 3, 5, 17, 23, 31, 73, 97, 127, 167, 191, 797, 1021, 1153, 1301, 3313, 9851, 40099, 206939, 345953, 444893, 570181, 2032409, 10327297, 15757649, 40982701, 69545527, 281138239, 657667789, 1333640927, 32173820179, 48626519377
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Numbers n such that n + A000009(n) is prime are in A121557.
|
|
|
LINKS
| Robert G. Wilson v, Table of n, a(n) for n = 1..366 . [From Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 27 2009]
|
|
|
MATHEMATICA
| okQ[n_]:=PrimeQ[n+PartitionsQ[n]]; genno[x_]:=x+PartitionsQ[x]; genno/@Select[Range[30000], okQ] [From Harvey P. Dale (hpd1(AT)nyu.edu), Jul 25 2009]
|
|
|
PROG
| (PARI) P=prod(k=1, 1000, 1+x^k, 1+x*O(x^1000)); for(n=1, 1000, t=n+polcoeff(P, n); if(isprime(t), print1(t, ", "))) [From Hagen von Eitzen (math(AT)von-eitzen.de), Jul 25 2009]
(PARI) for(n=1, 1e3, if(isprime(t=n+numbpart(n)), print1(t", "))) \\ Charles R Greathouse IV, Feb 15 2011
|
|
|
CROSSREFS
| Cf. A000009, A000040, A121557.
Sequence in context: A111632 A049547 A049577 * A180474 A155978 A106859
Adjacent sequences: A121555 A121556 A121557 * A121559 A121560 A121561
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jonathan Vos Post (jvospost3(AT)gmail.com), Aug 07 2006, Aug 09 2006
|
|
|
EXTENSIONS
| Filled in terms following 3313, and corrected all subsequent terms. - Harvey P. Dale (hpd1(AT)nyu.edu), Hagen von Eitzen (math(AT)von-eitzen.de) and Ray Chandler, Jul 25 2009
Edited by N. J. A. Sloane, Aug 17 2009
|
| |
|
|
