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

 

标志
提示
(来自的问候整数序列在线百科全书!)
1967年2月15日 n的素因式分解中素数指数的位和,a(1)=0。 11
0, 1, 1, 2, 1, 1, 1, 3, 2, 1, 1, 0, 1, 1, 1, 4, 1, 0, 1, 0, 1, 1, 1, 1, 2, 1, 3, 0, 1, 1, 1, 5, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 0, 2, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0, 6, 1, 1, 1, 0, 1, 1, 1, 2, 1, 1, 0, 0, 1, 1, 1, 0, 4, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 0, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 0, 1, 1, 1, 0, 0, 1, 1, 1 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,4
评论
对于k=1,2,…,前10^k项的和。。。,是13、105、826、7440、71558、707625、7053959、70473172、70453171、7044701307、70445097231。显然,这个序列的渐近平均值是limit_{m->oo}(1/m)*Sum_{k=1..m}a(k)=0.7044-阿米拉姆·埃尔达尔2022年9月9日
链接
配方奶粉
如果A028234号(n) =1[当n是素数的幂时,inA000961号],a(n)=A067029号(n) ,否则为a(n)=A067029号(n) 和a(A028234号(n) )。[这里的AND代表bitwise-AND,A004198号.]
例子
对于n=24=2^3*3^1,3和1(二进制中的“11”和“01”)的位与等于1,因此a(24)=1。
对于n=210=2^1*3^1*5^1*7^1,1、1、1和1的位和等于1,因此a(210)=1。
对于n=720=2^4*3^2*5^1,4、2和1的位与(二进制中的“100”、“10”和“1”)为零,因此a(720)=0。
数学
{0}~联接~表[BitAnd@@Map[Last,FactorInteger@n],{n,2,120}](*迈克尔·德弗利格2016年2月7日*)
黄体脂酮素
(方案,两种变体)
(定义(1967年2月15日n) (让循环((n(A028234号n) )(z(A067029号n) )(cond((=1 n)z)(else(循环(A028234号n) (A004198bi z(A067029号n) );;A004198bi执行位与(请参见A004198号).
;; 使用记忆definec-macro的递归版本:
(定义(1967年2月15日n) (如果(=1(A028234号n) )(A067029号n) (A004198bi)(A067029号n)(1967年2月15日(A028234号n) )))
(PARI)a(n)=我的(f=系数(n)[,2]);如果(#f==0,则返回(0));我的(b=f[1]);对于(k=2,#f,b=位和(b,f[k]););b\\米歇尔·马库斯,2016年2月7日
(PARI)a(n)=如果(n>1,倍数(位和,因子(n)[,2]),0)\\查尔斯·格里特豪斯四世2016年8月4日
(Python)
从functools导入reduce
从操作员导入和_
来自sympy导入因子
定义1967年2月15日(n) :如果n>1,则返回reduce(and_,factorint(n).values()),否则为0#柴华武2022年8月31日
交叉参考
囊性纤维变性。A002035号(奇数索引),A072587号(出现在a(1)之后的偶数索引)。
囊性纤维变性。A267117号(零指数)。
关键词
非n
作者
安蒂·卡图恩2016年2月3日
状态
经核准的

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

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

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