%I#7 2012年3月30日17:22:57

%第5,7,10,15,18,29,47113163269115012931881221734456395683页，

%电话26195511794151295936114511712686767942531919247791599，

%电话：429914163445379527560533869619222313214747801929717866173474640372

%N Base-4基思数。

%A007629中描述了C Keith数。

%e 47在这里是因为，在基数4中，47是233，对这个数字应用Keith迭代会产生数字2、3、3、8、14、25、47。

%t IsKeith[n_，b_]：=模块[{d，s，k}，d=整数位数[n，b]；s=总计[d]；k=1；而[AppendTo[d，s]；s=2 s-d[[k]]；s<n，k++]；s==n]；选择[Range[3,10^5]，IsKeith[#，4]&]

%Y参考A007629（基础10）、A162724（基础2）、A187713（基础5）、A188195-A188200。

%K nonn，基础

%O 1,1号机组

%A _T.D.Noe_，2011年3月24日