%I#27 2016年7月4日05:58:04
%S 1,1,2,2,4,5,8,11,17,25,37,54,8111917726138857485112601868,
%电话:2767410160779006133471978129315434486439292995436141444,
%电话:209636310705460501682519101158114992952125155329353448814727235018107233111893460235563673491389751747400
%N注释中定义的第N代树T(1/2)中的整数数。
%C设T*是由这些规则生成的根为0的无限树:如果p在T*中,则p+1在T*,x*p在Tx中。设g(n)是第n代的节点集,使g(0)={0},g(1)={1},g(2)={2,x},c(3)={3,2x,x+1,x^2}等。设T(r)是用r代替x得到的树。
%C相关序列指南:
%C r序列
%丙1/2 A274142
%丙1/3 A274143
%C 1/4 A274144
%丙2/3 A274145
%丙3/4 A274146
%C-1/2 A274147
%C-1/3 A274148
%C-1/4 A274149
%C-2/3 A274150
%C-3/4 A274151
%丙3/2 A274152
%丙5/2 A274153
%C-3/2 A274154
%C-5/2 A274155
%C 2^(1/2)A000045(斐波那契数)
%C 2^(1/3)A000930
%丙二^(1/4)A003269
%丙二(-1/2)A274156
%丙三(-1/2)A274157
%丙二(-1/3)A274158
%丙三(-1/3)A274159
%邮编:A274160
%C2i A206743型
%C3i A274162型
%C4i A274163型
%邮编:A274149
%C i/3 A274165型
%电话:+1 A274166
%C i-1 A274167型
%C(-1+3i)/2 A274168
%H Kenny Lau,n的表,a(n)表示n=0..5847</a>
%e如果r=1/2,那么g(3)={3,2r,r+1,r^2},其中整数是3和1,因此a(3)=2。
%tz=18;t=Join[{0}},Expand[NestList[DeleteDuplicates[Flatten[Map[{#+1,x*#}&,#],1]&,{1},z]]];
%t u=表[t[[k]]/。x->1/2,{k,1,z}];
%t表[Count[Map[IntegerQ,u[[k]]],True],{k,1,z}]
%t(*第二个程序:*)
%tT[0]={0};T[n_]:=T[n]=补[Join[T[n-1]+1,x*T[n-2],T[n-1];收获[对于[n=0,n<=25,n++,cnt=Count[T[n]/。x->1/2,_整数];打印[n,“”,cnt];母猪[cnt]][[2,1]](*Jean-François Alcover_,2016年6月14日*)
%Y参见A274143-A274160、A274162、A274163、A274 165-A274168。
%K nonn公司
%0、4
%A_Clark Kimberling_,2016年6月11日
%E更多来自Jean-François Alcover的条款,2016年6月14日
%E来自Kenny Lau的更多条款,2016年7月4日