%I#4 2019年5月2日08:50:01

%S 1,3,4,5,9,11,12,14,15,16,17,19,20,21,23,26,27,29,33,35,36,37,39,41，

%电话44,45,47,48,50,51,53,56,57,59,60,62,63,64,65,68,69,71,73,75,77,80,81，

%U 83,84,86,87,89,91,92,93,95,98,99101104105108110单位

%N a（N）是任何m<N的最小值，不是2*a（m）或3*a（m）-2。

%H Clark Kimberling，n的表，a（n）表示n=1..10000</a>

%e序列必须从1开始。接下来的两项确定如下：因为a（1）=1，数字2不允许，所以a（2）=3，其中数字6和7不允许，a（3）=4。相关序列指南见A325417。

%tα={1}；Do[AppendTo[a，NestWhile[#+1&，Last[a]+1，Apply[Or，

%t映射[MemberQ[a，#]&，选择[Flatten[{#/2，（#+2）/3}]，

%t整数Q]]&]]，{150}]；a（*A325464*）

%t补码[范围[Last[a]]，a]（*A325465*）

%t（*_彼得·莫塞斯，2019年4月25日*）

%Y参见A325417、A325465。

%K nonn，简单

%O 1,2号机组

%A_Clark Kimberling_，2019年5月1日