登录
OEIS由支持OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A308456型 不能写为5个平滑数之差的数字(A051037号). 5
281, 289, 353, 413, 421, 439, 443, 457, 469, 493, 541, 562, 563, 578, 581, 583, 641, 653, 661, 677, 683, 691, 701, 706, 707, 731, 733, 737, 751, 761, 769, 779, 787, 793, 803, 811, 817, 823, 826, 827, 829, 841, 842, 843, 853, 857, 867, 877, 878, 881, 883, 886 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
通过按顺序生成达到一定极限的5光滑数并收集差异来找到术语。然后,通过显示以下每个同余,前1000个候选k被证明是正确的:
{5} +-k!=={2,3}型号205910575871,
{3} +-k!=={2,5}型号220411358713,
{2} +-k!=={3,5}型号3019333681,
其中{a,b,…}表示由a,b…生成的子组,。。。关于乘法子群模m的讨论,请参见A308247型.
链接
埃斯特班·克雷斯皮·德瓦尔达乌拉,n=1..1000时的n,a(n)表
例子
281 =A308247型(3) 不能写为5个平滑数的差。所有较小的数字都可以;例如,277=3^4*5-2^7,271=2^3*5^3-3^6。
黄体脂酮素
(PARI)
\\计算序列中的前N个元素。
\\至少前10000个是正确的。
N=100;
\\计算生成的乘法子群
\\通过向量L模m的元素。
SGR(L,m)={S=[1];对于(L=1,长度(L),z=znorder(Mod(L[L],m));T=[1];对于
m1=205910575871;L1=SGR([2,3],m1);M1=SGR([5],M1);
m2=220411358713;L2=SGR([2,5],m2);M2=SGR([3],M2);
立方米=3019333681;L3=SGR([3,5],m3);M3=SGR([2],M3);
chkdif(k)={r=1;
D=1;而(gcd(k/D,30)>1,D*=gcd(k/D,30));
fordiv(D,D,
如果(vecmax(因子(k/d+1)[,1])<=5,r=0);
如果(r,对于(t=1,长度(M1),
如果(setsearch(L1,(M1[t]+k/d)%M1),r=0;断裂);
如果(r,对于(t=1,长度(M2),
如果(集合搜索(L2,(M2[t]+k/d)%M2),r=0;断裂));
如果(r,对于(t=1,长度(M3),
如果(setsearch(L3,(M3[t]+k/d)%M3),r=0;断裂);
如果(r,对于(t=1,长度(M1),
如果(setsearch(L1,(M1[t]-k/d)%M1),r=0;断裂);
如果(r,对于(t=1,长度(M2),
如果(集合搜索(L2,(M2[t]-k/d)%M2),r=0;断裂);
如果(r,对于(t=1,长度(M3),
如果(setsearch(L3,(M3[t]-k/d)%M3),r=0;断裂);
如果(r==0,中断)
);
第页
}
对于(k=1,m3,如果(chkdif(k),打印1(k,“,”);如果(N--==0,中断));打印();
交叉参考
囊性纤维变性。A051037号(5个平滑数字)。
Cf.数不是p的其他值的p光滑数的差:A101082号(p=2),A290365型(p=3),A326318型(p=7),A326319型(p=11),A326320型(p=13)。
囊性纤维变性。A308247型.
关键字
非n
作者
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年6月25日10:28。包含373701个序列。(在oeis4上运行。)