Easy Math Problem

推式子

∑i=1n∑j=1ngcd(i,j)Klcm(i,j)[gcd(i,j)∈prime]∑i=1n∑j=1ngcd(i,j)K−1ij[gcd(i,j)∈prime]∑d∈primendK+1∑i=1nd∑j=1ndij[gcd(i,j)==1]对∑i=1n∑j=1nij[gcd(i,j)==1]化简2(∑i=1niiϕ(i)+[i==1]2)−1=∑i=1ni2ϕ(i)∑d∈primendK+1∑i=1ndi2ϕ(i)\sum_{i = 1} ^{n} \sum_{j = 1} ^{n} gcd(i, j) ^ K lcm(i, j)[gcd(i, j) \in prime]\\ \sum_{i = 1} ^{n} \sum_{j = 1} ^{n} gcd(i, j) ^{K - 1} ij[gcd(i, j) \in prime]\\ \sum_{d \in prime} ^{n} d ^ {K + 1} \sum_{i = 1} ^{\frac{n}{d}} \sum_{j = 1} ^{\frac{n}{d}}ij[gcd(i, j) == 1]\\ 对\sum_{i = 1} ^{n} \sum_{j = 1} ^{n}ij[gcd(i, j) == 1]化简\\ 2(\sum_{i = 1} ^{n} i \frac{i\phi(i) + [i == 1]}{2}) - 1 = \sum_{i = 1} ^{n} i ^ 2 \phi(i) \\ \sum_{d \in prime} ^{n} d ^ {K + 1} \sum_{i = 1} ^{\frac{n}{d}} i ^ 2 \phi(i)\\ i=1∑n​j=1∑n​gcd(i,j)Klcm(i,j)[gcd(i,j)∈prime]i=1∑n​j=1∑n​gcd(i,j)K−1ij[gcd(i,j)∈prime]d∈prime∑n​dK+1i=1∑dn​​j=1∑dn​​ij[gcd(i,j)==1]对i=1∑n​j=1∑n​ij[gcd(i,j)==1]化简2(i=1∑n​i2iϕ(i)+[i==1]​)−1=i=1∑n​i2ϕ(i)d∈prime∑n​dK+1i=1∑dn​​i2ϕ(i)

接下来就是快了的数论分块了,首先我们用min_25得到区间[l,r][l, r][l,r]部分的质数的贡献,然后再通过杜教筛得到后面,两者相乘然后累加即可,对于∑i=1nik+1\sum\limits_{i = 1} ^{n} i ^{k + 1}i=1∑n​ik+1这一部分求和,显然我们可以通过拉格朗日插值来求解。

代码

