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 A163998 #26 Oct 31 2023 19:25:04 %S A163998 2,3,5,7,13,17,23,29,37,41,43,53,61,67,71,73,83,89,107,127,139,157, %T A163998 173,181,193,199,211,223,229,233,239,251,257,263,269,277,281,283,293, %U A163998 311,313,331,349,367,373,389,401,421,433,443,457,461,463,467,479,491,499 %N A163998 Primes p having the same parity as the number of partitions of p. %C A163998 Except the first term, primes with an odd number of partitions. %C A163998 Primes in A194798. - _Omar E. Pol_, Mar 17 2012 %e A163998 7 is in the sequence because the number of partitions of 7 is equal to 15 and both 7 and 15 have the same parity. %t A163998 Select[Prime[Range[100]], Mod[PartitionsP[#] - #, 2] == 0 &] (* _T. D. Noe_, Jan 30 2012 *) %Y A163998 Cf. A000040, A000041, A040051, A052002, A163997, A194798. %K A163998 nonn %O A163998 1,1 %A A163998 _Omar E. Pol_, Aug 09 2009 %E A163998 More terms from _D. S. McNeil_, May 10 2010