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.

A071351 Numbers n such that both n^4 + 2 and n^4 - 2 are prime.

This page as a plain text file.
%I A071351 #11 Jan 02 2018 16:42:36
%S A071351 3,21,87,99,129,141,279,627,657,777,783,795,1653,1725,1833,1959,2001,
%T A071351 2043,3039,3399,3609,3861,3975,4257,4371,4491,5403,5541,5709,5985,
%U A071351 7371,7539,7869,7917,8397,8445,8547,8793,9051,9057,9915,9933,11067,12153
%N A071351 Numbers n such that both n^4 + 2 and n^4 - 2 are prime.
%H A071351 Harvey P. Dale, <a href="/A071351/b071351.txt">Table of n, a(n) for n = 1..1000</a>
%e A071351 n=3: n^4 = 81; {79,83} are primes.
%t A071351 lst={}; Do[p1=n^4-2; p2=n^4+2; If[PrimeQ[p1]&&PrimeQ[p2],AppendTo[lst,n]],{n,0,8!}]; lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 17 2009 *)
%t A071351 Select[Range[730000], AllTrue[#^4 + {2, -2}, PrimeQ] &] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jan 02 2018 *)
%Y A071351 Cf. A028870, A038599, A154831, A154832, A154833, A154834, A154933, A154934, A154935, A154936. - _Vladimir Joseph Stephan Orlovsky_, Jan 17 2009
%K A071351 easy,nonn
%O A071351 1,1
%A A071351 _Labos Elemer_, May 21 2002