%I#16 2023年3月26日11:15:14

%S 1,2,4,11,13,14,22,26,28,44,52,77,91137146274292548909119802，

%电话：3960490909158823531098901112987013139860141503759416194332，

%电话：19138756219780222597402627928300751884395604451948052526315797692307790909091

%N个数字k，当夹在两个4之间时，给出k的倍数。

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

%e 91属于，因为4914是91的倍数（91×54）。

%t f[k_，d_]：=扁平@桌子[选择[Divisors[k*（10^（i+1）+1）]，IntegerLength[#]==i&]，{i，d}]；f[4,9]（*雷·钱德勒，2007年5月11日*）

%t选择[Range[52000000]，Divisible[FromDigits[Join[{4}，IntegerDigits[#]，{4}]]，#]&]（*哈维·P·戴尔，2011年3月14日*）

%o（Python）

%o来自sympy import isprime

%o从itertools导入计数，islice

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

%o[1，2，4]的产量

%o表示计数（2）中的k：

%o t=4*（10**（k+1）+1）

%o如果t%i==0，则i在（400，40，-1）范围内的产量（t//i）

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

%Y参见A116436、A116437、A116438、A116440、A116441、A116442、A116443、A116444。

%K基，nonn

%O 1,2号机组

%A Giovanni Resta，2006年2月15日

%E a（36）及以上，来自Michael S.Branicky，2023年3月26日