#来自在线整数序列百科全书的问候!搜索:http://oeis.org/; 搜索:id:a097061〈展示1-1的1-1 ;%I a097061 %S a097061;%S a097061 561639737373361161124124124240127856565656605265838201852828411050985,;;%T A09706185727241190900113224065652802800149014901544444444848484514515632705,;%U A09706970668688736049686868686868686861891217995169835858841881891891892712710194101;%N A0970661 A0970661 1857297061 59970149970194101;卡迈克尔把C数成C,使得C-1不是a尼文/哈沙德数。 %C A097061 8355841,8830801,8927101是前三个连续不符合标准的卡迈克尔数。 %H A097061阿米拉姆·埃尔达,n=1..10000的n,a(n)表%H A097061安德鲁·格兰维尔和卡尔·波默兰斯,关于卡迈克尔数的两个相互矛盾的猜想,数学。比较。71(2002),第883-90页。 %H A097061 Rob Hoogers,包含所有相关数据(5.3MB压缩文本文件)的10^16的完整术语列表%F A097061 a(n)=if(数字总和(n-1))/数字位数<>int(数字总和(n-1)/数字位数,n,0);%e A097061将560中所有数字相加得到11,得到11,这就给了560/11<>int(560/11)和继续1104/6==int(1104/6),1728/18==int(1728/18)等等 %t A0970661选择[范围[10^6],作图作图[##]&&可除数[#1,Carmichaelallampa35; 1,Carmichaelallambanlamb6==int(1104/6),1728/18==1728#DA[#]]&&!可除除的[;(1)1,加上@IntegerDigits@(((;;-1)]&](*[阿米拉姆.艾尔达尔,2019年6月24日,2019年6月24日*);%o A097061(伪码)if((n(n-1)/digitsum(n-1)(n-1)<>int(n-1)/digitsum(n-1),n,n,0);%Y A097061比照A002997,A005349。;%K A097061 nonn,base;%o A097061 1,1,1;%A A097061(伪码)A097061(伪码)如果((n(n-1)/digitsum(n-1)int(n-(chimera(AT)chimera.fol.nl),2004年7月21日 %E A097061,由_T.D.Noe 更正,2006年11月16日 # # #内容根据OEIS最终用户许可协议提供:http://OEIS.org/License