%I#23 2021年6月25日03:29:28
%S 1,2,3,4,5,6,7,9,10,11,13,14,15,22,23,26,27,28,29,30,39,45,46,47,51,
%电话58,59,61,62,63,86,87,93,94,95118119122123124126147148,
%U 158159178179187188189190214215221222236237234245242448249253254
%N编号m,使A001222(二项式(m,k))的最大值和中心值A001221(A001405(m))相同。
%A048622.-中0的C索引_Sean A.Irvine_,2021年6月24日
%H Ivan Neretin,n表,n=1..1000的a(n)</a>
%e对于m=23,A001222表示二项式(23,k)={0,1,2,3,4,4,5,5,6,6,6,6,6,1,6,5,4,3,2,1,0},因此最大值和中心值都是6,因此23是一个项。
%t选择[Range[120],Function[n,ar=PrimeOmega[#]和/@二项式[n,Range[0,n/2]];最大[ar]==ar[[-1]]](*_Ivan Neretin_,2015年9月7日*)
%o(PARI)isok(m)=vecmax(应用(二项式,向量(m+1,k,二项式(m,k-1)))==二项式_米歇尔·马库斯,2021年6月25日
%Y参考A001222、A020731、A048622。
%K nonn公司
%O 1,2号机组
%Abos Elemer(_L)_
|