登录
A096107号
按行读取的三角形:第n行列出模n的立方剩余。
1
1, 1, 2, 1, 3, 1, 2, 3, 4, 1, 5, 1, 6, 1, 3, 5, 7, 1, 8, 1, 3, 7, 9, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 1, 5, 7, 11, 1, 5, 8, 12, 1, 13, 1, 2, 4, 7, 8, 11, 13, 14, 1, 3, 5, 7, 9, 11, 13, 15, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 1, 17, 1, 7, 8, 11, 12, 18, 1, 3, 7, 9, 11, 13, 17, 19, 1, 8
抵消
2,3
评论
第n行有A087692号(n) 条款。 -罗伯特·伊斯雷尔2015年1月4日
例子
1;
1,2;
1,3;
1,2,3,4;
1,5;
1,6;
1,3,5,7;
1,8;
1,3,7,9;
第5行包含1、2、3、4,因为(在mod 5中)1^3=1、3^3=2、2^3=3和4^3=4。 -杰弗里·克雷策2015年1月7日
MAPLE公司
对于n,从2到30 do
op({seq(`if`(igcd(i,n)=1,i^3 mod n,NULL),i=1..n-1)})
#如果使用Maple 11或更早版本,请将其替换为
#op(排序(转换({seq(`if`(igcd(i,n)=1,i^3 mod n,NULL),i=1..n-1)},列表))
od#罗伯特·伊斯雷尔2015年1月4日
数学
表[Select[Range[n],
CoprimeQ[#,n]&&IntegerQ[PowerMod[#,1/3,n]]&],{n,1,20}]//网格
(*杰弗里·克雷策2015年1月4日*)
黄体脂酮素
(PARI)可能是由cd1(n)={对于(x=2,n,b=楼层(x-1);a=向量(b+1);对于(y=1,b,z=y^3%x;如果(z<>0,a[y]=z;));s=向量(a);c=1;对于(j=2,b+1,如果(s[j]<>s[j-1],c++;如果(gcd(s[j],x)==1,打印1(s[j“,”)));)}
关键词
非n,选项卡
作者
西诺·希利亚德2004年7月22日
扩展
编辑人唐·雷布尔,2006年5月7日
状态
经核准的