登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志


提示
问候整数序列的在线百科全书!)
A1200 44 10次n次3-几乎素数。 2个
8, 45, 412、3918, 38991, 395085、4046429, 41657362, 429891626、4439956573, 45851698382, 473238120286、4880292241955, 50280826966354 列表图表参考文献历史文本内部格式
抵消

0,1

链接

n,a(n)n=0…13的表。

Mathematica

ThreeAlmostPrimePi[n_] := Sum[ PrimePi[n/(Prime@i*Prime@j)] - j + 1, {i, PrimePi[n^(1/3)]}, {j, i, PrimePi@ Sqrt[n/Prime@i]}]; ThreeAlmostPrime[n_] := Block[{e = Floor[Log[2, n]], a, b}, a = 2^e; Do[b = 2^p; While[ThreeAlmostPrimePi[a] < n, a = a + b]; a = a - b/2, {p, e, 0, -1}]; a + b/2]; Do[ Print@ThreeAlmostPrime[10^n], {n, 0, 13}]

3-素数[n]:=块[{e= Lo[ log,2,n] + 2 ],a,b},a=2 ^ e;do[b=2 ^ p;同时[3] PrimePi[a]<n,a=a+b];a=a- b/2,{p,e,0,-1 };a+b/2;表[3-素数[n],{n,0, 13 }]

交叉裁判

囊性纤维变性。A109251A000 6988A114125A1200A1200 46.

语境中的顺序:A899896 A000 687 A000 9369*A00 268 A306047 A10438

相邻序列:A1200 A1200 A1200*A1200 A1200 46 A1200 47

关键词

更多诺恩

作者

Robert G. Wilson五世2月15日2006

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ索引γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

许可协议、使用条款、隐私政策。.

最后修改10月19日11:26 EDT 2019。包含328216个序列。(在OEIS4上运行)