登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A371061 a(1)=1,a(2)=2;对于n>2,a(n)是前两项中每一项的最大真除数之和,但如果没有真除数>1,则使用该项本身。 1
1, 2, 3, 5, 8, 9, 7, 10, 12, 11, 17, 28, 31, 45, 46, 38, 42, 40, 41, 61, 102, 112, 107, 163, 270, 298, 284, 291, 239, 336, 407, 205, 78, 80, 79, 119, 96, 65, 61, 74, 98, 86, 92, 89, 135, 134, 112, 123, 97, 138, 166, 152, 159, 129, 96, 91, 61, 74, 98 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
保罗·沙萨(Paolo Xausa),n=1..10000时的n,a(n)表
常系数线性递归的索引项,签名(1,-1,1,-1,1,-1,1,-1,-1,1,1,-1,-1,-1,1,-1,1-,-1,1.)。
配方奶粉
a(n)=A117818号(a(n-1))+A117818号(a(n-2)),对于n>2。
当n>=39时,a(n+18)=a(n)-R.J.马塔尔2024年5月24日
例子
每一项是前两项的最大真除数之和。如果一个项没有合适的除数>1,那么取数字本身,例如:
a(2)=2是素数,a(3)=3是素数,所以a(4)=2+3=5;
a(3)=3是素,a(4)=5是素,所以a(5)=3+5=8;
a(4)=5是素数,a(5)=8,其最大真除数是4,所以a(6)=5+4=9;
8和9的最大真除数分别是4和3,因此a(7)=4+3=7;等。
MAPLE公司
A371061型:=进程(n)
选项记忆;
如果n<=2,则
n;
其他的
A117818号(进程名(n-1))+A117818号(进程名(n-2));
结束条件:;
结束进程:
序列(A371061型(n) ,n=1..100)#R.J.马塔尔2024年4月30日
数学
A117818号[n_]:=如果[n==1||PrimeQ[n],n,除数[n][[2]]];
A371061型[编号]:=A371061型[n] =如果[n<3,n,A117818号[A371061型[n-1]]+A117818号[A371061型[n-2];
阵列[A371061型, 100] (*保罗·沙萨2024年5月24日*)
黄体脂酮素
(Python)
导入数学
def primeTest(数量):
ans=0
如果num==1或num==2:
返回num
对于范围(0,int(num**0.5))中的i:
如果(num/(i+2)).is_integer()==真:
ans=数量/(i+2)
打破
如果ans==0:
ans=数量
返回ans
def-seqgen(开始):
seq=开始
x=[0,1]
对于范围(0,1000)内的i:
list=''.join(序列中x的str(x))
a=主要测试(seq[i])
b=主要测试(seq[i+1)
序列追加(int(a+b))
x.append(i+2)
子列表=“”.join(str(x)for x in[seq[i],seq[i+1],seq[i+2]])
如果列表中有子列表:
打破
返回i、x、seq
开始=[1,2]
i、 x,seq=seqgen(开始)
打印(seq)
(PARI)\\b(n)是A117818号(n) ●●●●。
b(n)=如果(n==1||是素数(n),n,n/因子(n)[1,1])
seq(n)={my(a=向量(n));a[1]=1;a[2]=2;对于(n=3,n,a[n]=b(a[n-1])+b(a[2]);a}\\安德鲁·霍罗伊德2024年3月9日
交叉参考
囊性纤维变性。A117818号.
关键词
非n,容易的
作者
托马斯·W·杨2024年3月9日
状态
经核准的

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

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

最后修改时间:美国东部时间2024年6月22日04:41。包含373561个序列。(在oeis4上运行。)