登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A225854型 素数连续部分和之间的素数频率。 1
1, 2, 1, 3, 2, 4, 3, 5, 4, 6, 6, 8, 6, 9, 6, 9, 10, 10, 8, 12, 12, 11, 12, 12, 15, 14, 14, 14, 14, 17, 17, 16, 17, 19, 19, 22, 16, 24, 21, 20, 20, 20, 28, 22, 26, 21, 24, 28, 23, 31, 23, 30, 28, 28, 32, 28, 31, 30, 27, 36, 29, 32, 31, 39, 33, 38, 36, 36, 37 (列表图表参考历史文本内部格式)
偏移
1,2
评论
给出序列中相邻数字之间的素数A014284号也就是说,半开区间中的素数[A014284号(k) ,A014284号(k+1))。
该序列的绘图遵循线性曲线。
链接
乔瓦尼·雷斯塔,n=1..10000时的n,a(n)表
例子
列出从n=1开始以1为增量的数字,当数字达到素数时停止,在这种情况下,列表将是{1,2},因为它的大小是2。求出该区间中素数的个数,并将其加到序列中。在这种情况下,列表中有1个素数。继续从上一个列表中的最后一个数字开始计数,并应用相同的规则,下一个列表将是大小为3的{3,4,5},包含2个质数。后面的列表是大小为5的{6,7,8,9,10},包含1个质数。
数学
numberOfLines=100;(*序列中需要多少元素*)a={0};分布={};最后=0;对于[j=1,j<=numberOfLines,j++,frequency=0;b={};对于[i=1,i<=Prime[j],i++,b=Append[b,last+i];如果[PrimeQ[b[i]]],频率+=1];];last+=质数[j];distribution=附加[分布,频率];];打印[“分发=”,分发];ListPlot[分布];(*原始程序*)
seq[n_]:=块[{a=0,b=2,p=2,v},表[v=PrimePi@b-PrimePi@a;p=NextPrime@p; a=b;b+=p;v、 {n}]];seq[100](*更快的版本,乔瓦尼·雷斯塔2013年5月18日*)
交叉参考
囊性纤维变性。A014284号.
关键词
非n
作者
维克托·潘2013年5月17日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

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

上次修改时间:2024年4月18日22:18 EDT。包含371782个序列。(在oeis4上运行。)