A334972-OEIS公司

A334972飞机

双酉钦佩数：数k使得k有一个适当的双酉除数d使得bsigma（k）-2*d=2*k，其中bsigma是双酉除数函数的和(18899年).

24, 30, 40, 42, 48, 54, 56, 66, 70, 78, 80, 88, 102, 104, 114, 120, 138, 150, 162, 174, 186, 222, 224, 246, 258, 270, 282, 294, 318, 354, 360, 366, 402, 420, 426, 438, 448, 474, 498, 534, 540, 582, 606, 618, 630, 642, 654, 660, 672, 678, 720, 726, 762, 780, 786 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`等价地，等于其适当的双元除数之和的数字，其中一个用减号表示。` `令人钦佩的数字(A111592号)指数奇的(A268335型)由于所有除数都是双宾的，所以它们也是双宾的令人钦佩的数字。非指数奇数的项有48、80、150、162、294、360、420、448、540、630、660、720、726、780、832、990。。。`
	链接	`阿米拉姆·埃尔达尔，n=1..10000时的n，a（n）表`
	例子	`48是按顺序排列的，因为48=1+2+3-6+8+16+24是其适当的双元除数之和，其中一个除数为6，用减号表示。`
	数学	`fun[p_，e_]：=如果[OddQ[e]，（p^（e+1）-1）/（p-1），（p_（e+1；bsigma[1]=1；bsigma[n_]：=次数@@（fun@@FactorInteger[n]）；buDivQ[n_，1]=真；buDivQ[n_，div_]：=如果[Mod[#2，#1]==0，上次@应用[Intersection，Map[Select[Divisors[#]，Function[d，CoprimQ[d，#/d]]&，{#1，#2/#1}]==1，False]@@{div，n}；buAdmQ[n_]：=（ab=bsigma[n]-2 n）>0&&EvenQ[ab]&ab/2<n&&Divisible[n，ab/2]&&buDivQ[n，ab/2]；选择[Range[1000]，buAdmQ]`
	交叉参考	`双总统版本的A111592号.` `的后续A292982型.` `囊性纤维变性。18899年,A222266号,A268335型,A328328型,A334974飞机.` `上下文中的序列：A068544号 A284174型 A292982型A109797号 129656英镑 A372299型` `相邻序列：A334969型 A334970飞机 A334971飞机A334973飞机 A334974飞机 A334975飞机`
	关键词	`非n`
	作者	`阿米拉姆·埃尔达尔2020年5月18日`
	状态	`经核准的`