# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a057197 Showing 1-1 of 1 %I A057197 #23 Dec 11 2023 11:44:38 %S A057197 1,2,3,4,5,6,8,10,11,12,15,16,22,23,26,30,32,40,42,46,61,72,76,155, %T A057197 180,198,203,310,328,342,508,510,515,546,808,1563,2772,3882,3940,4840, %U A057197 7518,11118,11552,11733,12738,12858,17421,44122,64660,163560,172455,180496,325866,481840,1009168 %N A057197 Numbers k such that 2^k + 15 is prime. %C A057197 a(55) > 5*10^5. - _Robert Price_, Sep 14 2015 %C A057197 For these numbers k, 2^(k-1)*(2^k+15) has deficiency 16 (see A125248). - _M. F. Hasler_, Jul 18 2016 %H A057197 Henri Lifchitz and Renaud Lifchitz (Editors), Search for 2^n+15, PRP Top Records. %e A057197 For k = 5, 2^5 + 15 = 47 is prime. %e A057197 For k = 15, 2^15 + 15 = 32783 is prime. %t A057197 Do[ If[ PrimeQ[ 2^n + 15 ], Print[n]], { n, 1, 12422 }] %t A057197 Select[Range[15000], PrimeQ[2^# + 15] &] (* _Vincenzo Librandi_, Aug 28 2015 *) %o A057197 (Magma) [n: n in [0..1500] | IsPrime(2^n+15)]; // _Vincenzo Librandi_, Aug 28 2015 %o A057197 (PARI) for(n=1,9e9,ispseudoprime(2^n+15)&&print1(n",")) \\ _M. F. Hasler_, Jul 18 2016 %Y A057197 Cf. A094076, A125248. %Y A057197 Cf. A019434 (primes 2^k+1), A057732 (2^k+3), A059242 (2^k+5), A057195 (2^k+7), A057196 (2^k+9), A102633 (2^k+11), A102634 (2^k+13), this sequence (2^k+15), A057200 (2^k+17), A057221 (2^k+19), A057201 (2^k+21), A057203 (2^k+23). %K A057197 nonn %O A057197 1,2 %A A057197 _Robert G. Wilson v_, Sep 15 2000 %E A057197 a(45)-a(53) from _Robert Price_, Dec 06 2013 %E A057197 a(54) from _Robert Price_, Sep 14 2015 %E A057197 a(55) from Stefano Morozzi, added by _Elmo R. Oliveira_, Dec 11 2023 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE