登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自百科全书行上的整数序列!)
A204905号 对于满足1<=j<k的某些j,n除k^2-j^2的最小k。
2,3,2,3,3,4,4,3,5,6,6,4,7,8,4,5,9,10,6,5,12,12,5,10,14,6,15,8,16,6,7,18,6,9,19,20,8,7,21,10,22,12,7,24,24,7,14,15,10,14,27,12,8,9,11,30,30,8 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,1

评论

看到了吗A204892号相关序列的讨论和指南。

链接

n=1..60的n,a(n)表。

例子

1除以2^2-1^2,所以a(1)=2

2除以3^2-1^2,所以a(2)=3

3除以2^2-a^2,所以a(3)=2

4除以3^2-a^2,所以a(4)=3

数学

s[n_x]:=s[n]=n^2;z1=600;z2=60;

表[s[n],{n,1,30}](*A000290型*)

u[m_x]:=u[m]=展平[表[s[k]-s[j],{k,2,z1},{j,1,k-1}]][[m]]

表[u[m],{m,1,z1}](*A120070型*)

v[n,h_u]:=v[n,h]=如果[IntegerQ[u[h]/n],h,0]

w[n_x]:=w[n]=表[v[n,h],{h,1,z1}]

d[n_x]:=d[n]=第一个[删除[w[n],位置[w[n],0]]]

表[d[n],{n,1,z2}](*A204994年*)

k[n_x]:=k[n]=楼层[(3+Sqrt[8 d[n]-1])/2]

m[n_x]:=m[n]=楼层[(-1+Sqrt[8 n-7])/2]

j[n_x]:=j[n]=d[n]-m[d[n]](m[d[n]]+1)/2

表[k[n],{n,1,z2}](*A204905号*)

{[2,n]表(*A204995年*)

表[s[k[n]],{n,1,z2}](*A204996年*)

表[s[j[n]],{n,1,z2}](*A204997年*)

表[s[k[n]]-s[j[n]],{n,1,z2}](*A204998年*)

表[(s[k[n]]-s[j[n]])/n,{n,1,z2}](*A204999*)

交叉引用

囊性纤维变性。A000290型,A204892号.

上下文顺序:A030397型 A257213 A205780号*A082597号 A112212号 A102314号

相邻序列:A204902号 A204903号 A204904号*A204906号 A204907号 A204908号

关键字

作者

克拉克·金伯利2012年1月21日

状态

经核准的

查找|欢迎光临|维基|登记|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索者|最近
OEIS社区|维护人OEIS基金公司。

许可协议,使用条款,隐私政策。.

上次修改日期:美国东部时间2020年8月12日21:10。包含336440个序列。(运行在oeis4上。)