Project Euler 501 Eight Divisors (数论)

Posted lzyrapx

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Project Euler 501 Eight Divisors (数论)相关的知识,希望对你有一定的参考价值。

题目链接:

https://projecteuler.net/problem=501

题意:

\(f(n)\) be the count of numbers not exceeding \(n\) with exactly eight divisors.

就是找少于等于 \(n\)中只有8个因子的个数。

You are given \(f(100) = 10, f(1000) = 180\) and \(f(106) = 224427\).

Find \(f(10^{12})\)

题解:

我们知道,对于 \(n=\prod p_i^{a_i}\) ,那么,\(n\)的因子的个数有 \(\prod (a_i+1)\)个。

那么,符合题目条件的只有三种情况。

\(1.p^{7} <= n\)

\(2.p^{3} * q <= n\)

\(3.p * q * r <= n\)

其中,\(p,q,r\)是各自不相等的质数,并且 \(p < q < r\)

和这题套路一样。

http://codeforces.com/problemset/problem/665/F

Codefores这题代码:

#include <bits/stdc++.h>
using namespace std;

const int MAX = 2e6+5;   
const int M = 7;         
typedef long long ll;
vector<int> lp, primes, pi;
int phi[MAX+1][M+1], sz[M+1];

void factor_sieve()
{
    lp.resize(MAX);
    pi.resize(MAX);
    lp[1] = 1;
    pi[0] = pi[1] = 0;
    for (int i = 2; i < MAX; i++) {
        if (lp[i] == 0) {
            lp[i] = i;
            primes.emplace_back(i);
        }
        for (int j = 0; j < primes.size() && primes[j] <= lp[i]; j++) {
            int x = i * primes[j];
            if (x >= MAX) break;
            lp[x] = primes[j];
        }
        pi[i] = primes.size();
    }
}

void init()
{
    factor_sieve();
    for(int i = 0; i <= MAX; i++) {
        phi[i][0] = i;
    }
    sz[0] = 1;
    for(int i = 1; i <= M; i++) {
        sz[i] = primes[i-1]*sz[i-1];
        for(int j = 1; j <= MAX; j++) {
            phi[j][i] = phi[j][i-1] - phi[j/primes[i-1]][i-1];
        }
    }
}

int sqrt2(long long x)
{
    long long r = sqrt(x - 0.1);
    while (r*r <= x) ++r;
    return r - 1;
}

int cbrt3(long long x)
{

    long long r = cbrt(x - 0.1);
    while(r*r*r <= x) ++r;
    return r - 1;
}

long long getphi(long long x, int s)
{
    if(s == 0)  return x;
    if(s <= M)
        {
        return phi[x%sz[s]][s] + (x/sz[s])*phi[sz[s]][s];
    }
    if(x <= primes[s-1]*primes[s-1])
       {
        return pi[x] - s + 1;
    }
    if(x <= primes[s-1]*primes[s-1]*primes[s-1] && x < MAX)
        {
        int sx = pi[sqrt2(x)];
        long long ans = pi[x] - (sx+s-2)*(sx-s+1)/2;
        for(int i = s+1; i <= sx; ++i) {
            ans += pi[x/primes[i-1]];
        }
        return ans;
    }
    return getphi(x, s-1) - getphi(x/primes[s-1], s-1);
}

long long getpi(long long x)
{
    if(x < MAX)   return pi[x];
    int cx = cbrt3(x), sx = sqrt2(x);
    long long ans = getphi(x, pi[cx]) + pi[cx] - 1;
    for(int i = pi[cx]+1, ed = pi[sx]; i <= ed; i++)
       {
        ans -= getpi(x/primes[i-1-1]) - i + 1;
    }
    return ans;
}

