|
|
A366444飞机 |
| 按行读取三角形:T(n,k)=phi(n/k)*A023900号(k) 如果k除以n,T(n,k)=0,否则(n>=1,1<=k<=n)。 |
|
1
|
|
|
1, 1, -1, 2, 0, -2, 2, -1, 0, -1, 4, 0, 0, 0, -4, 2, -2, -2, 0, 0, 2, 6, 0, 0, 0, 0, 0, -6, 4, -2, 0, -1, 0, 0, 0, -1, 6, 0, -4, 0, 0, 0, 0, 0, -2, 4, -4, 0, 0, -4, 0, 0, 0, 0, 4, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, -10, 4, -2, -4, -2, 0, 2, 0, 0, 0, 0, 0, 2
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,4
|
|
评论
|
|
|
链接
|
|
|
配方奶粉
|
T(n,k)=φ(n/k)*A023900号(k) 如果k除以n,T(n,k)=0,否则(n>=1,1<=k<=n)。
|
|
例子
|
{
{1}, = 1
{1, -1}, = 0
{2, 0, -2}, = 0
{2, -1, 0, -1}, = 0
{4, 0, 0, 0, -4}, = 0
{2, -2, -2, 0, 0, 2}, = 0
{6, 0, 0, 0, 0, 0, -6}, = 0
{4, -2, 0, -1, 0, 0, 0, -1}, = 0
{6, 0, -4, 0, 0, 0, 0, 0, -2}, = 0
{4, -4, 0, 0, -4, 0, 0, 0, 0, 4}, = 0
{10, 0, 0, 0, 0, 0, 0, 0, 0, 0, -10}, = 0
{4,-2,-4,-2,0,2,0,0,0,0,0,2}=0
}
|
|
数学
|
nn=12;g[n_]:=除数和[n,MoebiusMu[#]#&];扁平[表[表[如果[Mod[n,k]==0,EulerPhi[n/k]*g[k],0],{k,1,n}],{n,1,nn}]]
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|