OFFSET
1,2
FORMULA
MAPLE
MATHEMATICA
Table[Total[Select[IntegerPartitions[2 n, {2}], AllTrue[#, SquareFreeQ]&][[;; , 1]]], {n, 60}] (* Harvey P. Dale, Apr 22 2023 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Wesley Ivan Hurt, Dec 29 2016
STATUS
approved