%I#40 2022年9月8日08:44:37
%S 3,13,23,30,31,32,33,34,35,36,37,38,39,43,53,63,73,83,93103113123,
%电话:130131132133134136137138139153163173183193203,
%电话:213223230231232234235236238239243253
%包含3的N个数字。
%H Reinhard Zumkeller,n的表,n=1..10000的a(n)</a>
%H James Grime和Brady Haran,<a href=“http://www.youtube.com/watch?v=UfEiJJGv4CE网站“>3无处不在</a>,Numberphile video,2012。
%H<a href=“/index/Ar#10-automatic”>为10-automatic序列的索引条目</a>。
%F a(n)~n.-Charles R Greathouse IV_,2012年8月28日
%F对于m>=1,a(10^m-9^m)=10^m-7,a(10 ^m-9 ^m+1)=10 ^m+3.-_罗伯特·伊斯雷尔(Robert Israel),2016年1月11日
%p M:=3:#以获得最多M位数的所有项
%p B:={3}:A:={3}:
%p代表i从2到M do
%p B:=映射(t->seq(10*t+j,j=0..9),B)并集
%p{seq(10*x+3,x=10^(i-2)..10^(i-1)-1)}:
%pA:=A活接头B;
%日期:
%p排序(转换(A,列表));#_罗伯特·伊斯雷尔(Robert Israel),2016年1月11日
%t选择[Range[600]-1,DigitCount[#,10,3]>0&](*_Winenzo Librandi_,2016年1月11日*)
%o(哈斯克尔)
%o a011533 n=a011533_列表!!(n-1)
%o a011533_list=过滤器(元素“3”)。显示)[0..]
%o——Reinhard Zumkeller,2015年4月10日
%o(岩浆)[n:n in[0..500]|3 in Intseq(n)];//_文森佐·利班迪(Vincenzo Librandi),2016年1月11日
%o(PARI)isok(n)=我的(d=数字(n));对于(k=1,#d,如果(d[k]==3,返回(1));\\_Michel Marcus,2016年1月11日
%o(GAP)已筛选([1..260],ListOfDigits(n)中的n->3);#_Muniru A Asiru_,2019年2月23日
%Y补码:A052405。
%Y参考A016189。
%包含数字k的Y数字:A011531(k=1)、A011532(k=2)、AO11534(k=4)、A0115(k=5)、A011636(k=6)、A011337(k=7)、A011138(k=8)、A011239(k=9)、A01140(k=0)。
%K nonn,基础,简单
%O 1,1
%A _N.J.A.斯隆_
|