显示找到的2个结果中的1-2个。
第页1
按行读取的三角形:T(n,k)=斯特林2(n+1,k)/二项式(k+1,2),如果n-k是偶数,则为0(1<=k<=n)。
+10 2
1, 0, 1, 1, 0, 1, 0, 5, 0, 1, 1, 0, 15, 0, 1, 0, 21, 0, 35, 0, 1, 1, 0, 161, 0, 70, 0, 1, 0, 85, 0, 777, 0, 126, 0, 1, 1, 0, 1555, 0, 2835, 0, 210, 0, 1, 0, 341, 0, 14575, 0, 8547, 0, 330, 0, 1, 1, 0, 14421, 0, 91960, 0, 22407, 0, 495, 0, 1
评论
Hultman数的三角形可以由Stirling循环数的三角形(|A008275美元(n,k)|)n,k>=1,方法是从第n行(n>=2)中的每个其他条目中删除三角形数字因子n*(n-1)/2,并将其余条目设置为0。
这里我们从第二类斯特林数的三角形开始进行类似的构造A008277号,但现在从第k列中的每个其他条目中删除三角形数字因子k*(k+1)/2,并将其余条目设置为0。
这些数字有组合解释吗?
配方奶粉
设P(n,x)=(1-x)*(1-2*x)**(1-n*x)。三角形第k列的g.f.为(1/(k*(k+1))*x^(k-1)*(1/P(k,x)-1/P(k,-x))=(x^k)*(x^k*R(k-1,1/x))/(1-x^2)*(1-4*x^2*(1-k^2*x^2)),其中R(n,x)表示第n行多项式A164652号.(由于三角形的输入A164652号是整数,因此当前三角形的条目也是整数。)
逆数组的行和序列开始于[1,1,0,-4,0,120,0,-12096,0,3024000,0,-1576143360,0,1525620096000,0,-2522591034163200,0,6686974460694528000,0,-27033456071346536448000,…],看起来本质上是A129825号.
例子
三角形开始
k=1 2 3 4 5 6 7 8 9 10
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
n=1:1
2: 0 1
3: 1 0 1
4: 0 5 0 1
5: 1 0 15 0 1
6: 0 21 0 35 0 1
7: 1 0 161 0 70 0 1
8: 0 85 0 777 0 126 0 1
9: 1 0 1555 0 2835 0 210 0 1
10: 0 341 0 14575 0 8547 0 330 0 1
...
/ 1 \ /1 \ /1 \ /1 \
|-1 1 | |0 1 | |1 1 | |0 1 |
| 1 -3 1 | |1 0 1 | |1 3 1 | = |0 0 1 |
|-1 7 -6 1 | |0 5 0 1 | |1 7 6 1 | |0 1 0 1 |
| 1 -15 25 -10 1| |8 0 15 0 1| |1 15 25 10 1| |0 0 5 0 1 |
| ... | |... | |... | |0 1 0 15 0 1|
| | | | | | |... |
MAPLE公司
A362041飞机:=(n,k)->`如果`(n-k mod 2=0,Stirling2(n+1,k)/二项式(k+1,2),0):
黄体脂酮素
(PARI)T(n,k)=如果(n-k)%2,0,斯特林(n+1,k,2)/二项式(k+1,2))\\米歇尔·马库斯2023年5月23日
12, 18, 24, 36, 40, 48, 54, 45, 50, 60, 72, 56, 80, 96, 98, 90, 84, 75, 108, 63, 120, 100, 144, 126, 150, 147, 162, 112, 132, 160, 192, 196, 135, 156, 180, 176, 175, 200, 168, 198, 240, 216, 252, 270, 204, 234, 250, 288, 294, 208, 228, 280, 242, 300, 297, 225, 336, 324, 224, 264, 320, 375, 306, 276
例子
A360768型(1) = 18; 使得rad(k)=rad(18)=6的最小非导数k<18是a(1)=12。
A360768型(2) = 24; 最小的非除数k<24,使得rad(k)=rad(24)=6是a(2)=18。
A360768型(5) = 50; 最小的非除数k<50,使得rad(k)=rad(50)=10是a(5)=40。
数学
rad[x_]:=rad[x]=倍@FactorInteger[x][[All,1]];s=选择[Select[Range[414],Nor[SquareFreeQ[#],PrimePowerQ[#]]&],#1/#2>=#3&@@{#1,Times@@#2,#2[2]]}&@@{#,FactorInteger[#][[All,1]]}&];表[Function[r,SelectFirst[Range[m-1,1,-1],r==rad[#]&]][rad[m]],{m,s}]
搜索在0.004秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
最后修改时间:美国东部时间2024年9月21日12:36。包含376084个序列。(在oeis4上运行。)
|