%I#34 2023年10月18日11:35:36
%S 0,1,2,3,10,11,12,20,21,21001011021031101111212012122,
%电话:2002102210211212213220221223030100110021010,
%电话:10111012102010211022110011101110211031110111111211211122
%当使用贪婪算法表示法以Pi为基数写入时,N的基点左边的部分。
%H Paolo Xausa,n的表格,n=0..10000的a(n)</a>
%H维基百科,<a href=“https://en.wikipedia.org/wiki/Non-integer_base_of_numeration(英文)“>非整数基数</a>。
%e a(5)=11,因为基础Pi中的5为11.22012202。。。
%p A344939:=程序(n)
%p局部e,ntrunc,a,d;
%p位数:=1000;
%p如果n=0,则
%p返回0;
%p end if;
%p ntrunc:=n;
%p e:=地板(log(n)/log(Pi));
%p a:=0;
%当e>=0 do时为p
%p d:=地板(ntrunc/Pi^e);
%pa:=10*a+d;
%p ntrunc:=evalf(ntrunc-d*Pi^e);
%p e:=e-1;
%p端do:
%p a;
%p端程序:
%p序列(A344939(n),n=0..15);#_R.J.Mathar,2021年8月16日
%t A344939[n_]:=FromDigits[First[RealDigits[n,Pi,Floor[Log[Pi,Max[n,1]]+1]];
%t阵列[A344939100,0](*_Paolo Xausa_,2023年10月17日*)
%Y参考A000796(Pi数字)。A007090的后续。
%Y参见A105116(基数e),A105424(基数φ)。
%Y参考A366721(位数)。
%K nonn,基础
%0、3
%2021年6月3日,A_Paolo Xausa
%E Name编辑人:Paolo Xausa,2023年10月18日
|