cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A165780 Numbers n such that |2^n-16257| is prime.

This page as a plain text file.
%I A165780 #18 Sep 08 2022 08:45:48
%S A165780 2,3,6,8,10,12,14,16,20,22,26,30,34,36,38,43,44,50,58,64,68,80,116,
%T A165780 142,146,254,296,298,306,396,456,730,876,1004,1006,1051,1094,1776,
%U A165780 1896,1908,2502,2876,3824,3882,4796,4818,5006,5704,6722,8467,9676
%N A165780 Numbers n such that |2^n-16257| is prime.
%C A165780 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).
%e A165780 a(7)=14 since 2^14-16257 = 127 is prime.
%e A165780 For exponents a(1)=2 through a(6)=12, we get negative values for 2^a(k)-16257, which are prime in absolute value.
%t A165780 Select[Table[{n, Abs[2^n - 16257]},{n,0,100}], PrimeQ[#[[2]]] &][[All, 1]](* _G. C. Greubel_, Apr 08 2016 *)
%o A165780 (PARI) lista(nn) = for(n=1, nn, if(ispseudoprime(abs(2^n-16257)), print1(n, ", "))); \\ _Altug Alkan_, Apr 08 2016
%o A165780 (Magma) [n: n in [1..1100] |IsPrime(2^n-16257)]; // _Vincenzo Librandi_, Apr 09 2016
%Y A165780 Cf. A096818, A165778, A165779.
%K A165780 nonn
%O A165780 1,1
%A A165780 _M. F. Hasler_, Oct 11 2009
%E A165780 More terms from _Altug Alkan_, Apr 08 2016