OFFSET
1,1
COMMENTS
LINKS
John Machacek, Egyptian Fractions and Prime Power Divisors, arXiv:1706.01008 [math.NT], 2017.
EXAMPLE
n = 12 is in the sequence because -1/12 + 1/2 + 1/2^2 + 1/3 = 1.
n = 18 is NOT in the sequence because -1/18 + 1/2 + 1/3 + 1/3^2 != 1.
MATHEMATICA
ok[n_] := Total[n/Flatten@ Table[e[[1]] ^ Range[e[[2]]], {e, FactorInteger@ n}]] - 1 == n; Select[Range[10^5], ok] (* Giovanni Resta, May 27 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
John Machacek, May 27 2017
EXTENSIONS
a(20)-a(31) from Giovanni Resta, May 27 2017
a(32)-a(33) from Giovanni Resta, Jun 26 2017
STATUS
approved