/*Author : lifehappy
*/
#pragma GCC optimize(2)
#pragma GCC optimize(3)
#include <bits/stdc++.h>#define mp make_pair
#define pb push_back
#define endl '\n'
#define mid (l + r >> 1)
#define lson rt << 1, l, mid
#define rson rt << 1 | 1, mid + 1, r
#define ls rt << 1
#define rs rt << 1 | 1using namespace std;typedef long long ll;
typedef unsigned long long ull;
typedef pair<int, int> pii;const double pi = acos(-1.0);
const double eps = 1e-7;
const int inf = 0x3f3f3f3f;inline ll read() {ll f = 1, x = 0;char c = getchar();while(c < '0' || c > '9') {if(c == '-')    f = -1;c = getchar();}while(c >= '0' && c <= '9') {x = (x << 1) + (x << 3) + (c ^ 48);c = getchar();}return f * x;
}const int N = 1e6 + 10, mod = 1e9 + 7, inv2 = (mod + 1) >> 1, inv6 = (mod + 1) / 6;namespace Djs {int prime[N], cnt;ll phi[N];bool st[N];void init() {phi[1] = 1;for(int i = 2; i < N; i++) {if(!st[i]) {prime[++cnt] = i;phi[i] = i - 1;}for(int j = 1; j <= cnt && 1ll * i * prime[j] < N; j++) {st[i * prime[j]] = 1;if(i % prime[j] == 0) {phi[i * prime[j]] = phi[i] * prime[j];break;}phi[i * prime[j]] = phi[i] * (prime[j] - 1);}}for(int i = 1; i < N; i++) {phi[i] = (phi[i - 1] + 1ll * i * i % mod * phi[i] % mod) % mod;}}ll calc1(ll n) {n %= mod;return (n * (n + 1) % mod * inv2 % mod) * (n * (n + 1) % mod * inv2 % mod) % mod;}ll calc2(ll n) {n %= mod;return n * (n + 1) % mod * (2 * n + 1) % mod * inv6 % mod;}unordered_map<ll, ll> ans_s;ll S(ll n) {if(n < N) return phi[n];if(ans_s.count(n)) return ans_s[n];ll ans = calc1(n);for(ll l = 2, r; l <= n; l = r + 1) {r = n / (n / l);ans = ((ans - (calc2(r) - calc2(l - 1)) * S(n / l) % mod) % mod + mod) % mod;}return ans_s[n] = ans;}
}namespace Lagrange {const int N = 110;ll fac[N], pre[N], suc[N], inv[N], prime[N], sum[N], mu[N], n, k, cnt;bool st[N];ll quick_pow(ll a, int n) {ll ans = 1;while(n) {if(n & 1) ans = ans * a % mod;a = a * a % mod;n >>= 1;}return ans;}void init1() {fac[0] = inv[0] = 1;for(int i = 1; i < N; i++) {fac[i] = 1ll * fac[i - 1] * i % mod;}inv[N - 1] = quick_pow(fac[N - 1], mod - 2);for(int i = N - 2; i >= 1; i--) {inv[i] = 1ll * inv[i + 1] * (i + 1) % mod;}}void init() {for(int i = 1; i < N; i++) {st[i] = 0;}cnt = 0;sum[1] = 1;for(int i = 2; i < N; i++) {if(!st[i]) {prime[cnt++] = i;sum[i] = quick_pow(i, k);}for(int j = 0; j < cnt && i * prime[j] < N; j++) {st[i * prime[j]] = 1;sum[i * prime[j]] = 1ll * sum[i] * sum[prime[j]] % mod;if(i % prime[j] == 0) break;}}for(int i = 1; i < N; i++) {sum[i] = (sum[i] + sum[i - 1]) % mod;}}ll solve(ll n) {n %= mod;ll ans = 0;pre[0] = suc[k + 3] = 1;for(int i = 1; i <= k + 2; i++) pre[i] = 1ll * pre[i - 1] * (n - i) % mod;for(int i = k + 2; i >= 1; i--) suc[i] = 1ll * suc[i + 1] * (n - i) % mod;for(int i = 1; i <= k + 2; i++) {ll a = 1ll * pre[i - 1] * suc[i + 1] % mod, b = 1ll * inv[i - 1] * inv[k + 2 - i] % mod;if((k + 2 - i) & 1) b *= -1;ans = ((ans + 1ll * sum[i] * a % mod * b % mod) % mod + mod) % mod;}return (ans - 1 + mod) % mod;}
}namespace Min_25 {int prime[N], id1[N], id2[N], cnt, m, k, T;ll g[N], sum[N], a[N], n;bool st[N];int ID(ll x) {return x <= T ? id1[x] : id2[n / x];}void init(ll x, int y) {n = x, k = y;cnt = 0, m = 0;T = sqrt(n + 0.5);for(int i = 2; i <= T; i++) {if(!st[i]) {prime[++cnt] = i;sum[cnt] = (sum[cnt - 1] + Lagrange::quick_pow(i, k)) % mod;}for(int j = 1; j <= cnt && 1ll * i * prime[j] <= T; j++) {st[i * prime[j]] = 1;if(i % prime[j] == 0) {break;}}}for(ll l = 1, r; l <= n; l = r + 1) {r = n / (n / l);a[++m] = n / l;if(a[m] <= T) id1[a[m]] = m;else id2[n / a[m]] = m;g[m] = Lagrange::solve(a[m]);}for(int j = 1; j <= cnt; j++) {for(int i = 1; i <= m && 1ll * prime[j] * prime[j] <= a[i]; i++) {g[i] = ((g[i] - Lagrange::quick_pow(prime[j], k) * (g[ID(a[i] / prime[j])] - sum[j - 1]) % mod) % mod + mod) % mod;}}for(int i = 1; i <= T; i++) {st[i] = 0;}}ll solve(ll x) {if(x <= 1) return 0;return g[ID(x)];}
}int main() {// freopen("in.txt", "r", stdin);// freopen("out.txt", "w", stdout);// ios::sync_with_stdio(false), cin.tie(0), cout.tie(0);Djs::init();Lagrange::init1();int T = read();while(T--) {ll n = read(), k = read() + 1;Lagrange::k = k;Lagrange::init();Min_25::init(n, k);ll ans = 0;for(ll l = 1, r; l <= n; l = r + 1) {r = n / (n / l);ans = (ans + (Min_25::solve(r) - Min_25::solve(l - 1)) * Djs::S(n / l) % mod) % mod;}printf("%lld\n", (ans % mod + mod) % mod);}return 0;
}

