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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A285316型 其中的数字nA019565号(n) >编号。 6
0, 1, 2, 3, 4, 5, 6, 7, 9, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87 (列表图表参考历史文本内部格式)
抵消
1,3
链接
数学
a019565[n_]:=倍@@Prime@Flatten@Position[#,1]&@Reverse@IntegerDigits[n,2];选择[Range[0,100],a019565[#]>#&](*因德拉尼尔·戈什2017年4月18日,之后迈克尔·德弗利格*)
黄体脂酮素
(PARI)
A019565号(n) ={my(j,v);factorback(Mat(向量(如果(n,#n=vecextract(binary(n),“-1.1”)),j,[prime(j),n[j]])~))};\\此函数来自M.F.哈斯勒
是A285316(n)=(A019565号(n) >n);
n=0;k=1;而(k<=10000,如果(isA285316(n)),则写入(“b285316.txt”,k,“”,n);k=k+1);n=n+1);
(方案);;具有安蒂·卡图恩的IntSeq-library
(定义A285316型(匹配位置10(λ(n)(>(A019565号n) n))
(Python)
从运算符导入mul
从sympy导入质数
从functools导入reduce
定义a019565(n):如果n>0,则返回reduce(mul,(prime(i+1)for i,v in enumerate(bin(n)[:1:-1])if v=='1')),否则返回1
打印(如果a019565(n)>n,则[n代表范围(101)中的n)]#因德拉尼尔·戈什2017年4月18日,之后柴华武
交叉参考
补充:A285315型.
囊性纤维变性。A019565号.
关键词
非n
作者
安蒂·卡图恩2017年4月18日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月19日05:19。包含371782个序列。(在oeis4上运行。)