The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A187022 a(n) is the smallest prime factor of n^n+1 having the form k*n+1. 5
 5, 7, 257, 521, 13, 113, 97, 73, 101, 23, 193, 13417, 29, 31, 274177, 45957792327018709121, 37, 108301, 148721, 337, 9617835527609, 47, 33409, 239201, 53, 163, 449, 233, 61, 373, 641, 661, 6009977, 71, 22452257707354557235348829785471057921, 593, 202921, 79, 641 (list; graph; refs; listen; history; text; internal format)
 OFFSET 2,1 COMMENTS The values of k are in A187024. LINKS Amiram Eldar, Table of n, a(n) for n = 2..148 (terms 2..100 from Vincenzo Librandi) EXAMPLE 12^12+1 = 89*193*233*2227777; the smallest prime divisor of the form k*n+1 is 193 = 16*12+1, hence a(12) = 193. MATHEMATICA Table[p=First/@FactorInteger[n^n+1]; Select[p, Mod[#1, n] == 1 &, 1][[1]], {n, 2, 40}] PROG (Magma) A187022:=function(n); for d in PrimeDivisors(n^n+1) do if d mod n eq 1 then return d; end if; end for; return 0; end function; [ A187022(n): n in [2..40] ]; // Klaus Brockhaus, Mar 02 2011 CROSSREFS Cf. A187024. Sequence in context: A265031 A229030 A229033 * A196309 A196281 A196331 Adjacent sequences: A187019 A187020 A187021 * A187023 A187024 A187025 KEYWORD nonn AUTHOR Michel Lagneau, Mar 02 2011 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 5 05:19 EDT 2024. Contains 374935 sequences. (Running on oeis4.)