A242337 Numbers k such that k*6^k - 1 is semiprime.
4, 5, 6, 7, 9, 10, 11, 12, 13, 14, 15, 18, 22, 23, 25, 32, 35, 38, 45, 51, 54, 57, 68, 72, 82, 97, 110, 138, 155, 234, 254
Offset: 1
Links
- factordb.com, Status of 423*6^423-1.
Programs
-
Magma
IsSemiprime:=func; [n: n in [2..352] | IsSemiprime(s) where s is n*6^n-1];
-
Mathematica
Select[Range[352], PrimeOmega[# 6^# - 1]==2&]
Extensions
a(26)-a(31) from Carl Schildkraut, Aug 17 2015
Comments