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.

A154942 Primes p such that (p-1)*p*(p+1)-p-2 and (p-1)*p*(p+1)+p+2 are primes.

This page as a plain text file.
%I A154942 #4 Jun 21 2012 17:15:00
%S A154942 3,5,29,71,113,263,1103,2339,3203,3413,3593,3659,3719,4421,5939,6269,
%T A154942 7841,9011,9029,13121,13841,14423,15671,17033,19073,22079,22811,26783,
%U A154942 27851,28949,29303,30839,31973,32063,32141,34301,38543,38873,39119
%N A154942 Primes p such that (p-1)*p*(p+1)-p-2 and (p-1)*p*(p+1)+p+2 are primes.
%C A154942 2*3*4=24-3-2=19, 2*3*4=24+3+2=29, ...
%t A154942 lst={};Do[p=Prime[n];If[PrimeQ[(p-1)*p*(p+1)-p-2]&&PrimeQ[(p-1)*p*(p+1)+p+2],AppendTo[lst,p]],{n,8!}];lst
%t A154942 prQ[n_]:=Module[{x=n^3-n,y=n+2},And@@PrimeQ[{x+y,x-y}]]; Select[Prime[ Range[4200]],prQ] (* _Harvey P. Dale_, Jun 21 2012 *)
%Y A154942 Cf. A053184, A038872, A141158, A038615, A098058, A038936, A089270, A140559, A154939
%K A154942 nonn
%O A154942 1,1
%A A154942 _Vladimir Joseph Stephan Orlovsky_, Jan 17 2009