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.

A253639 Lesser of twin primes of the form (k^2 + 2, k^2 + 4).

This page as a plain text file.
%I A253639 #18 Jan 05 2020 05:56:31
%S A253639 3,11,227,1091,2027,3251,13691,21611,59051,65027,91811,140627,178931,
%T A253639 199811,205211,227531,328331,567011,700571,804611,815411,1071227,
%U A253639 2241011,3629027,4223027,4347227,4809251,5212091,5919491,6185171,6426227,6671891,7601051,7969331,8661251,8732027,9018011,10323371
%N A253639 Lesser of twin primes of the form (k^2 + 2, k^2 + 4).
%C A253639 Companion sequence to A085554 (which yields the greater of the pair) and A086381 (which lists the x-values). Except for the first term, all values are a(n)=11 (mod 72). - _M. F. Hasler_, Jan 18 2015
%H A253639 Amiram Eldar, <a href="/A253639/b253639.txt">Table of n, a(n) for n = 1..10000</a>
%F A253639 Equals A059100 o A086381 = A023444 o A085554, i.e., a(n) = A086381(n)^2+2 = A085554(n)-2. - _M. F. Hasler_, Jan 18 2015
%t A253639 Transpose[Select[Table[x^2+{2,4},{x,5000}],AllTrue[#,PrimeQ]&]][[1]] (* The program uses the AllTrue function from Mathematica version 10 *)
%o A253639 (PARI) forstep(x=1,9999,2,is_A086381(x)&&print1(x^2+2,",")) \\ _M. F. Hasler_, Jan 16 2015
%Y A253639 Cf. A001097, A001359, A006512, A085554, A086381, A253640.
%K A253639 easy,nonn
%O A253639 1,1
%A A253639 _M. F. Hasler_, Jan 16 2015