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.

A304031 Number of ways to write 2*n as p + 2^k + 5^m with p prime and 2^k + 5^m a product of at most three distinct primes, where k and m are nonnegative integers.

Original entry on oeis.org

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

Views

Author

Zhi-Wei Sun, May 04 2018

Keywords

Comments

a(n) > 0 for all 1 < n <= 10^10 with the only exception n = 3114603841, and 2*3114603841 = 6219442049 + 2^3 + 5^10 with 6219442049 prime and 2^3 + 5^10 = 3*17*419*457 squarefree.
Note that a(n) <= A303934(n) <= A303821(n).

Examples

			a(3) = 1 since 2*3 = 3 + 2^1 + 5^0 with 3 = 2^1 + 5^0  prime.
a(7) = 2 since 2*7 = 7 + 2^1 + 5^1 with 7 = 2^1 + 5^1 prime, and 2*7 = 11 + 2^1 + 5^0 with 11 and 2^1 + 5^0 both prime.
a(42908) = 2 since 2*42908 = 85751 + 2^6 + 5^0 with 85751 prime and 2^6 + 5^0 = 5*13, and 2*42908 = 69431 + 2^14 + 5^0 with 69431 prime and 2^14 + 5^0 = 5*29*113.
		

Crossrefs

Programs

  • Mathematica
    qq[n_]:=qq[n]=SquareFreeQ[n]&&Length[FactorInteger[n]]<=3;
    tab={};Do[r=0;Do[If[qq[2^k+5^m]&&PrimeQ[2n-2^k-5^m],r=r+1],{k,0,Log[2,2n-1]},{m,0,Log[5,2n-2^k]}];tab=Append[tab,r],{n,1,90}];Print[tab]