%I#12 2021年7月4日22:11:03

%S 19,28,29,52,53,54,67,70,85,86,88103106107108124125127129，

%电话：149151153172173174175176178179199201202204206207229，

%电话：232233234236237259261262263267268292293294295296

%N将k编号为a1>a2，其中[a0，a1，a2，…]是sqrt（k）的简单连分式。

%e sqrt（19）=[4；2,1,3,1,2,8，…]，其中a1=2>1=a2。

%t选择[范围@300，安静[#[[1]]>#[2]]&[最后一个@ContinuedFraction[Sqrt@#]]&]（*_Giorgos Kalogeropoulos_，2021年7月4日*）

%o（PARI）表示（k=2300，my（c=contfrac（sqrt（k）））；如果（#c>=3&&c[2]>c[3]，打印1（k，“，”））\\_Hugo Pfoertner_，2021年7月4日

%Y参考A000196、A091453。

%K nonn公司

%O 1,1号机组

%A_Clark Kimberling_，2004年1月10日