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-10 of 15 results. Next

A232174 Number of ways to write n = x + y (x, y > 0) with x + n*y and x^2 + n*y^2 both prime.

Original entry on oeis.org

0, 1, 2, 2, 1, 2, 3, 1, 2, 2, 3, 2, 5, 1, 4, 3, 2, 2, 1, 1, 2, 5, 4, 1, 7, 2, 4, 4, 6, 2, 5, 1, 4, 3, 5, 2, 8, 2, 6, 3, 3, 3, 5, 2, 5, 4, 7, 5, 7, 3, 5, 3, 3, 1, 11, 4, 7, 6, 5, 2, 4, 3, 8, 5, 6, 1, 14, 1, 6, 7, 6, 6, 8, 3, 6, 7, 7, 5, 9, 3, 3, 5, 7, 7, 15, 5, 6, 5, 2, 5, 15, 6, 12, 8, 7, 3, 15, 8, 10, 5
Offset: 1

Views

Author

Zhi-Wei Sun, Nov 19 2013

Keywords

Comments

Conjecture: (i) a(n) > 0 for all n > 1. Also, a(n) = 1 only for n = 2, 5, 8, 14, 19, 20, 24, 32, 54, 68, 101, 168.
(ii) Every n = 3, 4, ... can be written as x + y (x, y > 0) with x*n + y and x*n - y both prime.
(iii) Any integer n > 2 can be written as P + q (q > 0) with p and p + n*q both prime. Also, any integer n > 7 can be written as p + q (q > 0) with p and n*q - p both prime.
In a paper published in 2017, the author announced a USD $200 prize for the first solution to his conjecture that a(n) > 0 for all n > 1. - Zhi-Wei Sun, Dec 03 2017

Examples

			a(2) = 1 since 2 = 1 + 1 with 1 + 2*1 = 1^2 + 2*1^2 = 3 prime.
a(5) = 1 since 5 = 3 + 2 with 3 + 5*2 = 13 and 3^2 + 5*2^2 = 29 both prime.
a(8) = 1 since 8 = 5 + 3 with 5 + 8*3 = 29 and 5^2 + 8*3^2 = 97 both prime.
a(14) = 1 since 14 = 9 + 5 with 9 + 14*5 = 79 and 9^2 + 14*5^2 = 431 both prime.
a(19) = 1 since 19 = 13 + 6 with 13 + 19*6 = 127 and 13^2 + 19*6^2 = 853 both prime.
a(20) = 1 since 20 = 11 + 9 with 11 + 20*9 = 191 and 11^2 + 20*9^2 = 1741 both prime.
a(24) = 1 since 24 = 5 + 19 with 5 + 24*19 = 461 and 5^2 + 24*19^2 = 8689 both prime.
a(32) = 1 since 32 = 23 + 9 with 23 + 32*9 = 311 and 23^2 + 32*9^2 = 3121 both prime.
a(54) = 1 since 54 = 35 + 19 with 35 + 54*19 = 1061 and 35^2 + 54*19^2 = 20719 both prime.
a(68) = 1 since 68 = 45 + 23 with 45 + 68*23 = 1609 and 45^2 + 68*23^2 = 37997 both prime.
a(101) = 1 since 101 = 98 + 3 with 98 + 101*3 = 401 and 98^2 + 101*3^2 = 10513 both prime.
a(168) = 1 since 168 = 125 + 43 with 125 + 168*43 = 7349 and 125^2 + 168*43^2 = 326257 both prime.
		

References

  • D. A. Cox, Primes of the Form x^2 + n*y^2, John Wiley & Sons, 1989.

Crossrefs

Programs

  • Mathematica
    a[n_]:=Sum[If[PrimeQ[k+n(n-k)]&&PrimeQ[k^2+n(n-k)^2],1,0],{k,1,n-1}]
    Table[a[n],{n,1,100}]

A220419 Number of ways to write n=x+y (x>0, y>0) with 2x+1, 2y-1 and x^3+2y^3 all prime.

Original entry on oeis.org

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

Views

Author

Zhi-Wei Sun, Dec 14 2012

Keywords

Comments

