|
| |
|
|
A066023
|
|
(a(n)^7+1)/(n^7+1) is the smallest integer > 1.
|
|
4
| |
|
|
3, 8, 27, 64, 125, 216, 343, 512, 729, 1000, 1331, 1728, 2197, 2744, 3375, 4096, 4913, 5832, 6859, 8000, 9261, 10648, 12167, 13824, 15625, 17576, 19683, 21952, 24389, 27000, 29791, 32768, 35937, 39304, 42875, 46656, 50653, 54872, 59319, 64000
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,200
|
|
|
MATHEMATICA
| Do[k = 1; While[m = (k^7 + 1)/(n^7 + 1); m < 2 || !IntegerQ[m], k++ ]; Print[k], {n, 1, 40} ]
|
|
|
PROG
| (PARI) { for (n=1, 200, f=n^7 + 1; a=n + 1; while (frac((a^7 + 1)/f) !=0, a++); write("b066023.txt", n, " ", a) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Nov 07 2009]
|
|
|
CROSSREFS
| Cf. A065964.
Sequence in context: A118165 A066020 A066018 * A148823 A205503 A148824
Adjacent sequences: A066020 A066021 A066022 * A066024 A066025 A066026
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 11 2001
|
| |
|
|