|
| |
|
| A297251型 |
| 以3为基数的数字的上变量大于下变量的数字；请参阅注释。 |
|
4
|
|
|
|
5, 11, 14, 17, 29, 32, 35, 38, 41, 44, 47, 50, 53, 83, 86, 89, 92, 95, 98, 101, 104, 107, 110, 113, 116, 119, 122, 125, 128, 131, 134, 137, 140, 143, 146, 149, 152, 155, 158, 161, 245, 248, 251, 254, 257, 260, 263, 266, 269, 272, 275, 278, 281, 284, 287, 290
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
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，b）之和。n的总碱基b变化量是总和TV（n，b）=DV（n，b）+UV（n，c）。请参阅上的指南A297330型.
|
|
|
链接
|
|
|
|
例子
|
290以3为底：1,0,1,2,0,2，DV=3，UV=4，因此147在序列中。
|
|
|
数学
|
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=3；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](*A297249型*)
取[Flatten[Position[w，1]]，120](*A297251型*)
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