long long lehmer_pi(long long x)
{
    if(x < MAX)   return pi[x];
    int a = (int)lehmer_pi(sqrt2(sqrt2(x)));
    int b = (int)lehmer_pi(sqrt2(x));
    int c = (int)lehmer_pi(cbrt3(x));
    long long sum = getphi(x, a) + (long long)(b + a - 2) * (b - a + 1) / 2;
    for (int i = a + 1; i <= b; i++)
       {
        long long w = x / primes[i-1];
        sum -= lehmer_pi(w);
        if (i > c) continue;
        long long lim = lehmer_pi(sqrt2(w));
        for (int j = i; j <= lim; j++)
               {
            sum -= lehmer_pi(w / primes[j-1]) - (j - 1);
        }
    }
    return sum;
}

long long power(long long a, long long b)
{
    long long x = 1, y = a;
    while(b)
      {
        if (b&1)  x = x * y;
        y = y * y;
        b >>= 1;
    }
    return x;
}
void solve(long long n)
{
  ll ans = 0;
  // case 1: p^3 <= n ,p is a prime
  for(int i = 0; i < (int)primes.size(); i++) {
    if (power(primes[i], 3) <= n) {
      //std::cout << primes[i] << '\n';
      ans += 1;
    }
    else {
      break;
    }
  }
  //  std::cout << "ans=" <<ans << '\n'<<'\n';
  // case 2: p*q <= n (p < q)
  // p, q is distinct primes
  ll cnt = 0;
  ll q = 0;
  for(int i = 0; i < (int)primes.size(); i++) //p
  {
    ll x = (ll)primes[i]; // p
    q = n / x; //q
    if(q <= x)continue;
    if(q == 0)continue;
    //std::cout << "p=" << x << '\n';
    //std::cout << "q=" << q << '\n';
    cnt = lehmer_pi(q);
    if (q >= primes[i]) {
      cnt -= lehmer_pi(x);
    }
    if (cnt <= 0) break;
    //std::cout << "cnt=" <<cnt << '\n';
    ans += cnt;
  }
  //  std::cout << "p*q finish!" << '\n';

  std::cout << ans << '\n';
}
int main(int argc, char const *argv[])
{
  ll n;
  init();
  scanf("%lld", &n);
  solve(n);
  return 0;
}

PE501代码:

利用 Lucy_Hedgehog‘s method. \(O(n^{3/4})\)。跑10min左右...太慢了..

#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
const int maxn = 2000010;
vector<int> mark,prime;
void init()
{
    mark.resize(maxn);
    mark[1] = 1;
    for (int i = 2; i < maxn; i++)
    {
    if (mark[i] == 0)
    {
        mark[i] = i;
        prime.emplace_back(i);
    }
    for (int j = 0; j < (int)prime.size() && prime[j] <= mark[i]; j++)
    {
       int x = i * prime[j];
       if (x >= maxn) break;
       mark[x] = prime[j];
    }
    }
}
ll check(ll v, ll n, ll ndr, ll nv) {
    return v >= ndr ? (n / v - 1) : (nv - v);
}
ll primenum(ll n) // O(n^(3/4))
{
  assert(n>=1);
  ll r = (ll)sqrt(n);
  ll ndr = n / r;
  assert(r*r <= n && (r+1)*(r+1) > n);
  ll nv = r + ndr - 1;
  std::vector<ll> S(nv+1);
  std::vector<ll> V(nv+1);
  for(ll i=0;i<r;i++) {
    V[i] = n / (i+1);
  }
  for(ll i=r;i<nv;i++) {
    V[i] = V[i-1] - 1;
  }
  for(ll i = 0;i<nv;i++) {
    S[i] = V[i] - 1; //primes number
  }
  for(ll p=2;p<=r;p++) {
    if(S[nv-p] > S[nv-p+1]) {
      ll sp = S[nv-p+1]; // sum of primes smaller than p
      ll p2 = p*p;
  //    std::cout << "p=" << p << '\n'; // p is prime
      for(ll i=0;i<nv;i++) {
        if(V[i] >= p2) {
          S[i] -= 1LL  * (S[check(V[i] / p, n, ndr, nv)] - sp);
        }
        else break;
      }
    }
  }
  ll ans = S[0];
  return ans;
}

