|
| |
|
|
A133864
|
|
Smallest odd prime base q such that p^14 divides q^(p-1) - 1, where p = Prime[n].
|
|
6
| |
|
|
65537, 19131877, 53834264557, 1356446145697, 488581592070877, 22771419458231473, 346100334752156863, 2467410166021233673, 19165875476832528551, 61879867860030528131, 1106827928513014993387
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| a(1) = A035089(14) = 65537.
|
|
|
MATHEMATICA
| Do[ k = 1; While[ !PowerMod[ Prime[ k ], Prime[ n ] - 1, Prime[ n ]^14 ] == 1, k++ ]; Print[ { n, Prime[ k ] } ], {n, 1, 100} ]
|
|
|
CROSSREFS
| Cf. A035089, A125609, A125610, A125611, A125612, A125632, A125633, A125634, A125635, A125636, A125637, A125645, A125646, A125647, A125648, A125649, A133859, A133860, A133861, A133862, A133863, A133865.
Sequence in context: A051332 A123388 A070816 * A017695 A013964 A036094
Adjacent sequences: A133861 A133862 A133863 * A133865 A133866 A133867
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Alexander Adamchuk (alex(AT)kolmogorov.com), Sep 26 2007
|
|
|
EXTENSIONS
| Extended by Max Alekseyev (maxale(AT)gmail.com), May 08 2009
|
| |
|
|
