%I#29 2023年5月20日03:25:22
%S 0,2,3,5,6,7,8,15,16,17,18,20,22,23,24,25,26,27,28,30,45,47,48,50,52,
%电话:53,55,57,58,60,62,63,64,65,66,67,68,70,73,74,75,76,77,78,80,82,83,84,
%U 85,86,87,88,92,93,94,95,97,98143144150153156157158单位
%N对k进行编号,使k^2在十进制扩展中缺少数字1。
%H Mohammed Yaseen,n的表,a(n)表示n=1..10000</a>
%F来自Mohammed Yaseen_,2023年4月18日:(开始)
%F最小的n位数项~sqrt(2)*10^(n-1)。
%F最大的n位数项=10^n-2(参见A099150)。(结束)
%e98是这个序列,因为98^2=9604。
%e99不在这个序列中,因为99^2=9801。
%p过滤器:=n->非成员(1,转换(n^2,基数,10)):
%p选择(过滤器,[$0..200]);#_罗伯特·伊斯雷尔,2023年4月27日
%t选择[Range[0,200],DigitCount[#^2,10,1]==0&]
%o(岩浆)[0..200]中的n:n,而不是Intseq中的1(n^2)];
%o(Python)
%o def ok(k):返回“1”不在str中(k**2)
%o打印([k代表范围(160)内的k,如果可以(k)])#_Michael S.Branicky_,2023年4月27日
%o(PARI)isok(k)=!vecsearch(设置(数字(k^2)),1);\\_米歇尔·马库斯,2023年4月29日
%Y参考A052383、A052040、A099150。
%K nonn,基础
%O 1,2号机组
%A _文森佐图书馆_,2015年2月22日
|