%I#11 2023年1月22日18:58:45
%S 48、49、54、55、56、60、61、62、63、66、67、68、69、70、90、91、92、96、97、98、99102,
%电话:103104105106132133134135138139140141142174175176177,
%电话:17826426527027127227627827928828328428428294
%以6位数字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)。序列A296870-A296872划分自然数。请参阅A296882和A296712中的指南。
%H Clark Kimberling,n的表,n=1..10000的a(n)</a>
%e 294的6位基数是1、2、1、0;这里#(凹坑)=0并且#(峰值)=1,所以294在序列中。
%tz=200;b=6;
%t d[n_]:=差异[符号[差异[整数位数[n,b]]];
%t选择[Range[z],Count[d[#],-2]==计数[d[#,2]&](*A296870*)
%t选择[Range[z],Count[d[#],-2]<计数[d[#,2]&](*A296871*)
%t选择[Range[z],Count[d[#],-2]>计数[d[#,2]&](*A296872*)
%Y参见A296882、A296712、A2196870、A296871。
%K nonn,基础,简单
%O 1,1
%A_Clark Kimberling_,2018年1月9日