Conjecture: a(n)>0 for all n>527.
This has been verified for n up to 2*10^7. It implies the Goldbach conjecture since 2(x+y)=(2x+1)+(2y-1).
Zhi-Wei Sun also made the following similar conjectures:
(1) Each integer n>1544 can be written as x+y (x>0, y>0) with 2x-1, 2y+1 and x^3+2y^3 all prime.
(2) Any odd number n>2060 can be written as 2p+q with p, q and p^3+2((q-1)/2)^3 all prime.
(3) Every integer n>25537 can be written as p+q (q>0) with p, p-6, p+6 and p^3+2q^3 all prime.
(4) Any even number n>1194 can be written as x+y (x>0, y>0) with x^3+2y^3 and 2x^3+y^3 both prime.
(5) Each integer n>3662 can be written as x+y (x>0, y>0) with 3(xy)^3-1 and 3(xy)^3+1 both prime.
(6) Any integer n>22 can be written as x+y (x>0, y>0) with (xy)^4+1 prime. Also, any integer n>7425 can be written as x+y (x>0, y>0) with 2(xy)^4-1 and 2(xy)^4+1 both prime.
(7) Every odd integer n>1 can be written as x+y (x>0, y>0) with x^4+y^2 prime. Moreover, any odd number n>15050 can be written as p+2q with p, q and p^4+(2q)^2 all prime.
Conjectures (1) to (7) verified up to 10^6. - Mauro Fiorentini, Sep 22 2023

Examples

			a(25)=1 since 25=3+22 with 2*3+1, 2*22-1 and 3^3+2*22^3=21323 all prime.
a(26)=1 since 26=11+15 with 2*11+1, 2*15-1 and 11^3+2*15^3=8081 all prime.
		

Crossrefs

Programs

  • Mathematica
    a[n_]:=a[n]=Sum[If[PrimeQ[2k+1]==True&&PrimeQ[2(n-k)-1]==True&&PrimeQ[k^3+2(n-k)^3]==True,1,0],{k,1,n-1}]
    Do[Print[n," ",a[n]],{n,1,1000}]

A220455 Number of ways to write n=x+y (x>0, y>0) with 3x-2, 3x+2 and 2xy+1 all prime.

Original entry on oeis.org

0, 0, 0, 1, 1, 2, 0, 2, 3, 2, 1, 2, 1, 1, 4, 4, 1, 2, 2, 3, 3, 2, 2, 5, 1, 4, 1, 1, 5, 4, 1, 2, 5, 5, 3, 8, 3, 6, 5, 5, 4, 4, 2, 4, 5, 3, 1, 8, 3, 4, 4, 1, 2, 8, 6, 3, 4, 5, 4, 4, 7, 1, 3, 6, 5, 7, 3, 3, 8, 2, 4, 5, 2, 6, 10, 7, 1, 5, 5, 6, 8, 6, 4, 5, 5, 7, 5, 4, 4, 11, 4, 5, 5, 5, 6, 6, 3, 1, 12, 8
Offset: 1

Views

Author

Zhi-Wei Sun, Dec 15 2012

Keywords

Comments

Conjecture: a(n)>0 for all n>7.
This has been verified for n up to 10^8. It implies that there are infinitely many cousin primes.
Conjecture verified for n up to 10^9. - Mauro Fiorentini, Aug 06 2023
Zhi-Wei Sun also made some other similar conjectures, e.g., he conjectured that any integer n>17 can be written as x+y (x>0, y>0) with 2x-3, 2x+3 and 2xy+1 all prime, and each integer n>28 can be written as x+y (x>0, y>0) with 2x+1, 2y-1 and 2xy+1 all prime.
Both conjectures verified for n up to 10^9. - Mauro Fiorentini, Aug 06 2023

Examples

			a(25)=1 since 25=13+12 with 3*13-2, 3*13+2 and 2*13*12+1=313 all prime.
		

Crossrefs

Programs

A220431 Number of ways to write n=x+y (x>0, y>0) with 3x-1, 3x+1 and xy-1 all prime.

Original entry on oeis.org

0, 0, 0, 1, 2, 2, 2, 2, 3, 2, 2, 3, 2, 2, 3, 3, 2, 3, 2, 2, 6, 1, 3, 6, 4, 3, 3, 2, 3, 4, 3, 4, 2, 3, 3, 5, 4, 4, 7, 1, 2, 5, 1, 5, 7, 4, 2, 3, 7, 4, 7, 2, 4, 7, 4, 4, 5, 2, 5, 8, 4, 3, 3, 5, 2, 8, 5, 4, 3, 10, 7, 8, 2, 3, 5, 5, 3, 6, 3, 3, 14, 4, 3, 12, 3, 7, 7, 5, 6, 8, 7, 5, 9, 9, 4, 4, 3, 6, 10, 8
Offset: 1

Views

Author

Zhi-Wei Sun, Dec 14 2012

Keywords

Comments

