%I#6 2020年3月2日18:54:38
%S 0,0,0,1,5,14,35,8319341789018473809780515833202864513,
%电话:12967126015521775104498220926924188168838143416767650,
%电话:335444236709868313421302684430235369120141073846768214772047642954401338590833907
%N覆盖正整数初始区间的N的非单峰组成数。
%如果整数序列是弱递增序列和弱递减序列的串联,则它是单峰的。
%C n的组合是一个有限的正整数序列与n之和。
%H数学世界,<a href=“http://mathworld.wolfram.com/UnimodalSequence.html“>单峰序列</a>
%F对于n>0,a(n)=A107429(n)-A227038(n)。
%e a(5)=1到a(7)=14组分:
%e(212)(213)(1213)
%e(312)(1312)
%e(1212)(2113)
%e(2112)(2122)
%e(2121)(2131)
%e(2212)
%e(3112)
%e(3121)
%e(11212)
%e(12112)
%e(12121)
%e(21112)
%e(21121)
%e(21211)
%t normQ[mm]:=m={}| |并集[m]=范围[Max[m]];
%t unimodQ[q_]:=或[Length[q]<=1,如果[q[[1]]<=q[2]],unimodQ[静止[q]],有序q[反转[q]]];
%t表[Length[Select[Join@@Permutations/@Integer Partitions[n],normQ[#]&&!unimodQ[#]&]],{n,0,10}]
%Y不要求非单峰给出A107429。
%Y不要求覆盖条件给出A115981。
%Y补码由A227038计数。
%Y分区的版本是A332579,与A332577互补。
%Y单峰成分为A001523。
%Y非单峰排列为A059204。
%Y非单峰正态序列为A328509。
%未排序素数签名不是单峰的Y数是A332282。
%Y参见A007052、A072704、A07270%、A332281、A332280、A33228.7、A332578、A332639、A332642、A332669、A3332834、A332870。
%K nonn公司
%0、7
%A _ Gus Wiseman_,2020年3月2日