OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A005171号 非素数的特征函数:如果n是素数,则为0,否则为1。 79
1, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
非素数的特征函数A018252号. -乔纳森·沃斯邮报2007年12月30日
三角形A157423号=A005171号在每一列中。A052284号=的逆变换A005171号和三角形的特征序列A157423号. -加里·亚当森2009年2月28日
参考文献
道格拉斯·霍夫斯塔特(Douglas Hofstatter),《流动概念和创造性类比:思维基本机制的计算机模型》。
链接
R.K.盖伊,强小数定律阿默尔。数学。《95月刊》(1988),第8期,697-712。[带注释的扫描副本]
亚什·普里和托马斯·沃德,周期轨道的算术和增长,J.整数序列。,第4卷(2001年),第01.2.1号。
亚什·普里和托马斯·沃德,Lucas序列特有的动力学性质《斐波纳契季刊》,第39卷,第5期(2001年11月),第398-402页。
配方奶粉
a(n)=(1/n)*Sum{d除以n}mu(d)*A023890号(n/d)。例如,自A023890号是7,第一项是1。[编辑:米歇尔·马库斯,2023年12月14日]
a(n)=1-A010051型(n) ●●●●-乔纳森·沃斯邮报2007年12月30日
a(n)等于由递归定义的表T中的第一列:如果n=k,则T(n,k)=1,否则如果k=1,则T,k=1-乘积{k除以T(n、k)的n},否则,如果k除以n,则T。这是真的,因为T(n,k)=0时,k除以n,n/k是素数,这导致复合数的Product_{k除以n}=0,k的范围是从2到n。因此,在第一列的表达式1-Product_{kdividesn}中还有一个剩余的1。下面提供了一个Mathematica程序作为示例-Mats Granvik公司2013年9月21日
a(n)=A057427号(A239968型(n) )-莱因哈德·祖姆凯勒2014年3月30日
MAPLE公司
A005171号:=进程(n)
如果是素数(n),则
0 ;
其他的
1;
结束if;
结束进程:#R.J.马塔尔2017年5月26日
数学
a[n_]:=如果[PrimeQ@n,0,1];数组[a,105](*罗伯特·威尔逊v2011年6月20日*)
nn=105;t[n,k]:=t[n,k]=If[n=k,1,If[k==1,1-乘积[t[n,k+i],{i,1,n-1}],If[Mod[n,k]==0,t[n/k,1],1],1]];表[t[n,1],{n,1,nn}](*Mats Granvik公司2013年9月21日*)
黄体脂酮素
(PARI)a(n)=如果(n<1,0,!i素数(n))/*迈克尔·索莫斯2005年6月8日*/
(哈斯克尔)
a005171=(1-)。a010051号--莱因哈德·祖姆凯勒2014年3月30日
(Python)
从sympy导入isprime
定义a(n):返回int(非isprime(n))
打印([a(n)表示范围(1106)中的n)]#迈克尔·布拉尼基,2021年10月28日
交叉参考
囊性纤维变性。A010051型,A018252号,A023890号.
关键词
非n,容易的
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月24日16:22。包含372778个序列。(在oeis4上运行。)