编辑

提出

a[1]=1；a[n_]：=a[n]=（k=2；而[底漆Q@k||MemberQ[Array[a，n-1]，k]||编辑距离[到字符串@k, ToString@a（ToString）[n-1]]=1，k++]；k） ；数组[a，77]

提出

编辑

编辑

提出

a[1]=2；a[n_]：=a[n]=（k=2；而[MemberQ[Array[a，n-1]，k]||EditDistance[ToString@k, ToString@a（ToString）[n-1]]=1，k=NextPrime@k]; k） ；数组[a，68]

提出

编辑

编辑

提出

lst={1}；Do[While[f=展平[Integer Digits/@{最后@lst，k}]；

f1级=第一个@排序依据[选择[Table[FromDigits/@TakeDrop[f，m]，{m，长度@f-1}]，包含无[lst，#]&]，第一个]；

!列表Q@f1||MemberQ[lst，k]||包含任意[lst、f1]||相等@@f1||！回文Q@f，k++]；

lst=连接[lst，{k}，f1]；k=1；而[MemberQ[lst，k]，k++]；附加到[lst，k]，{w，20}]；第一次

提出

编辑

编辑

提出

分配一(n个)是 这个 最少的 k个>0 这样的 那个 n个*k个 包含 这个 n个-第 首要的 对于作为 乔治一 卡洛格罗普洛斯子串.

2, 15, 5, 18, 22, 22, 25, 24, 26, 29, 21, 31, 32, 31, 98, 96, 27, 34, 88, 355, 13, 36, 21, 79, 39, 39, 189, 383, 376, 371, 41, 41, 416, 41, 426, 42, 425, 43, 43, 433, 419, 431, 237, 44, 266, 433, 45, 465, 464, 458, 83, 46, 423, 417, 468, 47, 472, 468, 47, 469, 103, 473, 488, 486, 202, 481, 348, 496, 63, 499

1,1

a（8）=24，因为24是最小正整数，使得24×8=192包含素数（8）=19。

a[n_]：=（k=1；而[！StringContainsQ[ToString[n*k]，ToString@素数@n] ，k++]；k） ；数组[a，70]

参见。A000040型.

分配

非n，基础

乔戈斯·卡洛格罗普洛斯2024年4月11日

经核准的

编辑

乔戈斯·卡洛格罗普洛斯：建议的关键字“look”：前10000个术语的情节很有趣

分配给Giorgos Kalogeropoulos

分配

经核准的

编辑

提出