Conjecture: a(n)>0 for all n>3.
This has been verified for n up to 10^8, and it is stronger than A. Murthy's conjecture related to A109909.
Conjecture verified for n up to 10^9. - Mauro Fiorentini, Jul 26 2023
The conjecture implies the twin prime conjecture for the following reason: If x_1<...
Zhi-Wei Sun also made some similar conjectures. For example, any integer n>2 not equal to 63 can be written as x+y (x>0, y>0) with 2x-1, 2x+1 and 2xy+1 all prime.
Conjecture verified for n up to 10^9. - Mauro Fiorentini, Jul 26 2023

Examples

			a(22)=1 since 22=4+18 with 3*4-1, 3*4+1 and 4*18-1 all prime.
		

Programs

  • Mathematica
    a[n_]:=a[n]=Sum[If[PrimeQ[3k-1]==True&&PrimeQ[3k+1]==True&&PrimeQ[k(n-k)-1]==True,1,0],{k,1,n-1}]
    Do[Print[n," ",a[n]],{n,1,1000}]

A220554 Number of ways to write 2n = p+q (q>0) with p, 2p+1 and (p-1)^2+q^2 all prime.

Original entry on oeis.org

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

Author

Zhi-Wei Sun, Dec 15 2012

Keywords

Comments

Conjecture: a(n)>0 for all n>1.
This has been verified for n up to 2*10^8. It implies that there are infinitely many Sophie Germain primes.
Note that Ming-Zhi Zhang asked (before 1990) whether any odd integer greater than 1 can be written as x+y (x,y>0) with x^2+y^2 prime, see A036468.
Zhi-Wei Sun also made the following related conjectures:
(1) Any integer n>2 can be written as x+y (x,y>=0) with 3x-1, 3x+1 and x^2+y^2-3(n-1 mod 2) all prime.
(2) Each integer n>3 not among 20, 40, 270 can be written as x+y (x,y>0) with 3x-2, 3x+2 and x^2+y^2-3(n-1 mod 2) all prime.
(3) Any integer n>4 can be written as x+y (x,y>0) with 2x-3, 2x+3 and x^2+y^2-3(n-1 mod 2) all prime. Also, every n=10,11,... can be written as x+y (x,y>=0) with x-3, x+3 and x^2+y^2-3(n-1 mod 2) all prime.
(4) Any integer n>97 can be written as p+q (q>0) with p, 2p+1, n^2+pq all prime. Also, each integer n>10 can be written as p+q (q>0) with p, p+6, n^2+pq all prime.
(5) Every integer n>3 different from 8 and 18 can be written as x+y (x>0, y>0) with 3x-2, 3x+2 and n^2-xy all prime.
All conjectures verified for n up to 10^9. - Mauro Fiorentini, Sep 21 2023

Examples

			a(16)=1 since 32=11+21 with 11, 2*11+1=23 and (11-1)^2+21^2=541 all prime.
		

References

  • R. K. Guy, Unsolved Problems in Number Theory, 2nd Edition, Springer, New York, 2004, p. 161.

Programs

  • Mathematica
    a[n_]:=a[n]=Sum[If[PrimeQ[p]==True&&PrimeQ[2p+1]==True&&PrimeQ[(p-1)^2+(2n-p)^2]==True,1,0],{p,1,2n-1}]
    Do[Print[n," ",a[n]],{n,1,1000}]

A232186 Number of ways to write n = p + q (q > 0) with p and p^3 + n*q^2 both prime.

Original entry on oeis.org

0, 0, 1, 1, 2, 1, 1, 2, 3, 1, 1, 1, 2, 2, 3, 2, 2, 5, 1, 1, 3, 1, 5, 4, 2, 3, 3, 1, 2, 3, 2, 4, 6, 2, 3, 5, 2, 3, 3, 3, 2, 3, 4, 2, 4, 3, 2, 2, 3, 2, 6, 2, 3, 3, 5, 4, 4, 4, 5, 9, 1, 4, 7, 3, 4, 6, 3, 5, 8, 3, 5, 6, 5, 5, 13, 2, 4, 5, 4, 4, 7, 5, 5, 13, 3, 5, 8, 6, 4, 6, 4, 3, 8, 3, 4, 9, 1, 4, 11, 3
Offset: 1

Author

Zhi-Wei Sun, Nov 20 2013

Keywords

Comments

Conjecture: a(n) > 0 for all n > 2.

Examples

			a(10) = 1 since 10 = 7 + 3 with 7 and 7^3 + 10*3^2 = 433 both prime.
a(11) = 1 since 11 = 5 + 6 with 5 and 5^3 + 11*6^2 = 521 both prime.
a(124) = 1 since 124 = 19 + 105 with 19 and 19^3 + 124*105^2 = 1373959 both prime.
		

Crossrefs

