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.

Showing 1-3 of 3 results.

A279419 Numbers k from A284919 such that either k-1 or k+1 is in A277688.

Original entry on oeis.org

0, 2, 4, 6, 28, 58, 62, 80, 82, 88, 112, 118, 124, 128, 148, 152, 164, 166, 178, 190, 208, 212, 214, 224, 238, 242, 248, 250, 268, 284, 290, 292, 296, 298, 308, 320, 322, 326, 328, 332, 338, 346, 358, 368, 380, 388, 392, 398, 406, 410, 418, 422, 430, 434, 440
Offset: 1

Views

Author

Vladimir Shevelev, Apr 11 2017

Keywords

Comments

We conjecture that the sequence is infinite. This sequence shows the proximity of A284919 and A277688 based on Goldbach and Lemoine-Levy representations of even and odd numbers respectively.
The differences between the positions of the corresponding terms of A284919 and A277688 are 0,0,0,1,0,2,2,1,1,1,2,3,2,2,2,2,3,1,... .
The differences between these terms are -1,-1,-1,1,-1,-1,1,1,-1,-1,-1,-1,-1,1,-1,1,1,... .

Crossrefs

Extensions

More terms from Peter J. C. Moses, Apr 11 2017

A284919 Even integers E such that there is no prime p < E with E - p and E + p both prime.

Original entry on oeis.org

0, 2, 4, 6, 28, 38, 52, 58, 62, 68, 74, 80, 82, 88, 94, 98, 112, 118, 122, 124, 128, 136, 146, 148, 152, 158, 164, 166, 172, 178, 182, 184, 188, 190, 206, 208, 212, 214, 218, 220, 224, 238, 242, 244, 248, 250, 256, 262, 268, 278, 284, 290, 292, 296, 298
Offset: 1

Views

Author

Claudio Meller, Apr 05 2017

Keywords

Comments

Or, even integers k such that k + p is composite for all primes p, q with p + q = k.
The two initial terms vacuously satisfy the definition, but all even numbers >= 4 are the sum of two primes, according to the Goldbach conjecture.
All odd numbers except for numbers m such that m-2 and m+2 are prime (= A087679) would satisfy the definition. - M. F. Hasler, Apr 05 2017
Conjecture: except for a(4)=6, all terms are coprime to 3. - Bob Selcoe, Apr 06 2017
If E is an even number not divisible by 3, then E is in the sequence unless E-3 and at least one of E+3 and 2E-3 are prime. - Robert Israel, Apr 10 2017
Consider a subsequence with the additional condition: n+odd part of p-1 is composite (for example, for p=19 it is 9). I found that this subsequence begins 0,2,118 and up to 300000 Peter J. C. Moses found only more one term 868. Is this subsequence finite? - Vladimir Shevelev, Apr 12 2017
One can compare the theoretical maxima with the actual sequence numbers of terms. Doing this at powers of 10, we see at powers {2,3,4,5,6} the ratio progression {2.33, 1.51, 1.25, 1.15, 1.096}. This implies that the excluded even numbers become increasingly rare (those coprime to 3). - Bill McEachen, Apr 17 2017
From Robert Israel's comment and the distribution of primes, the proportion of even numbers not divisible by 3 that are in the sequence tends to 1. - Peter Munn, Apr 23 2017
Moreover, If n is not divisible by 3 and 2*n - 3 is composite, then 2*n+p is also composite. Indeed, for these 2*n all primes p such that 2*n-p is prime are in the interval (3, 2*n-3). Then either 2*n-p or 2*n+p should be divisible by 3, but 2*n-p is a prime > 3. So 2*n+p is composite and 2*n is in the sequence. - Vladimir Shevelev, Apr 28 2017

Examples

			k=28 is in the sequence because 5+23 = 28 and 11+17 = 28, and 28 + {5,11,17,23} are composite; k=26 is not in the sequence because 3+23 = 26, 7+19 = 26 and 13+13 = 26, but 26+3 = 29 (prime).  - _Bob Selcoe_, Apr 06 2017
		

Crossrefs

Cf. A284928 (terms/2), A002375 (number of decompositions p + q = 2k), A020481 (least p: p + q = 2k), A277688 (an analog for decompositions odd k as 2p+q).

Programs

  • Mathematica
    fQ[n_] :=  Select[Select[Prime@Range@PrimePi@n, PrimeQ[n - #] &],    PrimeQ[n + #] &] == {}; Select[2 Range[0, 150], fQ] (* Robert G. Wilson v, Apr 05 2017 *)
  • PARI
    is(n)=!bittest(n,0)&&!forprime(p=2,n\2, isprime(n-p) && (isprime(n+p) || isprime(2*n-p)) && return) \\ Charles R Greathouse IV and M. F. Hasler, Apr 05 2017

Formula

a(n) = 2*A284928(n). - M. F. Hasler, Apr 06 2017

A285770 Let q_1

Original entry on oeis.org

0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 3, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 0, 1, 1, 1, 3, 1, 1, 2, 1, 1, 1, 3, 1, 2, 1, 2, 1, 1, 4, 1, 1, 2, 1, 1, 2, 4, 5, 1, 1, 1, 2, 1, 2, 1, 1, 2, 1, 2, 3, 3, 1, 2, 3, 1, 1, 2, 0, 1, 1, 1, 2, 1, 1, 1, 2, 2, 1, 3, 2, 1, 5
Offset: 1

Views

Author

Vladimir Shevelev, Apr 25 2017

Keywords

Comments

By the Lemoine-Levy conjecture, for every n>=3, there are primes p and q such that 2*n+1=2*p+q. In A277688 were considered the numbers of the form 2n+1+2*p, in this sequence we consider the numbers of the form 2*n+1+2*q. Then to the same condition as in A277688 satisfies an extremely rare set of numbers that contains numbers {2*n+1} for which a(n)=0: {11, 59, 151,...}. Comparing this with our conjecture in A277688, we conjecture here that this set is finite. For the explanation of this conjecture we need not refer to the minimal number of the representation 2*n+1 for large n (most likely, it is, as in the Goldbach presentations, for 2*n, more than c*n/(log n)^2 with some constant c) since we have a prime only among the first several of these representations, as in this sequence. This leaves us with an important question: why does A277688 contain much more terms than the zeros in this sequence?
The positions of zeros are {1,2,5,29,75} up to 100000. - Peter J. C. Moses, Apr 26 2017
The answer on the question follows from the following arguments. Note that if, for a prime p, 2*n+1-2*p is prime, then it is larger than 3 (if not, then p>=n and 2*n+1-2*p<=1). Now if 2*n+1 is not divisible by 3 and 2*n+1-6 is composite, then either 2*n+1-2*p or 2*n+1+2*p is divisible by 3 and, since the first number is prime >3, then 2*n+1+2*p is divisible by 3 and thus such 2*n+1 is in A277688. - Vladimir Shevelev, Apr 28 2017
No other zeros up to 5*10^6. - Michel Marcus, Apr 29 2017

Crossrefs

Cf. A277688.

Programs

  • PARI
    a(n) = {i = 0; forprime(p=2, 2*n+1, if ((gcd(p, 2*n+1)==1) && ((2*n-p) % 2) && isprime((2*n-p+1)/2), i++; if (isprime(2*n+2*p+1), return(i)););); return(0);} \\ Michel Marcus, Apr 29 2017

Extensions

More terms from Peter J. C. Moses, Apr 25 2017
Showing 1-3 of 3 results.