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 A127219 #18 Aug 28 2024 09:36:44 %S A127219 2,8,10,22,26,28,30,34,40,42,46,50,58,62,64,66,70,74,78,80,84,86,94, %T A127219 96,98,100,106,108,110,112,116,120,122,124,126,128,130,136,142,154, %U A127219 158,160,170,174,176,180,184,198,200,206,224,228,230,236,246,248 %N A127219 Even numbers with an even number of partitions. %e A127219 10 is in the sequence because the number of partitions of 10 is equal to 42 and both 10 and 42 are even numbers. - _Omar E. Pol_, Mar 18 2012 %p A127219 with(combinat): a:=proc(n) if numbpart(2*n) mod 2 = 0 then 2*n else fi end: seq(a(n),n=1..100); # _Emeric Deutsch_, Mar 31 2007 %t A127219 Select[Range[2, 250, 2], EvenQ[PartitionsP[#]]&] (* _Jean-François Alcover_, Aug 28 2024 *) %Y A127219 Cf. A000041, A005843, A154798. %K A127219 nonn %O A127219 1,1 %A A127219 _Zak Seidov_, Mar 28 2007 %E A127219 More terms a(50)-a(56) from _Omar E. Pol_, Mar 18 2012