HDU 6607 Easy Math Problem(杜教筛 + min_25 + 拉格朗日插值)相关推荐

  1. [复习]莫比乌斯反演,杜教筛,min_25筛

    [复习]莫比乌斯反演,杜教筛,min_25筛 莫比乌斯反演 做题的时候的常用形式: \[\begin{aligned}g(n)&=\sum_{n|d}f(d)\\f(n)&=\sum_ ...

  2. 「LibreOJ Round #11」Misaka Network 与求和(杜教筛 + Min_25)

    #572. 「LibreOJ Round #11」Misaka Network 与求和 推式子 ∑i=1n∑j=1nf(gcd(i,j))k∑d=1nf(d)k∑i=1nd∑j=1nd[gcd(i,j ...

  3. 【LOJ#572】Misaka Network 与求和(莫比乌斯反演/杜教筛/min_25筛)

    [LOJ#572]Misaka Network 与求和 https://www.cnblogs.com/cjyyb/p/10170630.html 看到次大质因子就可以想到是min_25筛了,然后只需 ...

  4. [51NOD1847]奇怪的数学题(杜教筛+min_25筛+第二类斯特林数)

    f(x)f(x)f(x)表示xxx的次大约数,有f(x)=xx的最小质因数f(x)=\frac{x}{x的最小质因数}f(x)=x的最小质因数x​,那么 ∑i=1n∑j=1nsgcd(i,j)k=∑i ...

  5. Loj #572. 「LibreOJ Round #11」Misaka Network 与求和(莫比乌斯反演 + 杜教筛 + min_25筛(递推版))

    直接反演一下:∑i=1n∑i=1nf(gcd(i,j))k\sum_{i = 1}^n\sum_{i = 1}^nf(gcd(i,j))^ki=1∑n​i=1∑n​f(gcd(i,j))k=∑d=1n ...

  6. 1847 奇怪的数学题(杜教筛 + Min_25 + 第二类斯特林数)

    1847 奇怪的数学题 推式子 ∑i=1n∑j=1nsgcd(i,j)k∑d=1nsgcd(d)k∑i=1nd∑j=1nd[gcd(i,j)=1]∑d=1nsgcd(d)k(2∑i=1ndϕ(i)−1 ...

  7. Lady Layton with Math(杜教筛)

    Lady Layton with Math ∑i=1n∑j=1nϕ(gcd(i,j))∑d=1nϕ(d)∑i=1n∑j=1n[gcd(i,j)=d]∑d=1nϕ(d)∑i=1nd∑j=1nd[gcd( ...

  8. Easy Math(ACM-ICPC 2018 徐州赛区网络预赛)(递归 + 杜教筛)

    Easy Math 推式子 ∑i=1mμ(in)∑i=1mμ(i×nd×d),d是n的一个质因子i,d互质项有(−∑i=1mμ(i×nd)),由于减去了多余的非互质项,所以加上,−∑i=1mμ(i×n ...

  9. 2018 ICPC 徐州网络赛 D. Easy Math(思维,反演,杜教筛)

    整理的算法模板合集: ACM模板 点我看算法全家桶系列!!! 实际上是一个全新的精炼模板整合计划 题目链接 https://nanti.jisuanke.com/t/A2003 Problem 计算 ...

最新文章

  1. 安装旧版本插件_iOS 应用降级插件,支持任意版本升降
  2. 阿里数学竞赛最年轻金奖得主:15岁读少年班,21岁UC伯克利读博,想毕业就回国...
  3. Java多线程闲聊(三):RxJava
  4. 22、UPDATE多表关联更新
  5. python字符串截取拼接_Python字符串拼接、截取及替换方法总结分析
  6. Repeater无刷新分页
  7. 二叉树的遍历(递归,非递归,Morris)
  8. nssl1487-图
  9. php重定义地址栏url,thinkphp框架实现路由重定义简化url访问地址的方法分析
  10. 刷抖音看到 Python 工程师的工资条后,我沉默了...
  11. 搜狗输入法不能输入验证码,验证码错误怎么办?
  12. linux手动安装rsync_Linux中安装使用rsync | 学步园
  13. vim YouCompleteMe
  14. Java—读取指定路径下文件的内容
  15. Info.plist中 各字段详解
  16. Linux开发之libaio源码分析及应用
  17. 【PC端】jQuery+PHP实现浏览更多内容(jquery.more.js插件)
  18. Python爬虫入门教程 25-100 知乎文章图片爬取器之一
  19. 在c语言中保留字是有专门含义和作用的,c语言中的关键字和保留字的区别?
  20. latex beamer 制作ppt,包括动画效果。插入gif图

热门文章

  1. deb php7 fileinfo,linux安装php7.2扩展fileinfo
  2. 史上最气人的数学家:文理双全智商还高,说话只说半句,解题只解半个,调戏人调戏了三百年还不够......
  3. 970页绝版资料!初高中数学与竞赛知识点+方法技巧,由苏步青当顾问,众多一线名师共同编写!...
  4. 理科生浪漫起来,谁都顶不住!
  5. 减肥瘦不下来的原因找到了
  6. “甜橙金融杯”数据建模大赛发布,8万重金寻找大数据金融人才!
  7. influxdb mysql对比_InfluxDB和MySQL的读写对比测试
  8. 华为的型号命名规则_华为最实惠5G手机来了!畅享Z 5G宣布:5月24日发
  9. leetcode双指针合集
  10. leetcode844. 比较含退格的字符串(栈+双指针)