|
|
A084937号 |
| 与前两个互素且尚未出现的最小数;a(1)=1,a(2)=2。 |
|
45
|
|
|
1, 2, 3, 5, 4, 7, 9, 8, 11, 13, 6, 17, 19, 10, 21, 23, 16, 15, 29, 14, 25, 27, 22, 31, 35, 12, 37, 41, 18, 43, 47, 20, 33, 49, 26, 45, 53, 28, 39, 55, 32, 51, 59, 38, 61, 63, 34, 65, 57, 44, 67, 69, 40, 71, 73, 24, 77, 79, 30, 83, 89, 36, 85, 91, 46, 75, 97, 52, 81
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
等价地,这是词典学上最早的正数序列,满足了每个项相对于下两个项是质数的条件-N.J.A.斯隆2014年11月3日
经验性地,这些点大致位于两条线上:如果n==2 mod 3,则a(n)~=2n/3,否则a(n)~=4n/3。请参见A249680型-A249683型有关三个三分之一,请参见Sigrist散点图-N.J.A.斯隆,2014年11月3日,2014年11月4日
所有素数和素数幂都出现,素数按其自然顺序出现。对于任何素数p,p出现在p^2之前,p^3之前。。。
|
|
链接
|
|
|
MAPLE公司
|
N: =1000:#以获得a(N),直到第一个条目>N
a[1]:=1:a[2]:=2:
R: ={$3..N}:
对于3中的n,而R<>{}
成功:=假;
对于r do中的r
如果igcd(r,a[n-1])=1且igcd(r,a[n-2])=1,则
a[n]:=r;
R: =R减去{R};
成功:=true;
打破
fi(菲涅耳)
日期:
如果不成功,则打破fi;
日期:
|
|
数学
|
lst={1,2,3};未使用=范围[4100];而[n=选择[未使用,CoprimeQ[#,lst[[-1]]&&CoprimeQ[#,lst[[-2]]&&,1];n!=个{},附加到[lst,n[[1]]];unused=删除案例[未使用,n[[1]]];第一次
f[s_]:=块[{k=1,l=取[s,-2]},而[Union[GCD[k,l]]!={1} ||MemberQ[s,k],k++];追加[s,k]];嵌套[f,{1,2},67](*罗伯特·威尔逊v2011年6月26日*)
|
|
黄体脂酮素
|
(哈斯克尔)
导入数据。列表(删除)
a084937 n=a084937_列表!!(n-1)
a084937_list=1:2:f 2 1[3].]其中
f x y zs=g zs,其中
g(u:us)|gcd y u>1|gcd x u>1=g us
|否则=u:f u x(删除u z)
(Python)
从分数导入gcd
对于范围(10**3)内的_:
i=秒
为True时:
如果b中没有i且gcd(i,l1)==1且gcd
l2,l1=l1,i
b.添加(i)
而s在b中:
b.删除
s+=1
打破
(PARI)取(k,t=v[k])=(i=3,k-1,如果(v[i]==t,返回(1));0
步长(k,g)=而(gcd(k,g)>1,k++);k个
第一(n)=局部(v=向量(n,i,i));我的(nxt=3,t);对于(k=3,n,v[k]=步长(nxt,t=v[k-1]*v[k-2]);而(取(k),v[k]=步长(v[k]+1,t));如果(v[k]==t,而(取(k+1,t++),));v(v)\\查尔斯·格里特豪斯四世2016年8月26日
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|