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

%S 8,13,16,19,24,32,40,48,571141251451712282853293425891969，

%电话2833493830318431531685163677437500865293310680182955098，

%电话：5658387110962321962343026245925818051131124429581195723401307123984071980064935656508871625564319261712864110

%N Base-7基思数。

%C基思编号见A007629。

%e48在这里是因为，在基数7中，48是66，对这个数字应用Keith迭代得到数字6、6、12、18、30、48。

%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[#，7]&]

%Y参见A007629（底座10）、A162724（底座2）、A187713（底座5）、A188195-A188200。

%K nonn，基础

%O 1,1号机组

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