1,2
当被认为是排列或函数时的自逆,即a(a(n))=n-霍华德·A·兰德曼2001年9月25日
每个初始段都有一个整数平均值,这就相当于前n个元素的和总是可以被n整除-富兰克林·T·亚当斯·沃特斯2014年7月7日
另外,一种不同正整数的字典最小序列,使得a(n)-n的所有值也是不同的。-伊万·内雷丁2015年4月18日
富兰克林·T·亚当斯·沃特斯,n=1..10000的n,a(n)表
A、 沙波洛夫,问题M1517(俄语),Kvant 5(1995),20-21。英文翻译出现在量子问题M185,1996年9月/10月(注意,文件是75Mb)。
数学论坛,周问题818
B、 文卡塔查拉,对自然数的奇怪的双投射,JIS 12(2009)09.8.1。
自然数排列序列的索引项
a(n)=A002251(n-1)+1。(更正人M、 哈斯勒2014年9月17日)
设s(n)=和(k=1,n,a(k))/n=A019446号(n) 一。如果s(n-1)不出现在a(1),…,a(n-1),a(n)=s(n)=s(n-1);否则,a(n)=s(n-1)+n和s(n)=s(n-1)+1。[富兰克林·T·亚当斯·沃特斯,2010年5月20日]
{n,μn(μn,μn)(μn,μn)(μn,μn)(μn,μm(μn,μn))=μn(μn,μn)=A001622号. -斯坦尼斯拉夫·西科拉2017年6月12日
P: =过程(q)局部a,b,i,n;a:=[1];b:=1;对于i,从2到70
n从1到q的do如果numbers发生(a,n)=0,则
如果分形((b+n)/i=0,则a:=[op(a),n];b:=b+n;break;fi;fi;
od;od;op(a);结束:P(10^9)#保罗P.熔岩2019年7月11日
a[1]=1;a[n\]:=a[n]=模块[{s,v},s=a/@Range[n-1];对于[v=Mod[-Plus@@@s,n],v<1 | | MemberQ[s,v],v+=n,Null];v]
lst={1};f[s_List]:=块[{k=1,len=1+Length@lst,t=Plus@@@lst},而[MemberQ[s,k]| | Mod[k+t,len]!=0,k++];附加到[lst,k]];嵌套[f,lst,69](*罗伯特·G·威尔逊五世2010年5月17日*)
折叠[附加[#1,#2天花板[#2/黄花菜]-总计[#1]]&,{1},范围[2,70]](*比尔卡斯·格尔基2012年5月25日*)
(PARI)al(n)=局部(v,s,fnd);v=向量(n);v[1]=s=1;对于(k=2,n,fnd=0;对于(i=1,k-1,if(v[i]=s,fnd=1;break));v[k]=if(fnd,s+k,s);s+=fnd);v\\富兰克林·T·亚当斯·沃特斯2010年5月20日
(平价)A019444号_最大(N,c=0,A=Vec(1,N))={对于(N=2,N,A[N]| |(#A<A[N]=N+c++)| | A[N+c]=N);A}\\M、 哈斯勒2019年11月27日
囊性纤维变性。A019445号,194A046年,A243700,A001622号.
上下文顺序:邮编:A160855 A120232年 A292961年*A195412号 A069773号 A122321
相邻序列:A019441年 A019442号 A019443号*A019445号 A019446号 A019447号
不,美好的
R、 K.盖伊还有汤姆·哈尔弗森(Halverson(AT)macalester.edu)
编辑