OFFSET
1,1
EXAMPLE
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
MAPLE
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
MATHEMATICA
Select[Range[2, 250, 2], EvenQ[PartitionsP[#]]&] (* Jean-François Alcover, Aug 28 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Mar 28 2007
EXTENSIONS
More terms a(50)-a(56) from Omar E. Pol, Mar 18 2012
STATUS
approved