|
|
A154990号 |
| 按行读取三角形。主对角线为正。其余术语为负数。 |
|
8
|
|
|
1, -1, 1, -1, -1, 1, -1, -1, -1, 1, -1, -1, -1, -1, 1, -1, -1, -1, -1, -1, 1, -1, -1, -1, -1, -1, -1, 1, -1, -1, -1, -1, -1, -1, -1, 1, -1, -1, -1, -1, -1, -1, -1, -1, 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 1, -1, -1, -1, -1, -1, -1, -1
(列表;桌子;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
如果n是三角形数,a(n)=1;否则,a(n)=-1。(这在下面的第二个Mathematica程序中明确实现。)-哈维·P·戴尔2014年4月27日
|
|
链接
|
|
|
配方奶粉
|
T(n,k)=-1,T(n、n)=1。
|
|
例子
|
表格开始:
1;
-1, 1;
-1, -1, 1;
-1, -1, -1, 1;
-1, -1, -1, -1, 1;
-1, -1, -1, -1, -1, 1;
-1, -1, -1, -1, -1, -1, 1;
|
|
MAPLE公司
|
选项记忆;
如果k=n,则
1;
elif k>n那么
0;
其他的
-1 ;
结束条件:;
结束进程:
|
|
数学
|
用[{tr=Accumulate[Range[15]},Table[If[MemberQ[tr,n],1,-1],{n,Last[tr]}]]将[Table[PadLeft[{1},n,-1](*或*)展平(*哈维·P·戴尔2014年4月27日*)
|
|
黄体脂酮素
|
(Sage)压扁([[1 if k==n else-1 for k in(1..n)]for n in(1..12)])#G.C.格鲁贝尔2021年3月6日
(岩浆)[k eq n select 1 else-1:k in[1..n],n in[1..12]]//G.C.格鲁贝尔2021年3月6日
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|