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

 

标志
提示
(来自的问候整数序列在线百科全书!)
109883英镑 从n开始减去它的除数,从1开始,直到一个数小于最后减去的除数或达到最后一个非平凡除数。定义这是n的完全亏数,然后a(n)=n的完全缺数。 11
0, 1, 2, 1, 4, 0, 6, 1, 5, 2, 10, 2, 12, 4, 6, 1, 16, 6, 18, 8, 10, 8, 22, 0, 19, 10, 14, 0, 28, 3, 30, 1, 18, 14, 22, 11, 36, 16, 22, 10, 40, 9, 42, 4, 12, 20, 46, 12, 41, 7, 30, 6, 52, 15, 38, 20, 34, 26, 58, 2, 60, 28, 22, 1, 46, 21, 66, 10, 42, 31, 70, 9, 72, 34, 26, 12, 58, 27, 78 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
如果n是一个完全数,那么a(n)=0。但如果a(n)=0,n就不需要是完全数,例如a(24)=0。但24不是完全数。请参见A064510号.
链接
纳撒尼尔·约翰斯顿,n=1..10000时的n,a(n)表
配方奶粉
a(1)=0,a(2^n)=1。
如果p是素数,a(p)=p-1,a(p^n)=(p^(n+1)-2*p^n+1)/(p-1)。
a(n)=n-A117552号(n) ●●●●-里杜安·乌德拉(Ridouane Oudra)2024年1月25日
例子
a(14)=4:14-1=13,13-2=11,11-7=4。
a(6)=0:6-1=5,5-2=3,3-3=0。6是一个完美的数字。
a(35)=22:35-1=34,34-5=29,29-7=22。
MAPLE公司
A109883号:=proc(n)局部d,j,k,m:如果(n=1),则返回0:fi:j:=1:m:=n:d:=除数(n);k: =nops(d):对于从1到k的j do m:=m-d[j]:如果(m<d[j+1]),则返回m:fi:od:end:#纳撒尼尔·约翰斯顿2011年4月15日
数学
减法=如果[#1<#2,投掷[#1],#1-#2]&;
a[n_]:=Catch@Fold[减法,n,除数@n]
表[a[n],{n,80}](*Bobby R.Treat(DrBob(AT)bigfoot.com),2005年7月14日*)
黄体脂酮素
(PARI)a(n)={my(r=n);fordiv(n,d,if(r<d,return(r));r-=d;);0;}\\米歇尔·马库斯2018年12月28日
(Python)
从sympy导入除数
定义A109883号(n) 以下为:
如果n=1:返回0
s=n
对于除数(n)[:-1]中的d:
如果s<d:中断
s-=d
返回s
打印([A109883号(n) 对于范围(1,80)]中的n)#迈克尔·布拉尼基2024年3月31日
交叉参考
关键词
容易的,非n
作者
阿玛纳斯·穆尔西2005年7月11日
扩展
更多术语来自杰森·厄尔斯罗伯特·威尔逊v2005年7月12日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月17日22:02。包含371767个序列。(在oeis4上运行。)