ll qpower(ll a, ll b)
{
   ll res = 1;
   while(b)
   {
    if (b&1)  res = res * a;
    a = a * a;
    b >>= 1;
   }
   return res;
}

void solve(ll n)
{

  ll ans = 0;
  // case 1: p^7 <= n ,p is a prime
  for(int i = 0; i < (int)prime.size(); i++) {
    // for example 2^7 = 128 <=n
    if (qpower(prime[i], 7) <= n) {
      //std::cout << primes[i] << '\n';
      ans += 1;
    }
    else {
      break;
    }
  }
  std::cout << "p^7 finish!" << '\n';

  // case 2: p^3*q <= n (p < q)
  // p, q is distinct primes
  ll cnt = 0;
  for(int i = 0; i < (int)prime.size(); i++) //p
  {
    ll x = (ll)prime[i]*prime[i]*prime[i]; // p^3
    x = n / x; //q
    if(x == 0)continue;
    cnt = primenum(x);
    if (x >= prime[i]) {
      cnt -= 1;
    }
    if (cnt <= 0) break;
    ans += cnt;
  }
  std::cout << "p^3*q finish!" << '\n';

  //case 3: p*q*r <= n (p < q < r)
  // p,q,r is distinct primes
  for(int i = 0; i < (int)prime.size(); i++) // p
  {
    if (qpower(prime[i], 3) > n) {
      break;
    }
    for(int j = i+1; j < (int)prime.size(); j++) // q
    {
      ll x = n / ((ll)prime[i]*prime[j]);
      if(x <= j)continue;
      if(x == 0)continue;
      cnt = primenum(x); // r
      cnt -= j+1;
      if (cnt <= 0) break;
      ans += cnt;
    }
  }
  std::cout << "p*q*r finish!" << '\n';
  std::cout << ans << '\n';
  cerr << "Time elapsed: " << 1.0 * clock() / CLOCKS_PER_SEC << " s.\n";
}
int main(int argc, char const *argv[])
{
  /* code */
  init();
  solve(100);
  solve(1000);
  solve(1000000);
  solve(1e12);
  return 0;
}

利用Meisell-Lehmer‘s method。\(O(n^{2/3})\)。跑10s..

#include <bits/stdc++.h>
using namespace std;

const int MAX = 2e6+5;  
const int M = 7;      

vector<int> lp, primes, pi;
int phi[MAX+1][M+1], sz[M+1];

void factor_sieve()
{
    lp.resize(MAX);
    pi.resize(MAX);
    lp[1] = 1;
    pi[0] = pi[1] = 0;
    for (int i = 2; i < MAX; i++) {
        if (lp[i] == 0) {
            lp[i] = i;
            primes.emplace_back(i);
        }
        for (int j = 0; j < primes.size() && primes[j] <= lp[i]; j++) {
            int x = i * primes[j];
            if (x >= MAX) break;
            lp[x] = primes[j];
        }
        pi[i] = primes.size();
    }
}

void init()
{
    factor_sieve();
    for(int i = 0; i <= MAX; i++) {
        phi[i][0] = i;
    }
    sz[0] = 1;
    for(int i = 1; i <= M; i++) {
        sz[i] = primes[i-1]*sz[i-1];
        for(int j = 1; j <= MAX; j++) {
            phi[j][i] = phi[j][i-1] - phi[j/primes[i-1]][i-1];
        }
    }
}

int sqrt2(long long x)
{
    long long r = sqrt(x - 0.1);
    while (r*r <= x) ++r;
    return r - 1;
}

int cbrt3(long long x)
{

    long long r = cbrt(x - 0.1);
    while(r*r*r <= x) ++r;
    return r - 1;
}

