|
|
A165780
|
|
Numbers n such that |2^n-16257| is prime.
|
|
2
|
|
|
2, 3, 6, 8, 10, 12, 14, 16, 20, 22, 26, 30, 34, 36, 38, 43, 44, 50, 58, 64, 68, 80, 116, 142, 146, 254, 296, 298, 306, 396, 456, 730, 876, 1004, 1006, 1051, 1094, 1776, 1896, 1908, 2502, 2876, 3824, 3882, 4796, 4818, 5006, 5704, 6722, 8467, 9676
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
If p=2^n-16257 is prime, then 2^(n-1)*p is a solution to sigma(x)-2x = 16256 = 2^7*(2^7-1) = 2*A000396(4).
|
|
LINKS
|
|
|
EXAMPLE
|
a(7)=14 since 2^14-16257 = 127 is prime.
For exponents a(1)=2 through a(6)=12, we get negative values for 2^a(k)-16257, which are prime in absolute value.
|
|
MATHEMATICA
|
Select[Table[{n, Abs[2^n - 16257]}, {n, 0, 100}], PrimeQ[#[[2]]] &][[All, 1]](* G. C. Greubel, Apr 08 2016 *)
|
|
PROG
|
(PARI) lista(nn) = for(n=1, nn, if(ispseudoprime(abs(2^n-16257)), print1(n, ", "))); \\ Altug Alkan, Apr 08 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|