Search: id:A038601 Results 1-1 of 1 results found. %I A038601 %S A038601 2,3,5,13,157,491,863,1621,2633,5347,8117,13513,35227,62311,76367,84017, %T A038601 141637,170537,189353,192667,201821,216617,251677,269257,288203,293621, %U A038601 353807,366103,367621,372023,441703,444167,478571,518657,582371,626333 %N A038601 Prime numbers p such that the number of partitions of p is also a prime. %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences. . %H A038601 Hisanori Mishima, Factorizations of many number sequences.. %e A038601 5 = (1+1+1+1+1+1,1+1+1+2,1+1+3,1+4,1+2+2,2+3,5) - partition(5) = 7; 5 and 7 are primes. %t A038601 Do[ If[ PrimeQ[n] && PrimeQ[ PartitionsP[n]], Print[n]], {n, 1, 10^5} ] %Y A038601 Cf. A046063, A000041, A070177. %Y A038601 Sequence in context: A041047 A120494 A164825 this_sequence A114747 A041639 A006985 %Y A038601 Adjacent sequences: A038598 A038599 A038600 this_sequence A038602 A038603 A038604 %K A038601 nonn %O A038601 0,1 %A A038601 Jeff Burch (gburch(AT)erols.com) %E A038601 More terms from Simon Plouffe (simon.plouffe(AT)gmail.com) %E A038601 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 29 2001 %E A038601 Terms after 84017 added by Jacques Tramu (echolalie(AT)echolalie.com), Jun 26 2005 %E A038601 Corrected by T. D. Noe (noe(AT)sspectra.com), Oct 31 2006 Search completed in 0.001 seconds