%I#10 2016年4月9日17:06:25
%S 0,1,2,3,4140141143144130131132133134120121122123,
%电话:12411011111211311410010110210310424024124224324230,
%电话:2312323323422022122222322421021212213214200201202203
%N以-5为基数的数字。
%D D.E.Knuth,《计算机编程的艺术》。艾迪森·韦斯利,马萨诸塞州雷丁市,1969年,第2卷,第189页。
%H Chai Wah Wu,n的表格,a(n)表示n=0..10000</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/Negabinary.html“>否定</a>
%H由Wolfram Research的Matthew Szudzik编写并提交,<a href=“http://library.wolfram.com/conferences/devconf99/challenge/“>数学编程竞赛</a>
%t ToNegaBases[i_Integer,b_Integer]:=FromDigits[Rest[Reverse[Mod[NestWhileList[(#1-Mod[#1,b])/-b&,i,#1!=0&],b]]];表[ToNegaBases[n,5],{n,0,55}]
%o(Python)
%o定义A073786(n):
%o s,q=“”,n
%o当q>=5或q<0时:
%o q,r=divmod(q,-5)
%o如果r<0:
%o q+=1
%o r+=5
%o s+=str(r)
%o返回int(str(q)+s[::-1])#_Chai Wah Wu_,2016年4月9日
%Y参见A007091、A039724、A073785、A007608、A07378、A0731788、A073 789、A073790和A039723。
%K基础,简单,无
%0、3
%A _Robert G.Wilson v_,2002年8月11日