%I#7 2023年1月21日18:05:07

%S 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26，

%电话：27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49，

%U 50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67

%N个以9位数字d（m）、d（m-1）、…、。。。，d（0）具有#（凹坑）=#（峰值）；请参阅注释。

%C A坑是一个指数i，使得d（i-1）>d（i）<d（i+1）；峰值是指数i，使得d（i-1）<d（i）>d（i+1）。序列A296879-A296881划分自然数。请参阅A296882和A296712中的指南。

%H Clark Kimberling，<a href=“/A296879/b296879.txt”>n，a（n）表，n=1.-10000</a>

%e 67中以9为基数的数字是7,4；这里#（凹坑）=0和#（峰值）=0，因此顺序中为67。

%tz=200；b=9；

%t d[n_]：=差异[符号[差异[整数位数[n，b]]]；

%t选择[Range[z]，Count[d[#]，-2]==计数[d[#，2]&]（*A296879*）

%t选择[Range[z]，Count[d[#]，-2]<计数[d[#，2]&]（*A296880*）

%t选择[Range[z]，Count[d[#]，-2]>计数[d[#，2]&]（*A296881*）

%Y参见A296882、A296712、A2196880、A296881。

%K nonn，基础，简单

%O 1,2号机组

%A_Clark Kimberling_，2018年1月9日