|
Search: id:A098239
|
|
|
| A098239 |
|
Numbers n such that n^3 differs from smallest k > n that makes n^6+1 divide k^6+1. |
|
+0
2
|
| |
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
n such that A066021(n) differs from A000578(n).
a(8) > 10^6.
|
|
MATHEMATICA
|
f[n_] := Block[{k = 1, m}, While[m = (k^6 + 1)/(n^6 + 1); m < 2 || !IntegerQ[m], k++ ]; n^3 - k]; Do[ If[ f[n] != 0, Print[n]], {n, 215}] (from Robert G. Wilson v Sep 03 2004)
|
|
CROSSREFS
|
Sequence in context: A118211 A050552 A105607 this_sequence A140257 A053938 A102381
Adjacent sequences: A098236 A098237 A098238 this_sequence A098240 A098241 A098242
|
|
KEYWORD
|
nonn,hard,more
|
|
AUTHOR
|
Ralf Stephan, Sep 01 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 03 2004
Lower bound for a(8) updated by Max Alekseyev (maxale(AT)gmail.com), Oct 13 2009
|
|
|
Search completed in 0.002 seconds
|
