%I#10 2022年11月22日13:05:14
%S 1,2,3,4,6,12,15,20,30,32,36,60,64,72,81,96108128144162216,
%电话:28832438443257664886411521296172825923456518410368,
%电话:1125913344150121779220016225182668830024400324503653376
%N 3个光滑数之间连续增加的间隙的大小。
%H Amiram Eldar,n的表,a(n)表示n=1..10000</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/SmoothNumber.html“>平滑数</a>
%F a(n)=A084790(n)-A084789(n)。
%F a(n)=A061987(A084791(n))。
%t s={};m=13;Do[n=3^k;While[n<=3^m,AppendTo[s,n];n*=2],{k,0,m}];DeleteDuplicates@FoldList[Max,Differences@Union[s]](*_Amiram Eldar_,2020年1月30日*)
%t DeleteDuplicates[Differences[Select[Range[10^6],Max[FactorInteger[#][[All,1]]<5&]],GreaterEqual](*哈维·P·戴尔,2022年11月22日*)
%Y参见A003586、A061987、A084789、A084790、A08479。
%K nonn公司
%O 1,2号机组
%A _Reinhard Zumkeller,2003年6月3日
|