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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A072543号 最大十进制数字也是初始数字的数字。 4
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 20, 21, 22, 30, 31, 32, 33, 40, 41, 42, 43, 44, 50, 51, 52, 53, 54, 55, 60, 61, 62, 63, 64, 65, 66, 70, 71, 72, 73, 74, 75, 76, 77, 80, 81, 82, 83, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 110, 111, 200, 201 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
A054055美元(a(n))=A000030型(a(n));
顺序不同于A009996美元,A032873号A032907号:a(66)=101不在A009996型,a(67)=110不在A032873号a(65)=100不在A032907号.
链接
莱因哈德·祖姆凯勒(Reinhard Zumkeller),n=1..10000时的n,a(n)表
例子
a(10^1)=9
a(10^2)=411
a(10^3)=6216
a(10^4)=73474
a(10^5)=813826
a(10^6)=8512170
a(10^7)=88368780
a(10^8)=911960211
a(10^9)=9237655227
a(10^10)=93323313303
MAPLE公司
对于i从1到10,做A[i]:=i-1 od:
计数:=10:
对于从1到9的i,做P[i]:=[seq([j],j=0..i)];日期:
对于从2到4的d do
对于x从1到9 do
对于p[x]do中的p
count:=计数+1;
A[计数]:=加(p[k]*10^(k-1),k=1..d-1)+x*10^(d-1);
日期:
P[x]:=[seq(seq([op(v),t],v=P[x]]),t=0..x)];
日期:
seq(A[i],i=1..计数)#罗伯特·伊斯雷尔2015年2月1日
数学
选择[Range[0,250],Max[IntegerDigits[#]]==第一个[Integer Digits[#]]&](*哈维·P·戴尔2016年4月28日*)
程序
(哈斯克尔)
a072543 n=a072543列表!!(n-1)
a072543_list=[x|x<-[0..],a054055 x==a000030 x]
--莱因哈德·祖姆凯勒2012年4月25日
(PARI)是(n)=n=数字(n)#n | | n[1]==vecmax(n)\\查尔斯·格里特豪斯四世,2014年1月2日
(PARI)a(n)={d=0;r=1;s=0;i=0;if(n==1,0,n-=2;while(n>总和(i=0,9,(i+1)^d),n-=总和(i=0.9,(i+1)^d);n++;d++);where \=(r+1);i++);s}\\大卫·A·科内斯2015年1月31日
交叉参考
囊性纤维变性。A072544号.
关键词
非n,基础,容易的
作者
扩展
偏移校正人莱因哈德·祖姆凯勒2012年4月25日
状态
已批准

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

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

上次修改时间:2024年4月25日07:41 EDT。包含371964个序列。(在oeis4上运行。)