login
A083501
Cube roots arising in A083500.
2
2, 3, 4, 5, 6, 7, 4, 9, 7, 11, 12, 13, 9, 9, 16, 17, 18, 7, 11, 21, 16, 23, 24, 25, 26, 9, 10, 25, 30, 31, 25, 33, 34, 35, 11, 13, 26, 39, 16, 41, 42, 25, 36, 45, 16, 47, 48, 49, 18, 51, 52, 29, 54, 19, 56, 25, 49, 59, 60, 61, 47, 25, 16, 65, 61, 67, 29, 69, 70, 51, 72, 25, 64, 47
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
Cf. A083500.
Sequence in context: A328477 A332230 A319999 * A007922 A007948 A355261
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