%I#40 2023年8月8日07:58:52
%S 0,1,2,3,4,5,50,51,52,53,54,555405415425435445545543054315432,
%电话:543354345435554320543215432254325432454325543210543211,
%电话:543212543213543214543215543210054320154321025431035432104321055432150
%N N以分数基6/5表示。
%H Andrew Howroyd,n的表,n=0..1000的a(n)</a>
%H<a href=“/index/Ba#base_fractional”>与分数基相关的序列的索引项</a>
%F表示以b为基数的数字,如果一个数字超过b,则减去b并进位1。在分数基a/b中,减去a并进位b。
%p a:=进程(n)`如果`(n<1,0,irem(n,6,'q')+a(5*q)*10)结束:
%p序列(a(n),n=0..45);#_Alois P.Heinz,2019年8月19日
%ta[n_]:=如果[n==0,0,10*a[5*Floor[n/6]]+Mod[n,6]];表[a[n],{n,0,50}](*_G.C.Greubel_,2019年8月19日*)
%o(鼠尾草)
%o定义basepq扩展(p,q,n):
%o L,i=[n],1
%o而L[i-1]>=p时:
%o x=L[i-1]
%o L[i-1]=x.mod(p)
%o L.append(q*楼层(x/p))
%o i+=1
%o L.反转()
%o返回整数(“”.join(map(str,L))
%o 2014年7月18日,【[0.50]#托姆·埃德加、哈利·奥拉夫森和詹姆斯·范·阿尔斯廷中i的基础扩展(6,5,i)】;2019年8月19日,由_Peter Luschny_修改和更正
%o(PARI)a(n)={如果(n<1,0,a(n\6*5)*10+n%6)};\\_安德鲁·霍罗伊,2019年8月19日
%Y参见A245321、A245399。
%Y参考A024629。
%K nonn,基础
%0、3
%A·热心的W·威尔逊_
%E 2019年8月19日_Andrew Howroyd_的第a(42)条及以后条款
|