OFFSET
0,1
COMMENTS
Sequence is always defined since for s=2^(n+1), 2^n = s^2-sigma(s)*phi(s). - R. J. Mathar, Oct 01 2011
a(38) = 67100672. a(50) = 17179738112. a(56) <= 274877382656. - Donovan Johnson, Oct 02 2011
FORMULA
a(n) = min{k: A069249(k)=2^n}. - R. J. Mathar, Oct 01 2011
PROG
(PARI) a(n)=if(n<0, 0, x=1; while(abs(x^2-sigma(x)*eulerphi(x)-2^n)>0, x++)); x
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Aug 26 2002
EXTENSIONS
Edited and extended by Klaus Brockhaus, Aug 29 2002
a(26) and a(30) from R. J. Mathar, Oct 01 2011
a(25), a(27)-a(29) and a(31)-a(34) from Donovan Johnson, Oct 02 2011
STATUS
approved