Programs

  • Mathematica
    a[n_]:=Sum[If[PrimeQ[Prime[k]^3+n*(n-Prime[k])^2],1,0],{k,1,PrimePi[n-1]}]
    Table[a[n],{n,1,100}]

A233439 a(n) = |{0 < k < n: prime(k)^2 + 4*prime(n-k)^2 is prime}|.

Original entry on oeis.org

0, 0, 0, 1, 2, 1, 2, 1, 3, 4, 4, 8, 4, 6, 3, 1, 7, 3, 8, 5, 2, 9, 2, 11, 8, 7, 5, 4, 8, 7, 8, 8, 8, 7, 5, 9, 5, 10, 9, 7, 13, 9, 11, 10, 14, 5, 11, 10, 10, 11, 12, 7, 13, 10, 10, 8, 15, 11, 12, 11, 13, 14, 6, 12, 11, 22, 21, 5, 15, 7, 13, 15, 17, 15, 10, 16, 11, 13, 14, 12, 17, 12, 16, 16, 19, 22, 17, 12, 19, 17, 19, 17, 16, 17, 18, 20, 19, 17, 10, 16
Offset: 1

Author

Zhi-Wei Sun, Dec 09 2013

Keywords

Comments

Conjecture: (i) a(n) > 0 for all n > 3.
(ii) For any integer n > 10, prime(j)^3 + 2*prime(n-j)^2 is prime for some 0 < j < n, and prime(k)^3 + 2*prime(n-k)^3 is prime for some 0 < k < n.
(iii) If n > 5, then prime(k)^3 + 2*p(n-k)^3 is prime for some 0 < k < n, where p(.) is the partition function (A000041). If n > 2, then prime(k)^3 + 2*q(n-k)^3 is prime for some 0 < k < n, where q(.) is the strict partition function (A000009).

Examples

			a(4) = 1 since prime(3)^2 + 4*prime(1)^2 = 5^2 + 4*2^2 = 41 is prime.
a(6) = 1 since prime(5)^2 + 4*prime(1)^2 = 11^2 + 4*2^2 = 137 is prime.
a(8) = 1 since prime(3)^2 + 4*prime(5)^2 = 5^2 + 4*11^2 = 509 is prime.
a(16) = 1 since prime(6)^2 + 4*prime(10)^2 = 13^2 + 4*29^2 = 3533 is prime.
		

Programs

  • Mathematica
    a[n_]:=Sum[If[PrimeQ[Prime[k]^2+4*Prime[n-k]^2],1,0],{k,1,n-1}]
    Table[a[n],{n,1,100}]

A199800 Number of ways to write n = p+q with p, 6q-1 and 6q+1 all prime.

Original entry on oeis.org

0, 0, 1, 2, 2, 2, 2, 3, 2, 3, 0, 4, 2, 4, 3, 2, 2, 3, 3, 5, 3, 3, 3, 4, 4, 3, 2, 4, 3, 5, 3, 4, 3, 5, 5, 6, 3, 4, 3, 5, 5, 5, 6, 5, 4, 5, 5, 6, 7, 5, 4, 5, 4, 7, 6, 4, 4, 4, 5, 6, 6, 5, 6, 7, 4, 5, 2, 4, 7, 5, 7, 4, 5, 6, 7, 7, 7, 5, 6, 4, 7, 4, 7, 7, 6, 5, 3, 5, 8, 7, 7, 5, 5, 6, 4, 5, 4, 5, 8, 7
Offset: 1

Author

Zhi-Wei Sun, Dec 21 2012

Keywords

Comments

Conjecture: a(n)>0 for all n>11.
This implies the twin prime conjecture, and it has been verified for n up to 10^9.
Zhi-Wei Sun also made some similar conjectures, for example, any integer n>5 can be written as p+q with p, 2q-3 and 2q+3 all prime, and each integer n>4 can be written as p+q with p, 3q-2+(n mod 2) and 3q+2-(n mod 2) all prime.

Examples

			a(3)=1 since 3=2+1 with 2, 6*1-1 and 6*1+1 all prime.
		

Programs

  • Mathematica
    a[n_]:=a[n]=Sum[If[PrimeQ[n-k]==True&&PrimeQ[6k-1]==True&&PrimeQ[6k+1]==True,1,0],{k,1,n-1}]
    Do[Print[n," ",a[n]],{n,1,100}]

A232194 Number of ways to write n = x + y (x, y > 0) with n*x + y and n*y - x both prime.

Original entry on oeis.org

