%I#10 2022年6月17日17:05:25

%S 0,1,3,6,14,15,26,68,7512915818624975916161826826794543，

%电话：607266757294135121614627871112601163391528891617239533，

%电话：260487404161670038685744767718973504231320662501776977617

%N编号N，使A002113（N）为三角形数。

%回文序列中三角形数的指数。

%e A002113（26）=171是一个三角形数，所以26是一个项。

%t连接[{0}，扁平[Position[Select[Range[10^7]，PalindromeQ]，_？（OddQ[Sqrt[8#+1]]&）]]（*程序生成序列的前22个项。*）（*_哈维P.Dale_，2022年6月17日*）

%o（ARIBAS）变量c，n，m：整数；结束；开始c:=0；对于n:=0到100000000 do，如果n=intreverse（n），则m:=floor（sqrt（2*n））；如果m*（m+1）div 2=n，则写（c，“，”）；结束；inc（c）；结束；结束；结束；

%o（PARI）{c=0；对于（n=010000000，k=n；r=0；while（k>0，d=divrem（k，10）；k=d[1]；r=10*r+d[2]）；如果（n==r，m=sqrtint（2*n）；如果是（m*（m+1）/2=n，print1（c，“，”）；c++））}

%Y参见A000217、A002113、A003098、A008509。

%K nonn，基础

%氧1,3

%A _Klaus Brockhaus，2004年11月27日

%E a（24）至a（38），摘自_Klaus Brockhaus，2005年10月5日