OFFSET
1,1
COMMENTS
a(33) > 2300000 if it exists. - R. J. Mathar, Apr 21 2008
MAPLE
A000005 := proc(n) numtheory[tau](n) ; end: A137947 := proc(n) local k, o, works ; for k from 2 do works := true ; for o from 1 to n do if signum(A000005(o)-A000005(o+1)) <> signum(A000005(k+o-1)-A000005(k+o)) then works := false ; break ; fi ; od: if works then RETURN(k) ; fi ; od: end: for n from 1 do print(n, A137947(n)) ; od: # R. J. Mathar, Apr 21 2008
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Feb 24 2008, Mar 09 2008
EXTENSIONS
More terms from R. J. Mathar, Apr 21 2008
STATUS
approved