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.

A157976 Primes p such that 18*p + 17 is also prime.

This page as a plain text file.
%I A157976 #14 Sep 08 2022 08:45:42
%S A157976 2,3,5,13,19,23,37,47,53,67,79,83,89,103,109,149,157,167,193,229,233,
%T A157976 257,263,277,313,347,349,383,389,419,439,457,467,487,499,523,563,569,
%U A157976 593,599,619,677,719,727,769,773,823,829,857,863,877,937,1013,1039,1049
%N A157976 Primes p such that 18*p + 17 is also prime.
%H A157976 Vincenzo Librandi, <a href="/A157976/b157976.txt">Table of n, a(n) for n = 1..3000</a>
%t A157976 q=17;lst={};Do[p=Prime[n];If[PrimeQ[(q+1)*p+q],AppendTo[lst,p]],{n,6!}];lst
%t A157976 Select[Prime[Range[1000]], PrimeQ[18 # + 17]&] (* _Vincenzo Librandi_, Feb 03 2014 *)
%o A157976 (Magma) [n: n in [0..1100] | IsPrime(n) and IsPrime(18*n + 17)]; // _Vincenzo Librandi_, Feb 03 2014
%Y A157976 Cf. A136082, A136083, A023213, A023221, A023235, A023240, A157974, A136083, A136084, A136085, A136086, A136087, A089440, A157975.
%K A157976 nonn,easy
%O A157976 1,1
%A A157976 _Vladimir Joseph Stephan Orlovsky_, Mar 10 2009