|
%I #5 Nov 13 2013 17:58:28
%S 0,4,6,12,14,16,18,20,24,32,36,38,44,48,52,54,56,60,68,72,76,82,88,90,
%T 92,102,104,114,118,132,134,138,140,144,146,148,150,152,156,162,164,
%U 166,168,172,178,182,186,188,190,192,194,196,202,204,208,210,212,214,216
%N Even numbers with an odd number of partitions.
%t Select[2*Range[0,150],OddQ[PartitionsP[#]]&] (* _Harvey P. Dale_, Nov 13 2013 *)
%Y Cf. A000041, A005843, A052002, A127219, A154797, A163096, A163099.
%K nonn
%O 1,2
%A _Omar E. Pol_, Aug 09 2009
%E More terms from _Sean A. Irvine_, Oct 26 2009
|
