%I#15 2023年1月30日12:29:00
%S 0,1,1,3,1,5,3,7,1,9,5,31,3,11,7,51,1,71,9,52,5,12,31,92,3,91,11,72,7,
%电话:32,51,13,1,33,71,94,9,14,52,75,5,73,12,35,31,54,92,16,3,53,91,15,11,
%U 34,72,95,7,93,32,55,51,74,13,36,1,56,33,79,71,18,94311,9,37,14
%N RevDecimal(RevBinary(N)),其中RevDecimil(m)是m(A004086)的十进制反转,RevBinance(m)则是m(P030101)的二进制反转。
%H Harvey P.Dale,n的表格,n=0..1000的a(n)</a>
%F a(n)=A004086(A030101(n))_米歇尔·马库斯,2023年1月30日
%t IntegerReverse[IntegerReverse[Range[0,80],2]](*需要Mathematica版本10或更高版本*)(*Harvey P.Dale_,2017年10月3日*)
%o(Python)
%o定义a(n):返回int(str(int(bin(n)[:1:-1],2))[::-1])
%o打印([a(n)代表范围(75)内的n)]#_Michael S.Branicky_,2023年1月30日
%o(PARI)a(n)=来自数字(Vecrev(数字(来自数字(Vecrev(二进制(n)),2)));\\_米歇尔·马库斯,2023年1月30日
%Y参考A030101、A004086。
%Y参考A081431、A081433、A007088。
%K nonn,基础
%0、4
%A _Reinhard Zumkeller,2003年3月20日
|