A269719-组织环境信息系统

A269719型

算术导数等于其数字的某些固定幂之和的数字。

3, 4, 5, 7, 142, 581, 6127, 8549, 12643, 16999, 51703, 57121, 86833, 89195, 92029, 103039, 104647, 112093, 137317, 149851, 218269, 261883, 266923, 323723, 336273, 449881, 505891, 524371, 610171, 617569, 907873, 999643, 1119253, 1134227, 1728787, 1900523, 2045171 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	链接	`n=1..37时的n，a（n）表。` `保罗·拉瓦，序列的术语及其固定功率`
	例子	`3^0=1和3'=1；` `4^1=4和4'=4；` `1^3+4^3+2^3=73和143'=73。`
	MAPLE公司	`使用（数字理论）：P:=proc（q）局部a，b，c，d，j，k，n，ok；对于从3到q的n，做a:=[]；b： =n；确定：=0；` `d： =n*加法（op（2，p）/op（1，p），p=ifactors（n）[2]）；a： =[]；b： =n；确定：=0；` `对于k从1到ilog10（n）+1，如果（b mod 10）>1，则确定：=1；fi；a： =[（b mod 10），op（a）]；b： =trunc（b/10）；od；b： =-1；c： =0；` `如果ok＝1，则当c＜d时，b：＝b+1；` `如果b>0，则c:=加（a[k]^b，k=1..nops（a））；否则，对于k从1到nops（a），如果a[k]=0，那么c:=0；断裂；` `否则c:=c+1；fi；od；fi；od；如果c=d，则lprint（n，b）；fi；fi；od；结束：P（10^9）；`
	数学	`f[n_]：=如果[Abs@n<2，0，n总计[#2/#1&@@@FactorInteger@Abs@n]；Select[Range[3，10^5]，Function[k，IntegerQ@SelectFirst[Range[0，10]，Fuction[d，If[MemberQ[d，0]&&#==0，Total@Power[d/.0->Nothing，#]==f@k，Total@Power[d、#]==f@k]]@IntegerDigits@k&]](迈克尔·德弗利格2016年3月4日，第10版，f（n）之后迈克尔·索莫斯在A003415号)`
	交叉参考	`囊性纤维变性。A003415号.` `上下文中的序列：A035359号 A365577型 A325410型A214626号 A143593号 A364089型` `相邻序列：A269716型 A269717型 A269718型2006年2月20日 A269721型 A269722型`
	关键字	`非n,容易的`
	作者	`保罗·拉瓦2016年3月4日`
	状态	`经核准的`