(方案)
(MIT/GNU方案中为整个Z定义的两个替代定义:)
(定义(A117967v2 z)(条件((零?z)0)((负?z))(A004488号(A117967v2(-z)))
(Python)
从sympy.theory.factor导入数字
定义a004488(n):返回int(“”.join([str((3-i)%3)for i in digits(n,3)[1:]]),3)
定义a117968(n):
如果n==1:返回2
如果n%3==0:返回3*a117968(n/3)
elif n%3==1:返回3*a117968((n-1)/3)+2
else:返回3*a117968((n+1)/3)+1
定义a(n):如果n==0,则返回0,否则返回a004488(a117968(n))#因德拉尼尔·戈什,2017年6月6日
|