|
|
1, 2, 7, 9, 10, 13, 17, 19, 25, 26, 34, 37, 41, 43, 49, 50, 62, 67, 73, 74, 82, 87, 89, 94, 97, 99, 105, 106, 109, 113, 121, 122, 127, 129, 130, 133, 137, 139, 145, 146, 157, 162, 167, 173, 178, 181, 185, 187, 193, 194, 206, 214, 217, 218, 223, 237, 241, 243, 249
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
a（n）是大于a（n-1）的最小数，使得a（n-1）是二次剩余moda（n）-R.J.马塔尔2015年7月27日
|
|
|
链接
|
|
|
|
示例
|
对于n=3，我们有一个（2）=2。2不是二次剩余mod3，因为二次剩余Mod3是{0,1}，请参见A011655号.2不是二次剩余mod 4，因为二次剩余mod 4是{0,1}，请参见A000035号.2不是二次剩余mod 5，因为二次剩余mod 5是{0,1,4}，请参见A070430型.2不是二次剩余mod 6，因为二次剩余mod 6是{0,1,3,4}，参见A070431号.2是二次剩余mod 7，因为二次剩余mod 7是{0,1,2,4}，参见A053879号因此a（3）=7-R.J.马塔尔2015年7月27日
|
|
|
MAPLE公司
|
选项记忆；
如果n=1，则
1;
其他的
对于来自procname（n-1）+1 do的a
如果numtheory[quades]（进程名（n-1），a）=1，则
返回a；
结束条件：；
结束do:
结束if；
|
|
|
数学
|
resiueQ[n_，k_]：=长度[Select[Range[Floor[k/2]]^2，Mod[#，k]==n&，1]]==1；a[1]=1；a[n_]：=a[n]=对于[k=a[n-1]+1，真，k++，如果[resideQ[a[n-1'，k]，返回[k]]]；表[a[n]，{n，1，60}](*Jean-François Alcover公司2013年8月13日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n，美好的
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
|
