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.

A161866 Numbers k such that k^2+k+7 and k^2+k-7 are both prime.

This page as a plain text file.
%I A161866 #13 Sep 08 2022 08:45:45
%S A161866 3,5,9,12,24,29,32,39,44,50,57,59,65,102,135,137,144,170,180,207,260,
%T A161866 267,297,302,305,344,347,360,365,369,389,404,429,464,474,495,540,555,
%U A161866 570,612,620,659,662,689,767,774,792,824,837,872,885,900,950,954,989
%N A161866 Numbers k such that k^2+k+7 and k^2+k-7 are both prime.
%H A161866 Daniel Starodubtsev, <a href="/A161866/b161866.txt">Table of n, a(n) for n = 1..10000</a>
%e A161866 a(1)=3 as 12+-7 are primes. a(2)=5 as 30+-7 are primes.
%t A161866 q=7;lst7={};Do[p=n^2+n;If[PrimeQ[p-q]&&PrimeQ[p+q],AppendTo[lst7,n]], {n,0,7!}];lst7
%t A161866 Select[Range[1000],AllTrue[#^2+#+{7,-7},PrimeQ]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jun 26 2021 *)
%o A161866 (Magma) [k:k in [1..1000]| IsPrime(k^2+k+7) and IsPrime(k^2+k-7)]; // _Marius A. Burtea_, Feb 17 2020
%Y A161866 Cf. A088485, A161863, A161864, A153417.
%K A161866 nonn,easy
%O A161866 1,1
%A A161866 _Vladimir Joseph Stephan Orlovsky_, Jun 20 2009
%E A161866 Definition rephrased by _R. J. Mathar_, Jun 23 2009