long long getphi(long long x, int s)
{
    if(s == 0)  return x;
    if(s <= M)
  {
        return phi[x%sz[s]][s] + (x/sz[s])*phi[sz[s]][s];
    }
    if(x <= primes[s-1]*primes[s-1])
  {
        return pi[x] - s + 1;
    }
    if(x <= primes[s-1]*primes[s-1]*primes[s-1] && x < MAX)
  {
        int sx = pi[sqrt2(x)];
        long long ans = pi[x] - (sx+s-2)*(sx-s+1)/2;
        for(int i = s+1; i <= sx; ++i) {
            ans += pi[x/primes[i-1]];
        }
        return ans;
    }
    return getphi(x, s-1) - getphi(x/primes[s-1], s-1);
}

long long getpi(long long x)
{
    if(x < MAX)   return pi[x];
    int cx = cbrt3(x), sx = sqrt2(x);
    long long ans = getphi(x, pi[cx]) + pi[cx] - 1;
    for(int i = pi[cx]+1, ed = pi[sx]; i <= ed; i++)
  {
        ans -= getpi(x/primes[i-1-1]) - i + 1;
    }
    return ans;
}

long long lehmer_pi(long long x)
{
    if(x < MAX)   return pi[x];
    int a = (int)lehmer_pi(sqrt2(sqrt2(x)));
    int b = (int)lehmer_pi(sqrt2(x));
    int c = (int)lehmer_pi(cbrt3(x));
    long long sum = getphi(x, a) + (long long)(b + a - 2) * (b - a + 1) / 2;
    for (int i = a + 1; i <= b; i++)
    {
        long long w = x / primes[i-1];
        sum -= lehmer_pi(w);
        if (i > c) continue;
        long long lim = lehmer_pi(sqrt2(w));
        for (int j = i; j <= lim; j++)
        {
            sum -= lehmer_pi(w / primes[j-1]) - (j - 1);
        }
    }
    return sum;
}

long long power(long long a, long long b)
{
    long long x = 1, y = a;
    while(b)
  {
        if (b&1)  x = x * y;
        y = y * y;
        b >>= 1;
    }
    return x;
}
void solve(long long n)
{
    init();
    long long ans = 0, val = 0;

    // case : p^7 <= n ,p is a prime
    for(int i = 0; i < primes.size(); i++) {
        // for example 2^7 = 128 <=n
        if (power(primes[i], 7) <= n) {
          //std::cout << primes[i] << '\n';
            ans += 1;
        }
        else {
            break;
        }
    }
    //  std::cout << "ans = " << ans << '\n';

    // case : p^3*q <= n (assume q > p for finding unique pairs)
       // p, q is distinct primes
    for(int i = 0; i < primes.size(); i++) //p
    {
        long long x = (long long)primes[i]*primes[i]*primes[i]; // p^3
        x = n / x; //q
        val = lehmer_pi(x);
        if (x >= primes[i]) {
            val -= 1;
        }
        if (val <= 0) break;
        ans += val;
    }
    //case : p*q*r <= n (assume r > q > p for finding unique pairs)
        // p,q,r is distinct primes
    for(int i = 0; i < primes.size(); i++) // p
    {
        if (power(primes[i], 3) > n) {
            break;
        }
        for(int j = i+1; j < primes.size(); j++) // q
               {
            long long x = n / ((long long)primes[i]*primes[j]);
                    if(x < j)continue;
            val = lehmer_pi(x); // r
            val -= j+1; // 减去 计算 <=x 的素数个数中多余的
            if (val <= 0) break;
            ans += val;
        }
    }
    std::cout << ans << '\n';
    cerr << "Time elapsed: " << 1.0 * clock() / CLOCKS_PER_SEC << " s.\n";
}
int main(int argc, char const *argv[])
{
  /* code */
  solve(1e12);
  return 0;
}

以上是关于Project Euler 501 Eight Divisors (数论)的主要内容,如果未能解决你的问题,请参考以下文章

Project Euler 做题记录

Project Euler 73: Counting fractions in a range

Project Euler Problem 675

[Project Euler 429] Sum of squares of unitary divisors(数论)

Project-Euler (Make/Source) 的有用文件夹结构? [关闭]

Project Euler 109 :Darts 飞镖