|
| |
|
|
A125645
|
|
Smallest odd prime base q such that p^4 divides q^(p-1) - 1, where p = Prime[n].
|
|
11
| |
|
|
17, 163, 443, 3449, 45989, 239, 15541, 2819, 60793, 78017, 690143, 398023, 1977343, 574081, 1513367, 4388179, 3198427, 8065789, 3246107, 1353383, 5934307, 15631613, 2864371, 14754769, 15012733, 1358891, 32414783, 119551, 21860063, 11281097
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| W. Keller and J. Richstein Fermat quotients that are divisible by p.
|
|
|
PROG
| (PARI) { a(n) = local(p, x, y); if(n==1, return(17)); p=prime(n); x=znprimroot(p^4)^(p^3); vecsort( vector(p-1, i, y=lift(x^i); while(!isprime(y), y+=p^4); y ) )[1] } - Max Alekseyev (maxale(AT)gmail.com), May 30 2007
|
|
|
CROSSREFS
| Cf. A125609, A125610, A125611, A125612, A125632, A125633, A125634, A125635, A125636, A125637, A125646, A125647, A125648, A125649.
Sequence in context: A164746 A198859 A160295 * A068518 A155664 A096192
Adjacent sequences: A125642 A125643 A125644 * A125646 A125647 A125648
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Alexander Adamchuk (alex(AT)kolmogorov.com), Nov 29 2006
|
|
|
EXTENSIONS
| More terms from Max Alekseyev (maxale(AT)gmail.com), May 30 2007
|
| |
|
|
