|
|
A268110
|
|
Numbers k such that (2^k - k + 1)*2^k + 1 is a semiprime.
|
|
1
|
|
|
3, 4, 6, 9, 10, 15, 19, 22, 26, 34, 47, 55, 67, 69, 72, 92, 100, 117, 160, 169, 268, 278, 298, 309, 386, 430, 495
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(1) = 3 because 6*8 + 1 = 49 = 7*7, which is semiprime.
a(2) = 4 because 13*16 + 1 = 209 = 11*19, which is semiprime.
|
|
MAPLE
|
|
|
MATHEMATICA
|
Select[Range[105], PrimeOmega[(2^# - # + 1) 2^# + 1] == 2 &]
|
|
PROG
|
(Magma) IsSemiprime:=func<i | &+[d[2]: d in Factorization(i)] eq 2>; [n: n in [2..105]| IsSemiprime(s) where s is (2^n-n+1)*2^n+1];
(PARI) lista(nn) = {for(n=1, nn, if(bigomega((2^n-n+1)*2^n+1) == 2, print1(n, ", "))); } \\ Altug Alkan, Feb 07 2016
|
|
CROSSREFS
|
Cf. A201360: n for which (2^n-n+1)*2^n+1 is prime.
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|