login
A114170
Numbers n such that p(10n) is prime, where p(n) is the number of partitions of n.
13
44, 1108, 1302, 1504, 1829, 1847, 2267, 2537, 3060, 3289, 3324, 3997, 4138, 6175, 6505, 7266, 9733, 10177, 11483, 12708, 12881, 13632, 14136, 14414, 15917, 16409, 17614, 19133, 19381, 21966, 22967, 30565, 30744, 31655, 33783
OFFSET
1,1
LINKS
MATHEMATICA
Select[ Range[20000], PrimeQ[PartitionsP[10# ]] &]
PROG
(PARI) is(n)=isprime(numbpart(10*n)) \\ Charles R Greathouse IV, Feb 17 2017
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Nov 14 2005
STATUS
approved