%我#16 2020年3月22日23:42:46
%S 3,11,36363366856335963394123305504811531588115464831,
%电话:115470036115448403610645763516335401884036152754484036,
%电话:3651483715882292012515963
%N a(N)是正好包含N 6的最小三角形数的索引。
%H Eric Weisstein的数学世界,<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],6];
%t如果[nsmall[[n0]]>i,则nsmall=i]];
%t替换所有[nsmall,Infinity->“?”](*_Robert Price_,2020年3月22日*)
%Y参见A036523、A048355-A049364。
%K nonn,基础,更多
%O 1,1号机组
%A _帕特里克·德·吉斯特,1999年3月15日
%E a(13)-a(15)摘自L ars Blomberg,2011年5月16日
%E a(16)-a(18)摘自Giovanni Resta,2019年10月30日
|