login
A083503
n-th powers arising in A083502.
3
3, 3, 4, 3, 6, 5, 8, 3, 4, 9, 12, 5, 14, 13, 16, 3, 18, 5, 20, 3, 4, 21, 24, 5, 6, 25, 4, 13, 30, 11, 32, 3, 34, 33, 36, 5, 38, 37, 16, 3, 42, 5, 44, 21, 16, 45, 48, 5, 8, 9, 52, 5, 54, 5, 16, 13, 7, 57, 60, 7, 62, 61, 4, 3, 66, 23, 68, 13, 70, 29, 72, 5, 74, 73, 16, 37, 78, 17, 80, 3, 4
OFFSET
1,1
MATHEMATICA
Do[i = 2; While[k = (i^n - 1)/n - n; !IntegerQ[k], i++ ]; Print[i], {n, 2, 81}]
CROSSREFS
Sequence in context: A029882 A163523 A151664 * A342137 A062069 A163375
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