%I#5 2015年5月6日09:48:57

%S 0,1,3,2,6,3,5,7,13,4,6,8,12,14,16,5,13,9,11,13,17,15,17,6,12,14,16，

%电话：10,14,14,16,18,28,16,18，7,11,13,15,15,21,11,13-15,19,15,17,19,27,29，

%U 31,17,21,8,10,12,18,14,16,16,20,22,24,12,24,16,18,20,24

%N使用此算法从N到1的步数：如果x是奇数，则为x->floor（r*x）；如果x是偶数，则是x->flower（x/r），其中r=3/2。

%H Clark Kimberling，<a href=“/A257698/b257698.txt”>n，a（n）表，n=1.-10000</a>

%e 5->7->10->6->4->2->1，共6步，因此a（5）=6。

%t r=3/2；f[x_]：=如果[OddQ[x]，楼层[r*x]，楼板[x/r]]

%t g[x_]：=删除[FixedPointList[f，x]，-1]；

%t表[-1+长度[g[n]]，{n，1200}]

%Y参考A257699-A257706。

%K nonn，简单

%氧1,3

%A_Clark Kimberling_，2015年5月4日