OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:a134941
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
134941英镑 山脉数量。 +0
25
1, 121, 131, 141, 151, 161, 171, 181, 191, 1231, 1241, 1251, 1261, 1271, 1281, 1291, 1321, 1341, 1351, 1361, 1371, 1381, 1391, 1421, 1431, 1451, 1461, 1471, 1481, 1491, 1521, 1531, 1541, 1561, 1571, 1581, 1591, 1621, 1631, 1641, 1651, 1671, 1681, 1691, 1721 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
对于n>1,数字结构代表一座山。第一个数字是1。最后一个数字是1。前几个数字是按递增顺序排列的。最后的数字按降序排列。这些数字只有一个最大的数字。这个序列是有限的。最后一个术语是12345678987654321。
学期总数为21846个-汉斯·哈弗曼2007年11月25日
A002450型(8) + 1 = 21846. -莱因哈德·祖姆凯勒2010年5月17日
发件人莱因哈德·祖姆凯勒2010年5月25日:(开始)
A178333号是山数的特征函数:A178333号(a(n))=1;
A178334号(n) 是山数<=n;
A178052号A178053号给出山数的数字和数字根;
A178051号(n) 是第n个山峰数的峰值。(结束)
链接
Joshua Zucker,n=1..21846时的n,a(n)表(显示所有术语)。
例子
此序列的A编号(A134941号)本身就是一个山脉编号:
. . . 9 . .
. . . . . .
. . . . . .
. . . . . .
. . . . . .
. . 4 . 4。
. 3 . . . .
. . . . . .
1 . . . . 1
数学
mountainQ[n_]:=匹配Q[IntegerDigits[n],{1,a___,b_,c__,1}/;有序Q[{1,a,b},Less]&有序Q[Reverse[{b,c,1}],Less]];mountainQ[1]=正确;选择[Range[2000],mountainQ](*Jean-François Alcover公司2012年6月13日*)
前缀[Union@@((FromDigits@#&/@Flatten[Table[Join[(k=Prepend[#,1])&/@
子集[Range[2,#-1]])[[i]],{#},(Reverse@#&/@k)[[j]]],
{i,2^(#-2)},{j,2^-(#-2,}],1])和/@范围[9]),1](*汉斯·鲁道夫·威德默,2024年4月30日*)
黄体脂酮素
(哈斯克尔)
导入数据。列表(元素索引)
a134941 n=a134941_list!!(n-1)
a134941_list=元素索引1 a178333_list
--莱因哈德·祖姆凯勒2001年10月28日
(Python)
来自itertools导入产品
定义ups():
d=“23456789”
对于产品([0,1],重复=8)中的b:
产生“1”+“”.join(范围(8)中i的d[i]*b[i])
def向下(顶点):
如果顶点<3:产生“1”*int(顶点==2);返回
d=“8765432”[-(apex-2):]
对于产品([0,1],repeat=len(d))中的b:
yield“”.join(d[i]*b[i]对于范围(len(d))内的i)+“1”
定义A134941号():#以列表形式返回完整序列
mountain_strs=(u+d代表u in ups()代表d in downfrom(int(u[-1]))
返回排序的(mountain_strs中ms的int(ms))
打印(A134941号()[:45]) #迈克尔·布拉尼基2021年12月31日
交叉参考
囊性纤维变性。A134853号,A135417号,A134951号,A182721号
囊性纤维变性。A115300个,A175044号-莱因哈德·祖姆凯勒2010年5月25日
关键词
基础,完成,满的,非n,改变
作者
奥马尔·波尔,2007年11月22日
状态
经核准的
第页1

搜索在0.014秒内完成

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。

上次修改时间:美国东部夏令时2024年6月7日20:29。包含373206个序列。(在oeis4上运行。)