A296869-组织环境信息系统

A296869型

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

35, 36, 40, 41, 42, 45, 46, 47, 48, 65, 66, 67, 70, 71, 72, 73, 95, 96, 97, 98, 160, 161, 165, 166, 167, 170, 171, 172, 173, 175, 180, 181, 190, 191, 192, 195, 196, 197, 198, 200, 205, 206, 210, 211, 212, 220, 221, 222, 223, 225, 230, 231, 235, 236, 237, 240

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

抵消

1,1

坑是一个指数i，使得d（i-1）>d（i）<d（i+1）；峰值是指数i，使得d（i-1）<d（i）>d（i+1）。序列A296867型-A296869型划分自然数。请参阅上的指南A296882型和296712英镑.

链接

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

例子

240的5位基数是1,4,3,0；这里#（凹坑）=0，#（峰值）=1，因此240在序列中。

数学

z=200；b=5；

d[n_]：=差异[Sign[Differences[Integer Digits[n，b]]]；

选择[Range[z]，Count[d[#]，-2]==计数[d[#，2]&](*A296867型*)

选择[Range[z]，Count[d[#]，-2](*A296868型*)

选择[Range[z]，Count[d[#]，-2]>计数[d[#，2]&](*A296869型*)

updnQ[n_]：=总计[Which[#[[1]]<#[[2]]>#[[3]]，1，#[[1]]>#[2]]<#[3]]，-1，True，0]&/@Partition[IntegerDigits[n，5]，3，1]]>0；选择[Range[250]，updnQ](*哈维·P·戴尔2020年12月20日*）

交叉参考

囊性纤维变性。A296882型,A296712型,A296867型,A296868型.

上下文中的序列：A210320型 A165856号 319484年*A099647号 A064993号 A041611号

相邻序列：A296866型 A296867型 A296868型*A296870型 A296871型 A296872型

关键词

非n,基础,容易的

作者

克拉克·金伯利2018年1月9日

状态

经核准的