This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A163152 #10 May 16 2020 17:06:16
%S A163152 2,3,7,101,80630964769,1394313503224447816939,
%T A163152 87674799670795146675673859587,
%U A163152 62607220478448273296879161314388228250413,79074320470247928120049519839632230336234433216761019,77355497906663686399579348109210219558359416885618588905259034616641337958059
%N A163152 Primes of the form PartitionsP[p], p are prime numbers.
%t A163152 f[n_]:=PartitionsP[n]; lst={};Do[p=Prime[n];If[PrimeQ[f[p]],AppendTo[lst,f[p]]],{n,6!}];lst
%t A163152 Select[PartitionsP[Prime[Range[1000]]],PrimeQ] (* _Harvey P. Dale_, May 16 2020 *)
%o A163152 (PARI) forprime(p=2,1e4,k=numbpart(p);if(isprime(k),print1(k",")))
%Y A163152 Cf. A098145, A163150, A163151, A049575.
%K A163152 nonn
%O A163152 1,1
%A A163152 _Vladimir Joseph Stephan Orlovsky_, Jul 21 2009
%E A163152 Program by _Charles R Greathouse IV_, Oct 12 2009
%E A163152 More terms from _Harvey P. Dale_, May 16 2020