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-2 of 2 results.

A101638 Number of distinct 4-almost primes A014613 which are factors of n.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 1
Offset: 1

Views

Author

Jonathan Vos Post, Dec 10 2004

Keywords

Comments

This is the inverse Moebius transform of A101637. If we take the prime factorization of n = (p1^e1)*(p2^e2)* ... * (pj^ej) then a(n) = |{k: ek>=4}| + ((j-1)/2)*|{k: ek>=3}| + C(|{k: ek>=2}|,2) + C(j,4). The first term is the number of distinct 4th powers of primes in the factors of n (the first way of finding a 4-almost prime). The second term is the number of distinct cubes of primes, each of which can be multiplied by any of the other distinct primes, halved to avoid double-counts (the second way of finding a 4-almost prime). The third term is the number of distinct pairs of squares of primes in the factors of n (the third way of finding a 4-almost prime). The 4th term is the number of distinct products of 4 distinct primes, which is the number of combinations of j primes in the factors of n taken 4 at a time, A000332(j), (the 4th way of finding a 4-almost prime).

Examples

			a(96) = 2 because 96 = 16 * 6 hence divisible by the 4-almost prime 16 and also 96 = 24 * 4 hence divisible by the 4-almost prime 24.
		

References

  • Hardy, G. H. and Wright, E. M. Section 17.10 in An Introduction to the Theory of Numbers, 5th ed. Oxford, England: Clarendon Press, 1979.

Crossrefs

Programs

  • PARI
    a(n)=my(f=factor(n)[,2], v=apply(k->sum(i=1,#f,f[i]>k), [0..3])); v[4] + v[3]*(v[1]-1) + binomial(v[2],2) + v[2]*binomial(v[1]-1,2) + binomial(v[1],4) \\ Charles R Greathouse IV, Sep 14 2015

A100604 Numbers k such that (prime(k)-1)! + prime(k)^3 is prime.

Original entry on oeis.org

2, 3, 4, 28, 894
Offset: 1

Views

Author

Jonathan Vos Post, Nov 30 2004

Keywords

Comments

k = {2, 3, 4, 28} yields primes p(k) = {3, 5, 7, 107}. There are no more such k up to k=100. Verified by Ray Chandler.
a(5) > 600. - Jinyuan Wang, Apr 10 2020
a(6) > 2500. - Michael S. Branicky, Jul 02 2024

Examples

			a(3) = 4 because (prime(4)-1)! + prime(4)^3 = (7-1)! + 7^3 = 720 + 343 = 1063 is the 3rd prime of this form.
		

Crossrefs

Programs

  • Mathematica
    Select[Range[30],PrimeQ[(Prime[#]-1)!+Prime[#]^3]&] (* Harvey P. Dale, Jul 13 2022 *)
  • PARI
    is(k) = ispseudoprime((prime(k)-1)! + prime(k)^3); \\ Jinyuan Wang, Apr 10 2020

Formula

Numbers k such that (prime(k)-1)! + prime(k)^3 is prime, where prime(k) is the k-th prime.

Extensions

a(5) from Michael S. Branicky, Jul 01 2024
Showing 1-2 of 2 results.