login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A163152 Primes of the form PartitionsP[p], p are prime numbers. 1
2, 3, 7, 101, 80630964769, 1394313503224447816939, 87674799670795146675673859587, 62607220478448273296879161314388228250413, 79074320470247928120049519839632230336234433216761019, 77355497906663686399579348109210219558359416885618588905259034616641337958059 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

MATHEMATICA

f[n_]:=PartitionsP[n]; lst={}; Do[p=Prime[n]; If[PrimeQ[f[p]], AppendTo[lst, f[p]]], {n, 6!}]; lst

Select[PartitionsP[Prime[Range[1000]]], PrimeQ] (* Harvey P. Dale, May 16 2020 *)

PROG

(PARI) forprime(p=2, 1e4, k=numbpart(p); if(isprime(k), print1(k", ")))

CROSSREFS

Cf. A098145, A163150, A163151, A049575.

Sequence in context: A062529 A308917 A058443 * A088120 A230778 A111870

Adjacent sequences:  A163149 A163150 A163151 * A163153 A163154 A163155

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Jul 21 2009

EXTENSIONS

Program by Charles R Greathouse IV, Oct 12 2009

More terms from Harvey P. Dale, May 16 2020

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 16 12:45 EDT 2021. Contains 343037 sequences. (Running on oeis4.)