%I#8 2020年1月30日07:02:27
%S 2,6,12,16,24,48,9612819228832438457664872986497211521296,
%电话:14581728194425922916345638851845832777610368116415552,
%电话:23328311044665693312177147209952236196279936314928
%N增加3个平滑数字之间的间隙(上端)。
%H Amiram Eldar,n的表,a(n)表示n=1..10000</a>
%F a(n)=A084788(n)+A084789(n)。
%F a(n)=A003586(A084791(n)+1)。
%t s={};m=13;Do[n=3^k;While[n<=3^m,AppendTo[s,n];n*=2],{k,0,m}];s=联合[s];d=差异@秒;v=DeleteDuplicates@FoldList[Max,d];地图[s[[1+First@位置[d,#]]]&,v]//Flatten(*_Amiram Eldar_,2020年1月30日*)
%Y参见A003586、A061987、A084788、A08478、A084791。
%K nonn公司
%O 1,1号机组
%A _Reinhard Zumkeller,2003年6月3日
|