[51nod]1363 最小公倍数之和(欧拉函数)

题意

T\sum_{i=1}^{N} lcm(i,N)

数据范围: T \leq 50000, N\leq 10^{9}

题解

首先\sum_{i=1}^N lcm(i,N)=\sum_{i=1}^N \frac{iN}{gcd(i,N)}=N\sum_{i=1}^N \frac{i}{gcd(i,N)}

其次gcd一定是N的约数,我们枚举gcd的值

在gcd中我介绍过一种对于\sum_{i=1}^N gcd(i,N)的求法,也是枚举gcd的值

对于每个gcd==d,gcd(id,N)=d,\ gcd(i,\frac{N}{i})=1,那么\sum_{i=1}^N gcd(i,N)=\sum_{d|N} d \varphi(\frac{N}{d})

这题运用同样的思想:N\sum_{i=1}^N \frac{i}{gcd(i,N)}=N\sum_{d|N} \sum i[gcd(i,\frac{N}{d})==1]

这里涉及如何对比x小且与x互素的元素求和的子问题

我们注意到若x>1,对于gcd(y,x)=1\quad gcd(x-y,x)=1,故可是配对求和得\frac{x\varphi(x)}{2};x=1和也为1

整理一下答案即为N\sum_{d|N}\sum i[gcd(i,\frac{N}{d})==1]=N(\sum_{d|N,d\neq 1} \frac{d\varphi(d)}{2}+1)=\frac{N}{2} \sum_{d|N} d\varphi (d)(我们可以特别的记\varphi(1)=2或者单列出来\frac{N}{2}(\sum_{d|N}d\varphi(d)+1)考虑1的情况,下面的操作是后者)

 

直接计算会TLE,需要进一步化解

考虑N的素因子分解N=\prod p_i^{a_i},注意到每个p_i对于求和的贡献是相对独立的

我们分析任意p_i:

  • d不含p,p对其贡献为1
  • p^x | d, p^{x+1}\nmid d,贡献为p^x p^x\frac{p-1}{p}=p^{2x-1}(p-1)
  • 所以总共献为(1+(p-1)\sum_{i=1}^{a_i}(p^{2i-1}))
  • 那么\sum_{d|N}d\varphi(d)=\prod(1+(p_i-1)\frac{p_i(p_i^{2a_i}-1)}{p_i^2-1})=\prod(1+\frac{p_i(p_i^{2a_i}-1)}{p_i+1})

 

#include 
#include 
#include 
#include 
using namespace std;

using LL = long long;
const int MOD = 1e9 + 7;
const int MAXN = 4e4 + 5;
int T, N;
bool noprime[MAXN];
int prime[MAXN], cnt_p;
void Euler_Sieve(int top);
LL qpow(LL, LL);

int main(){
  ios::sync_with_stdio(false);
  Euler_Sieve(MAXN - 5);
  int inv_2 = MOD / 2 + 1;
  cin >> T;
  while(T--){
    cin >> N;
    LL ans = N, tmp = 1;

    int i;
    for(i = 1; i <= cnt_p && N >= prime[i]; i++)
      if(N % prime[i] == 0){
        int ind = 0;
        while(N % prime[i] == 0) N /= prime[i], ind++;
        tmp = tmp * (1 + prime[i] * (qpow(prime[i], 2 * ind) - 1 + MOD) % MOD * qpow(prime[i] + 1, MOD - 2) % MOD) % MOD;
      }
    if(N > 1) tmp = tmp * (1 + 1LL * N * (N - 1 + MOD) % MOD) % MOD;

    tmp += 1;
    ans = ans * tmp % MOD;
    ans = ans * inv_2 % MOD;
    cout << ans << endl;
  }
  return 0;
}

LL qpow(LL x, LL n){
  LL res = 1;
  while(n){
    if(n & 1) res = res * x % MOD;
    x = x * x % MOD;
    n >>= 1;
  }
  return res;
}

void Euler_Sieve(int top){
  int i, j;
  for(i = 2; i <= top; i++){
    if(!noprime[i]) prime[++cnt_p] = i;
    for(j = 1; j <= cnt_p && prime[j] * i <= top; j++){
      noprime[prime[j] * i] = true;
      if(i % prime[j] == 0){
        break;
      }
    }
  }

}

 

你可能感兴趣的:(数论-各种数论函数)