login
Numbers n such that p(10n) is prime, where p(n) is the number of partitions of n.
13

%I #8 Aug 11 2019 05:30:36

%S 44,1108,1302,1504,1829,1847,2267,2537,3060,3289,3324,3997,4138,6175,

%T 6505,7266,9733,10177,11483,12708,12881,13632,14136,14414,15917,16409,

%U 17614,19133,19381,21966,22967,30565,30744,31655,33783

%N Numbers n such that p(10n) is prime, where p(n) is the number of partitions of n.

%H Max Alekseyev, <a href="/A114170/b114170.txt">Table of n, a(n) for n = 1..607</a>

%t Select[ Range[20000], PrimeQ[PartitionsP[10# ]] &]

%o (PARI) is(n)=isprime(numbpart(10*n)) \\ _Charles R Greathouse IV_, Feb 17 2017

%Y Cf. A000041, A046063, A114165, A111389, A111045, A114166, A111036, A114167, A114168, A114169, A114170, A070177.

%K nonn

%O 1,1

%A _Robert G. Wilson v_, Nov 14 2005