A186688 Semiprimes of the form n^4 + 1.

82, 626, 2402, 4097, 10001, 14642, 20737, 28562, 38417, 83522, 104977, 194482, 234257, 279842, 456977, 707282, 810001, 1048577, 1500626, 1679617, 2085137, 2313442, 2560001, 3111697, 6250001, 7311617, 10556002, 11316497, 13845842, 14776337, 17850626, 21381377, 25411682

Offset: 1

Author

Michel Lagneau, Feb 25 2011

Keywords

• nonn
• easy

Examples

			4097 is a member because 4097 = 8^4 + 1 = 17*241.
		

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A144255.

Programs

Magma

IsSemiprime:= func; [s: n in [1..75] | IsSemiprime(s) where s is n^4 + 1]; // Vincenzo Librandi, Sep 22 2012

Mathematica

semiPrimeQ[n_] := Total[FactorInteger[n]][[2]] == 2; Select[ Range[200]^4
  +1, semiPrimeQ]
Select[Table[n^4 + 1, {n, 80}], PrimeOmega[#] == 2&] (* Vincenzo Librandi, Sep 22 2012 *)