OFFSET
1,2
MATHEMATICA
With[{upto=80}, Complement[Range[upto], Range[0, Floor[Sqrt[upto-2]]]^2+2]] (* Harvey P. Dale, Jun 22 2013 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jaroslav Krizek, Aug 14 2009
EXTENSIONS
Redefined for simplicity by removing 2, R. J. Mathar, Aug 31 2009
STATUS
approved