%I #2 Mar 31 2012 14:40:14
%S 3,5,8,10,16,20,21,23,26,28,30,39,41,43,45,46,47,48,49,50,51,56,58,59,
%T 63,66,68,70,71,73,76,78,80,82,84,85,86,87,88,92,93,95,96,97,100,102,
%U 103,111,112,113,115,117,120,121,122,123,125,127,129,131,134,135,137
%N Numbers n such that partition number of n^2 is even.
%F A000041(n^2) is even.
%t Select[Range[200],EvenQ[PartitionsP[ #^2]]&]
%Y Cf. A000041, A001560, A052001, A052002, A127219.
%K nonn
%O 1,1
%A _Zak Seidov_, Apr 03 2007