0, 0, 1, 1, 2, 1, 2, 2, 2, 3, 3, 3, 2, 3, 4, 2, 4, 2, 3, 1, 5, 4, 4, 1, 4, 3, 8, 3, 7, 2, 6, 3, 7, 4, 9, 3, 5, 4, 6, 3, 8, 4, 7, 5, 8, 3, 7, 4, 6, 3, 8, 3, 8, 2, 12, 4, 9, 4, 9, 4, 10, 3, 9, 7, 10, 5, 9, 4, 10, 4, 6, 5, 8, 3, 7, 5, 11, 7, 9, 8, 11, 5, 11, 8, 13, 4, 9, 5, 8, 7, 12, 6, 9, 5, 15, 7, 10, 5, 15, 10
Offset: 1

Author

Zhi-Wei Sun, Nov 20 2013

Keywords

Comments

Conjecture: (i) a(n) > 0 for all n > 2. Also, a(n) = 1 only for n = 3, 4, 6, 20, 24.
(ii) Any positive integer n not among 1, 30, 54 can be written as x + y (x, y > 0) with n*x + y and n*y + x both prime.
(iii) Each integer n > 1 not equal to 8 can be expressed as x + y (x, y > 0) with n*x^2 + y (or x^4 + n*y) prime.
(iv) Any integer n > 5 can be written as p + q (q > 0) with p and n*q^2 + 1 both prime.
See also A232174 for a similar conjecture.

Examples

			a(3) = 1 since 3 = 1 + 2 with 3*1 + 2 = 3*2 - 1 = 5 prime.
a(4) = 1 since 4 = 1 + 3 with 4*1 + 3 = 7 and 4*3 - 1 = 11 both prime.
a(6) = 1 since 6 = 1 + 5 with 6*1 + 5 = 11 and 6*5 - 1 = 29 both prime.
a(20) = 1 since 20 = 9 + 11 with 20*9 + 11 = 191 and 20*11 - 9 = 211 both prime.
a(24) = 1 since 24*19 + 5 = 461 and 24*5 - 19 = 101 both prime.
		

Programs

  • Mathematica
    a[n_]:=Sum[If[PrimeQ[n*x+(n-x)]&&PrimeQ[n*(n-x)-x],1,0],{x,1,n-1}]
    Table[a[n],{n,1,100}]

A232269 Number of ways to write 2*n + 1 = x + y (x, y > 0) with x^3 + y^2 and x^2 + y^2 both prime.

Original entry on oeis.org

1, 3, 1, 2, 3, 2, 1, 6, 4, 1, 4, 6, 3, 8, 1, 1, 6, 1, 1, 9, 2, 4, 5, 3, 1, 2, 7, 4, 5, 8, 1, 12, 4, 4, 12, 3, 4, 9, 10, 1, 5, 9, 5, 11, 7, 4, 9, 2, 4, 19, 1, 1, 14, 4, 6, 16, 8, 5, 8, 7, 2, 11, 8, 1, 16, 3, 5, 9, 4, 3, 8, 8, 6, 16, 4, 3, 12, 13, 5, 11, 5, 3, 10, 10, 7, 12, 7, 4, 17, 20, 1, 17, 5, 6, 15, 4, 5, 18, 5, 7
Offset: 1

Author

Zhi-Wei Sun, Nov 22 2013

Keywords

Comments

Conjecture: a(n) > 0 for all n > 0. Also, any odd integer greater than one can be written as x + y (0 < x < y) with x^3 + y^2 prime.
The conjecture implies that there are infinitely many primes of the form x^3 + y^2 (x, y > 0) with x^2 + y^2 also prime.
Note that Ming-Zhi Zhang ever asked (cf. A036468) whether any odd integer greater than one can be written as x + y (x, y > 0) with x^2 + y^2 prime.

Examples

			a(10) = 1 since 2*10 + 1 = 1 + 20 with 1^2 + 20^2 = 1^3 + 20^2 = 401 prime.
a(15) = 1 since 2*15 + 1 = 25 + 6 with 25^2 + 6^2 = 661 and 25^3 + 6^2 = 15661 both prime.
a(40) = 1 since 2*40 + 1 = 55 + 26 with 55^2 + 26^2 = 3701 and 55^3 + 26^2 = 167051 both prime.
a(91) =1 since 2*91 + 1 = 85 + 98 with 85^2 + 98^2 = 16829 and 85^3 + 98^2 = 623729 both prime.
		

Programs

  • Mathematica
    a[n_]:=Sum[If[PrimeQ[x^3+(2n+1-x)^2]&&PrimeQ[x^2+(2n+1-x)^2],1,0],{x,1,2n}]
    Table[a[n],{n,1,100}]
Showing 1-10 of 15 results. Next