搜索: 编号:a297264
|
|
|
|
8, 16, 17, 24, 25, 26, 32, 33, 34, 35, 40, 41, 42, 43, 44, 48, 49, 50, 51, 52, 53, 56, 57, 58, 59, 60, 61, 62, 64, 72, 80, 88, 96, 104, 112, 120, 128, 129, 136, 137, 144, 145, 152, 153, 160, 161, 168, 169, 176, 177, 184, 185, 192, 193, 194, 200, 201, 202
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
假设n的基数是b(m),b(m-1)。。。,b(0)。n的base-b下变量是所有d(i)-d(i-1)的和DV(n,b),其中d(i;n的基本b变化是d(k)<d(k-1)的所有d(k-1)-d(k)的总和UV(n。n的总碱基b变化量是总和TV(n,b)=DV(n,b)+UV(n,c)。请参阅上的指南A297330型.
|
|
链接
|
|
|
例子
|
202以基-8:3,1,2表示,DV=2,UV=1,因此202在序列中。
|
|
数学
|
g[n_,b_]:=映射[Total,GatherBy[Differences[IntegerDigits[n,b]],Sign]];
x[n_,b_]:=选择[g[n,b],#<0&];y[n_,b_]:=选择[g[n,b],#>0&];
b=8;z=2000;p=表格[x[n,b],{n,1,z}];q=表[y[n,b],{n,1,z}];
w=符号[压扁[p/.{}->{0}]+压扁[q/.{}->{0}];
取[Flatten[Position[w,0]],120](*A297265型*)
取[Flatten[Position[w,1]],120](*A297266型*)
|
|
交叉参考
|
|
|
关键词
|
非n,基础,容易的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.003秒内完成
|