%I#16 2020年3月22日23:42:26

%编号：2,772572570816258081632998128162463060246306030，

%电话：791999183812812816258187657881649658057247924719918812812816，

%电话：8128140492564

%N a（N）是正好包含N 3的最小三角形数的索引。

%H Eric Weistein的《数学世界》，<a href=“http://mathworld.wolfram.com/TriangularNumber.html“>三角形编号</a>

%t nsmall=表格[Infinity，20]；

%t对于[i=0，i<=10^6，i++，p=PolygonalNumber[i]；

%t n0=计数[整数位数[p]，3]；

%t如果[nsmall[[n0]]>i，则nsmall=i]]；

%t替换所有[nsmall，Infinity->“？”]（*_Robert Price_，2020年3月22日*）

%Y参考A036520、A048355-A049364。

%K nonn，基础，更多

%O 1,1号机组

%A _Patrick De Geest_，1999年3月15日

%E a（12）由_Lars Blomberg_修正，2011年5月13日

%E a（13）-a（15）摘自L ars Blomberg，2011年5月13日

%E a（16）-a（18）摘自Giovanni Resta，2019年10月30日