1972年2月56日

A297256型

以5为基数的数字具有相等的下变量和上变量的数字；请参阅注释。

1, 2, 3, 4, 6, 12, 18, 24, 26, 31, 36, 41, 46, 52, 57, 62, 67, 72, 78, 83, 88, 93, 98, 104, 109, 114, 119, 124, 126, 131, 136, 141, 146, 151, 156, 161, 166, 171, 176, 181, 186, 191, 196, 201, 206, 211, 216, 221, 226, 231, 236, 241, 246, 252, 257, 262, 267

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,2

假设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型.

链接

克拉克·金伯利，n=1..10000时的n，a（n）表

例子

267以5为基数：2,0,3,2，DV=3，UV=3，因此267在序列中。

数学

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=5；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](*A297255型*)

取[Flatten[Position[w，0]]，120](*A297256型*)

取[Flatten[Position[w，1]]，120](*A297257型*)