OFFSET
1,1
COMMENTS
a(n) < n+1 and a(n) = n+1 over half of the time.
MATHEMATICA
Do[k = 0; While[i = n(n + k) + 1; ! IntegerQ[i^(1/3)], k++ ]; Print[i^(1/3)], {n, 1, 75}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 03 2003
EXTENSIONS
Edited and extended by Robert G. Wilson v, May 11 2003
STATUS
approved