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.

A064409 Positive even numbers not of the form A001359(i) + A006512(j) for integers i and j.

This page as a plain text file.
%I A064409 #12 Feb 16 2024 14:44:29
%S A064409 2,4,6,14,20,26,28,32,38,40,44,50,52,56,58,62,68,70,74,80,82,86,88,92,
%T A064409 94,96,98,100,104,110,116,118,122,124,128,130,134,136,140,146,148,152,
%U A064409 158,160,164,166,170,172,176,178,182,188,190,194,200
%N A064409 Positive even numbers not of the form A001359(i) + A006512(j) for integers i and j.
%C A064409 This is different from A007534, which gives positive even numbers which are not the same of a pair of twin primes. The old definition of the present sequence was misleading. - _N. J. A. Sloane_, Feb 16 2024
%H A064409 A.H.M. Smeets, <a href="/A064409/b064409.txt">Table of n, a(n) for n = 1..20177</a>
%e A064409 The lesser of the twin primes < 200 are 3, 5, 11, 17, 29, 41, 59, 71, 101, 107, 137, 149, 179, 191, 197 and the greater of the twin primes < 200 are 5, 7, 13, 19, 31, 43, 61, 73, 103, 109, 139, 151, 181, 193, 199. 20 is in the current sequence because no combination of any two numbers from each set just enumerated can be summed to make 20.
%t A064409 p = Select[ Range[ 200 ], PrimeQ[ # ] && PrimeQ[ # + 2 ] & ]; q = p + 2; Complement[ Table[ n, {n, 2, 200, 2} ], Union[ Flatten[ Table[ p[ [ i ] ] + q[ [ j ] ], {i, 1, 15}, {j, 1, 15} ] ] ] ]
%Y A064409 Cf. A001359, A006512, A007534.
%K A064409 nonn
%O A064409 1,1
%A A064409 _Robert G. Wilson v_, Sep 29 2001