%I#16 2021年6月25日01:42:40
%S 0,2,3,4,5,7,8,15,18,20,21,22,23,25,26,27,29,30,31,32,34,35,36,38,39,
%电话:40,41,43,44,45,47,48,49,50,52,53,55,63,65,66,67,68,70,71,72,74,75,76,
%电话77,79,80,87105114123135137138139140142143150159162
%N个以9为底的表示具有相同数量的1和6的数。
%H Robert Israel,n的表,n=1..10000的a(n)</a>
%p过滤器:=proc(n)局部L;
%p L:=换算(n,基数,9);
%p编号发生(1,L)=编号发生(6,L)
%p结束过程:
%p选择(过滤器,[$0..1000]);#_罗伯特·伊斯雷尔,2018年3月13日
%o(PARI)isok(n)={my(d=数字(n,9));#select(x->(x==1),d)==#select
%Y参考A007095。
%K nonn,基础,简单
%O 1,2号机组
%A _利维尔·杰拉德_
|