%I#4 2014年9月30日15:56:20

%S 1,6,11,15,20,25,29,34,39,43,48,52,57,62,66,71,76,80,85,90,94,99104，

%电话：108113118122127132136141146150155160164169174178183，

%电话：1881921972022062116220225230234244248253258

%N编号k，使A247973（k+1）=A247972（k）。

%t$RecursionLimit=无穷大；z=400；v[1]=0；v[2]=1；

%tv[n]：=v[n]=v[n-1]/（n-2）+v[n-2]；

%t表格形式[表格[{n，n[Pi-（4n+2）/（v[2（n+1）]^2）]，n[1/n]}，{n，1，10}]]

%t g[n_]：=g[n]=选择[范围[z]，Pi-（4#+2）/（v[2（#+1）]^2）<1/n&，1]；

%t u=扁平[表[g[n]，{n，1，z}]]（*A247973*）

%t d=差异[u]

%t压扁[位置[d，0]]（*A247974*）

%Y参见A247971、A247972和A247973。

%K nonn，简单

%O 1,2号机组

%A_Clark Kimberling_，2014年9月28日