The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A105041 Positive integers k such that k^7 + 1 is semiprime. 17
 2, 10, 16, 18, 46, 52, 66, 72, 78, 106, 136, 148, 226, 228, 240, 262, 282, 330, 442, 508, 616, 630, 732, 750, 756, 768, 810, 828, 910, 936, 982, 1032, 1060, 1128, 1216, 1302, 1366, 1558, 1626, 1696, 1698, 1758, 1800, 1810, 1830, 1932, 1996, 2002, 2026, 2080 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS We have the polynomial factorization n^7+1 = (n+1) * (n^6 - n^5 + n^4 - n^3 + n^2 - n + 1). Hence after the initial n=1 prime, the binomial can at best be semiprime and that only when both (n+1) and (n^6 - n^5 + n^4 - n^3 + n^2 - n + 1) are primes. LINKS Robert Price, Table of n, a(n) for n = 1..1414 FORMULA a(n)^7 + 1 is semiprime. a(n)+1 is prime and a(n)^6 - a(n)^5 + a(n)^4 - a(n)^3 + a(n)^2 - a(n) + 1 is prime. EXAMPLE n n^7+1 = ((n+1) * (n^6 - n^5 + n^4 - n^3 + n^2 - n + 1). 2 129 = 3 x 43 10 10000001 = 11 * 909091 16 268435457 = 17 * 15790321 18 612220033 = 19 * 32222107 46 435817657217 = 47 * 9272716111 MATHEMATICA Select[Range[0, 200000], PrimeQ[# + 1] && PrimeQ[(#^7 + 1)/(# + 1)] &] (* Robert Price, Mar 11 2015 *) Select[Range[2500], Plus@@Last/@FactorInteger[#^7 + 1]==2 &] (* Vincenzo Librandi, Mar 12 2015 *) Select[Range[2100], PrimeOmega[#^7+1]==2&] (* Harvey P. Dale, Jun 18 2019 *) PROG (MAGMA) IsSemiprime:=func< n | &+[ k[2]: k in Factorization(n) ] eq 2 >; [n: n in [1..2100] | IsSemiprime(n^7+1)]; // Vincenzo Librandi, Mar 12 2015 CROSSREFS Cf. A001358, A085722, A096173, A186669, A104238, A103854, A105041, A105066, A105078, A105122, A105142, A105237, A104335, A104479, A104494, A104657, A105282. Sequence in context: A047187 A048043 A043429 * A138632 A175957 A307055 Adjacent sequences:  A105038 A105039 A105040 * A105042 A105043 A105044 KEYWORD easy,nonn AUTHOR Jonathan Vos Post, Apr 03 2005 EXTENSIONS More terms from R. J. Mathar, Dec 14 2009 STATUS approved

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

Last modified April 11 18:00 EDT 2021. Contains 342888 sequences. (Running on oeis4.)