登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 


A355695型
a(n)是正好有n个非正态除数的最小数(A029742号).
1, 10, 20, 30, 48, 72, 60, 140, 144, 120, 210, 180, 300, 240, 560, 504, 360, 420, 780, 1764, 900, 960, 720, 1200, 840, 1560, 2640, 1260, 1440, 2400, 3900, 3024, 1680, 3120, 2880, 4800, 7056, 3600, 2520, 3780, 3360, 5460, 6480, 16848, 6300, 8820, 7200, 9240, 6720, 12480, 5040
抵消
0,2
链接
Michael S.Branicky,n=0..710时的n,a(n)表
例子
48有10个除数:{1,2,3,4,6,8,12,16,24,48},只有12,16,24和48是非趋势性的;小于48的正整数没有四个非正整数除数,因此a(4)=48。
数学
f[n_]:=除数和[n,1&,!回文Q[#]&];seq[len_,nmax_]:=模块[{s=表[0,{len}],c=0,n=1,i},而[c<len&&n<nmax,i=f[n]+1;如果[i<=len&&s[[i]]==0,c++;s[[i]]=n];n++];s] ;序号[50,10^5](*阿米拉姆·埃尔达尔2022年7月14日*)
黄体脂酮素
(PARI)isnp(n)=我的(d=数字(n));d=Vecrev(d)\\A029742号
a(n)=my(k=1);while(sumdiv(k,d,isnp(d)))!=n、 k++);k\\米歇尔·马库斯2022年7月14日
(Python)
从sympy导入除数
从itertools导入计数,islice
定义c(n):s=字符串(n);返回s!=秒[::-1]
def f(n):如果c(d),则返回和(1代表除数中的d(n,生成器=True))
定义代理():
n、 adict=0,dict()
对于计数(1)中的k:
fk=f(k)
如果fk不在adict:adict[fk]=k
而adict中的n:生成adict[n];n+=1
打印(列表(islice(agen(),51))#迈克尔·布拉尼基2022年7月27日
关键词
非n,基础
作者
伯纳德·肖特2022年7月14日
扩展
更多术语来自米歇尔·马库斯2022年7月14日
状态
经核准的

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

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

上次修改时间:2024年9月20日08:53 EDT。包含376067个序列。(在oeis4上运行。)