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!)
 A085753 Least k such that n^n + k is a semiprime. 4
 3, 0, 6, 3, 2, 5, 6, 3, 4, 3, 6, 31, 6, 3, 4, 1, 20, 19, 28, 3, 8, 3, 60, 5, 16, 15, 46, 3, 2, 7, 12, 13, 4, 3, 18, 3, 9, 3, 32, 7, 6, 37, 30, 61, 2, 81, 26, 5, 34, 79, 62, 6, 44, 5, 16, 15, 10, 133, 12, 31, 28, 49, 26, 21, 92, 43, 76, 67, 38, 57, 36, 43, 21, 115, 2, 25, 74, 179, 28, 27, 52, 15 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Sean A. Irvine, Table of n, a(n) for n = 1..100 Dario Alejandro Alpern, Factorization using the Elliptic Curve Method MATHEMATICA PrimeFactorExponentsAdded[n_] := Plus @@ Flatten[ Table[ # [[2]], {1}] & /@ FactorInteger[n]]; f[n_] := Block[{k = 0}, While[ PrimeFactorExponentsAdded[n^n + k] != 2, k++ ]; k]; Table[ f[n], {n, 1, 40}] PROG (PARI) a(n) = my(k=0); while (bigomega(n^n+k) != 2, k++); k; \\ Michel Marcus, Jul 21 2020 CROSSREFS Cf. A001358 (semiprimes), A089542, A089543, A089544. Sequence in context: A259659 A005889 A095712 * A120008 A162197 A160770 Adjacent sequences:  A085750 A085751 A085752 * A085754 A085755 A085756 KEYWORD nonn AUTHOR Jason Earls, Jul 21 2003 EXTENSIONS Edited and extended by Robert G. Wilson v, Aug 14 2003 Corrected and extended by Ray Chandler, Nov 22 2003 a(69)-a(82) from Max Alekseyev, Jun 13 2009 a(52) and a(73) corrected by Sean A. Irvine, Jul 20 2020 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 September 22 17:16 EDT 2020. Contains 337291 sequences. (Running on oeis4.)