显示找到的6个结果中的1-6个。
第页1
加法持久性:获得一个数字(加法数字根)所需的位数总和。
+10 20
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2
链接
N.J.A.斯隆,数字的持久性,J.娱乐数学。,6 (1973), 97-98.
MAPLE公司
读取(“转换”);
局部a,nper;
nper:=n;
a:=0;
当nper>9时
nper:=数字和(nper);
a:=a+1;
结束do:
a;
结束进程:
数学
lst={};Do[s=0;当[n>9时,s++;n=Plus@@IntegerDigits[n]];附加到[lst,s],{n,0,98}];第一次(*阿尔卡迪乌斯·韦索洛夫斯基2012年10月17日*)
黄体脂酮素
(PARI)dsum(n)=我的(s);而(n,s+=n%10;n\=10);秒
(Python)
ap=0
当n>9时:
n=总和(int(d)代表str(n)中的d)
ap+=1
返回ap
10, 11, 12, 13, 14, 15, 16, 17, 18, 20, 21, 22, 23, 24, 25, 26, 27, 30, 31, 32, 33, 34, 35, 36, 40, 41, 42, 43, 44, 45, 50, 51, 52, 53, 54, 60, 61, 62, 63, 70, 71, 72, 80, 81, 90, 100, 101, 102, 103, 104, 105, 106, 107, 108, 110, 111, 112, 113, 114, 115, 116
例子
10的数字相加得到1,这是一个单数字,所以10是一个成员。把39的数字相加得到12,这是一个2位数,所以39不是成员-迈克尔·波特2018年5月16日
MAPLE公司
选择(t->convert(转换(t,base,10),`+`)<10,[$10..200])#罗伯特·伊斯雷尔2023年12月28日
数学
选择[Range@120,Length@FixedPointList[Total@Integer Digits@#&,#]==3&](*迈克尔·德弗利格2018年5月14日*)
黄体脂酮素
(PARI)nb(n)={my(nba=0);而(n>9,n=总和(n);nba++);nba;}
isok(n)=nb(n)==1\\米歇尔·马库斯2018年5月13日
29, 47, 83, 137, 173, 191, 227, 263, 281, 317, 353, 443, 461, 599, 641, 797, 821, 887, 911, 977, 1019, 1091, 1109, 1163, 1181, 1217, 1307, 1361, 1433, 1451, 1499, 1523, 1613, 1697, 1721, 1787, 1811, 1877, 1901, 1949, 2027, 2063, 2081, 2153, 2207, 2243
评论
素数三元组是由三个不同的素数组成的一组,因此第三个数字是一个1位数,它是第二个数字的位数之和,第二个数是第一个数字的数字之和。
例子
443在序列中,因为它是素数三元组(443,11,2)中的最大数。
599是第一个数字和不同于11的项(参见。A106754号),即23(参见。A106762号). 这个序列也包含数字和等于41、43、61等的所有素数,但不包括29、47。。。因为第二位数和必须是一个单位数素数,即2、3、5或7-M.F.哈斯勒2022年3月9日
MAPLE公司
过滤器:=proc(n)局部x,y;
如果不是isprime(n),则返回false fi;
x: =转换(convert(n,base,10),`+`);
如果x<10或不是i素数(x),则返回假fi;
y: =转换(转换(x,base,10),`+`);
成员(y,{2,3,5,7})
结束进程:
选择(过滤器,[seq(i,i=11..10000,2)])#罗伯特·伊斯雷尔2021年5月21日
数学
ptQ[n_]:=模块[{c=NestList[Total[IntegerDigits[#]]&,n,2]},长度[Union[c]]==3&And@@PrimeQ[c]];选择[Prime[Range[500]],ptQ](*哈维·P·戴尔2012年8月15日*)
黄体脂酮素
(PARI)选择({是_A119891号(n,s=和数位(n))=比特测试(172,和数位)&&i素数&&s>9&&素数(n)},素数([1,2345])\\M.F.哈斯勒2022年3月9日
作者
Luc Stevens(lms022(AT)yahoo.com),2006年5月27日
199, 289, 298, 379, 388, 397, 469, 478, 487, 496, 559, 568, 577, 586, 595, 649, 658, 667, 676, 685, 694, 739, 748, 757, 766, 775, 784, 793, 829, 838, 847, 856, 865, 874, 883, 892, 919, 928, 937, 946, 955, 964, 973, 982, 991, 1099, 1189, 1198, 1279, 1288, 1297
例子
重复计算以199开头的数字之和,得到19、10,然后是1。有三个步骤,所以加性持久性是3,199是一个成员-迈克尔·波特2018年5月16日
数学
选择[Range@1300,Length@FixedPointList[Total@Integer Digits@#&,#]==5&](*迈克尔·德弗利格2018年5月14日*)
黄体脂酮素
(PARI)nb(n)={my(nba=0);while(n>9,n=总和(n);nba++);nba;}
isok(n)=nb(n)==3\\米歇尔·马库斯2018年5月13日
19999999999999999999999, 28999999999999999999999, 29899999999999999999999, 29989999999999999999999, 29998999999999999999999, 29999899999999999999999, 29999989999999999999999, 29999998999999999999999, 29999999899999999999999, 29999999989999999999999
例子
重复计算以1999999999999999999开始的数字之和,得到199、19、10和1。共有四个步骤,因此加性持久性为4,199999999999999999是一个成员。
数学
取[Sort@Flatten[(FromDigits/@Permutations@#)&/@IntegerPartitions[199,{23},Range@9]],10000](*前10000项,乔瓦尼·雷斯塔2018年5月29日*)
黄体脂酮素
(PARI)nb(n)={my(nba=0);而(n>9,n=总和(n);nba++);nba;}
isok(n)=nb(n)==4\\米歇尔·马库斯2018年5月29日
19999999999999999999999, 28999999999999999999999, 37999999999999999999999, 38899999999999999999999, 46999999999999999999999, 47899999999999999999999, 48889999999999999999999, 55999999999999999999999, 56899999999999999999999, 57799999999999999999999, 57889999999999999999999
例子
重复计算以1999999999999999999开始的数字之和,得到199、19、10和1。共有四个步骤,因此加性持久性为4,199999999999999999是一个成员。
MAPLE公司
S: =proc(d,t,m)#d个数字,和为t,最大值为m
选项记忆;
局部j;
如果d*m<t,则返回[]fi;
如果d=1,则如果t>0,则返回[[t]],否则返回[]fi-fi;
[seq(op(映射(L->[op(L),j],进程名(d-1,t-j,j))),j=1..分钟(m,t))]
结束进程:
seq(op(排序(映射(t->add(t[-i]*10^(i-1),i=1..nops(t)),S(d,199,9))),d=23..24)#罗伯特·伊斯雷尔,2018年6月25日
搜索在0.007秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
上次修改时间:2024年9月23日16:16 EDT。包含376178个序列。(在oeis4上运行。)
|