cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A133860 Smallest odd prime base q such that p^10 divides q^(p-1) - 1, where p = prime(n).

This page as a plain text file.
%I A133860 #8 Jun 06 2021 19:04:08
%S A133860 12289,472391,78124999,135967277,24262286441,38050596989,
%T A133860 5498076927457,8388044818849,30794280412669,45941644105613,
%U A133860 1205285836084793,7909086479714171,1438991183761177,47101607991825047,18067554193458689
%N A133860 Smallest odd prime base q such that p^10 divides q^(p-1) - 1, where p = prime(n).
%e A133860 a(1) = A035089(10) = 12289.
%t A133860 Do[ k = 1; While[ !PowerMod[ Prime[ k ], Prime[ n ] - 1, Prime[ n ]^10 ] == 1, k++ ]; Print[ { n, Prime[ k ] } ], {n, 1, 100} ]
%Y A133860 Cf. A035089, A125609, A125610, A125611, A125612, A125632, A125633, A125634, A125635, A125636, A125637, A125645, A125646, A125647, A125648, A125649, A133859, A133861, A133862, A133863, A133864, A133865.
%K A133860 nonn
%O A133860 1,1
%A A133860 _Alexander Adamchuk_, Sep 26 2007
%E A133860 Extended by _Max Alekseyev_, May 08 2009