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.

A089440 14*p+13 and p are primes.

This page as a plain text file.
%I A089440 #13 Oct 24 2014 17:58:27
%S A089440 2,5,11,17,29,41,59,89,101,107,131,137,149,167,191,227,239,251,269,
%T A089440 281,317,347,359,419,431,449,467,479,521,587,659,677,719,761,797,857,
%U A089440 881,941,977,1031,1049,1061,1091,1151,1181,1187,1277,1289,1307,1409,1427
%N A089440 14*p+13 and p are primes.
%H A089440 Harvey P. Dale, <a href="/A089440/b089440.txt">Table of n, a(n) for n = 1..1000</a>
%t A089440 q=13;lst={};Do[p=Prime[n];If[PrimeQ[(q+1)*p+q],AppendTo[lst,p]],{n,6!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Mar 10 2009 *)
%t A089440 Select[Prime[Range[250]],PrimeQ[14#+13]&] (* _Harvey P. Dale_, Oct 24 2014 *)
%o A089440 (PARI) diff2p(n,a,b) = { forprime(x=3,n, y=(x-a)/b; if(y==floor(y), if(isprime(y), print1(y",")) ) ) }
%K A089440 easy,nonn
%O A089440 1,1
%A A089440 _Cino Hilliard_, Dec 28 2003
%E A089440 Definition corrected by _Vaclav Kotesovec_, Sep 29 2014
%E A089440 Offset changed by _Harvey P. Dale_, Oct 24 2014