OFFSET
1,1
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..4980 (terms <= 10^4)
MATHEMATICA
Select[Range[150], !SquareFreeQ[PartitionsP[#]]&] (* Harvey P. Dale, Apr 21 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected by Giovanni Resta, Jun 02 2015
STATUS
approved
