|
| |
|
| A181634号 |
| 不规则三角形T（n，k），其中第n行包含组成n=a+b的所有对[a，b]为非负对，其中a==b（mod 3）。 |
|
1
|
|
|
|
1, 1, 3, 0, 0, 3, 2, 2, 4, 1, 1, 4, 6, 0, 3, 3, 0, 6, 5, 2, 2, 5, 7, 1, 4, 4, 1, 7, 9, 0, 6, 3, 3, 6, 0, 9, 8, 2, 5, 5, 2, 8, 10, 1, 7, 4, 4, 7, 1, 10, 12, 0, 9, 3, 6, 6, 3, 9, 0, 12, 11, 2, 8, 5, 5, 8, 2, 11, 13, 1, 10, 4, 7, 7, 4, 10, 1, 13, 15, 0, 12, 3, 9, 6, 6
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
2,3
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
1, 1;
3, 0, 0, 3;
2, 2;
4, 1, 1, 4;
6, 0, 3, 3, 0, 6;
5, 2, 2, 5;
7、1、4、4、1、7；
9, 0, 6, 3, 3, 6, 0, 9;
8, 2, 5, 5, 2, 8;
10、1、7、4、4、7、1、10；
12, 0, 9, 3, 6, 6, 3, 9, 0, 12;
11, 2, 8, 5, 5, 8, 2, 11;
13, 1, 10, 4, 7, 7, 4, 10, 1, 13;
15, 0, 12, 3, 9, 6, 6, 9, 3, 12, 0, 15;
14, 2, 11, 5, 8, 8, 5, 11, 2, 14;
|
|
|
MAPLE公司
|
局部L，a，b；
L:=[]；
对于从n到0的a，通过-1 do
b：=n-a；
如果modp（a，3）=modp（b，3），则
L:=[op（L），a，b]；
结束条件：；
结束do：
L；
结束进程：
对于从2到18 do的n
|
|
|
数学
|
如果[First@#==Last@#&@Take[#，2]，Join[Reverse@Drop[#，2]，#]，Join[Creverse@#，#]]&/@Function[n，Flatten@Select[Transpose@{n-#，#}，Mod[First@#，3]==Mod[Last@#，2]&@Range[Ceiling[n/2]，n]/@Range[2，16]//Flatten(*迈克尔·德弗利格2016年5月13日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n，容易的，标签，较少的
|
|
|
作者
|
Florentin Smarandache（smarand（AT）unm.edu），2010年11月3日
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
