%I#8 2022年6月13日15:51:35

%S 1,1,2,1,2,3,1,1,2,3,4,2,1,2,6,5,5,1,4,7,1,3,42,6,7,8,10,4,2,3，

%T 2,10,4,2,3,10,9,10,9,26,13,2,1,4,10,14,3,1,4,7,14,15,7,7,73,5，

%U 1,14、12、2、5、16、18、19、9、9、5、3、1、16、19、11、10、19、3、7、4、5、19、21、3、2、4、7、6

%N a（N）=|A061395（N+1）-A061395（N）|。

%t f[n_]：=Abs[PrimePi[FactorInteger[n]][[-1，1]]-PrimePi[FactorIntiger[n+1]][[1，1]]；数组[f，95]（*_Robert G.Wilson v_*）

%t Abs[Differences[表[PrimePi[FactorInteger[n][[-1,1]]]，{n，100}]]（*哈维·P·戴尔，2022年6月13日*）

%K nonn公司

%O 1,4型

%A Giovanni Teofilatto，2007年12月29日

%E编辑：Robert G.Wilson v_和N.J.A.Sloane，2007年12月30日