OFFSET
1,2
EXAMPLE
79 is a term because 79 is a prime power and 79 = 1 + 2 + 3 + 4 + 5 + 7 + 8 + 9 + 11 + 13 + 16 = 1 + 2 + 3 + 2^2 + 5 + 7 + 2^3 + 3^2 + 11 + 13 + 2^4.
MATHEMATICA
Select[Accumulate[Select[Range[2000], # == 1 || PrimePowerQ[#] &]], # == 1 || PrimePowerQ[#] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Aug 14 2023
STATUS
approved