%I#20 2023年4月6日10:38:05

%S 1711717727177491883919933217612277729391303973115731317，

%电话：31643339493419935909397233978939803398134297344219，

%电话：44517463474746349171497714987753211537515716957311577695778157941579435796159093

%N编号k，使A361338（k）=10。

%H Michael S.Branicky，n的表，a（n）表示n=1..10000</a>

%o（Python）

%o从itertools导入计数，islice

%o来自math导入prod

%o定义A361338（n）：

%o c，d，m={n}，集（），0

%o为True时：

%o c=当k%（s：=（r:=10**（i-1））*10）>=r或i==1）

%o d |=c

%o如果（r:=len（d））==m：

%o返回和（如果q＜10，则d中的q为1）

%o m=r

%o定义A361349_gen（startvalue=1）：#术语生成器>=startvalue

%o回流过滤器（λn:A361338（n）==10，计数（最大值（起始值，1）））

%o A361349_list=list（岛屿（A361349-gen（），10））#_Chai Wah Wu_，2023年4月5日至6日

%o（Python）

%o从functools导入lru_cache

%o从itertools导入计数，islice

%o@lru_cache（maxsize=无）

%o定义f（n）：

%o如果n<10：返回{n}

%o s=str（n）

%o如果s[i]！=“0”或i==len（s）-1表示f（int（s[：i]）*int（s[i:]））}中的e，则返回{e表示范围（1，len（s]）中的i

%o def agen（）：#术语生成器

%o如果len（f（k））==10，则从（k for k in count（））中的k得到

%o打印（列表（islice（agen），38））#_Michael S.Branicky_，2023年4月5日

%Y参见A361338、A361341-A361348。

%K nonn，基础

%O 1,1号机组

%A _N.J.A.Sloane，2023年4月5日

%E a（4）-a（38），来自恰瓦乌，2023年4月5日