|
|
A297270型 |
| 以10为底的数字的下变量大于上变量的数字;请参阅注释。 |
|
4
|
|
|
10, 20, 21, 30, 31, 32, 40, 41, 42, 43, 50, 51, 52, 53, 54, 60, 61, 62, 63, 64, 65, 70, 71, 72, 73, 74, 75, 76, 80, 81, 82, 83, 84, 85, 86, 87, 90, 91, 92, 93, 94, 95, 96, 97, 98, 100, 110, 120, 130, 140, 150, 160, 170, 180, 190, 200, 201, 210, 211, 220, 221
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
假设n的基数是b(m),b(m-1)。。。,b(0)。n的基于b的向下变化是d(i)>d(i-1)的所有d(i)-d(i-1)的和DV(n,b);n的基-b上变分是d(k)<d(k-1)的所有d(k-1)-d(k)的UV(n,b)之和。n的总碱基b变化量是总和TV(n,b)=DV(n,b)+UV(n,c)。请参阅上的指南A297330型.
|
|
链接
|
|
|
例子
|
6151413121,以10为基数:6,1,5,1,4,1,3,1,2,1,DV=15,UV=10,因此61514131.21在序列中。
|
|
数学
|
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=10;z=2000;p=表格[x[n,b],{n,1,z}];q=表[y[n,b],{n,1,z}];
w=符号[压扁[p/.{}->{0}]+压扁[q/.{}->{0}];
取[Flatten[Position[w,-1]],120](*A297270型*)
|
|
交叉参考
|
|
|
关键词
|
非n,基础,容易的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|