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

 


搜索: 编号:a187400
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
两个因子的半素数平均值。
+0
1
15, 35, 51, 65, 77, 91, 115, 123, 141, 161, 185, 187, 201, 209, 219, 221, 235, 259, 267, 301, 305, 321, 339, 341, 355, 365, 377, 381, 403, 413, 427, 437, 451, 453, 481, 485, 497, 501, 537, 545, 589, 649, 667, 681, 689, 699, 717, 721, 723, 737, 745, 749, 763, 789, 835, 843, 849, 893, 901, 905
抵消
1,1
评论
定义类似于A115585号,但要考虑算术平均值,而不是各因素的总和。
偶数半素数,A100484号,不在序列中,因为(除4外)它们因子的平均值不是整数。
链接
阿洛伊斯·海因茨,n=1..1000时的n,a(n)表
例子
半素数187=11*17在序列中,因为平均数(11+17)/2=14=2*7是半素数。
半素数267=3*89在序列中,因为平均数(3+89)/2=46=2*23是半素数。
数学
semiPrimeQ[n_]:=总计[FactorInteger[n]][[2]]==2;Reap[Do[{p,e}=Transpose[FactorInteger[n]];如果[Total[e]==2&&semiPrimeQ[Total[p]/2],Sow[n]],{n,1000}]][[2,1]]
黄体脂酮素
(PARI)sopf(n)={局部(f,s=0);f=因子(n);对于(i=1,矩阵大小(f)[1],s+=f[i,1]);返回}
平均(n)={局部(s);s=sopf(n)/omega(n);返回}
{对于(n=4,10^3,m=averg(n);如果(bigomega(n)==2,如果(m==楼层(m)&&bigomegam(m)==2,打印1(n,“,”))}
//安东尼奥·罗尔丹,2012年10月15日
(PARI)列表(lim)=我的(v=列表());对于素数(p=3,lim/3,对于素数,q=3,min(p-2,lim\p),if(bigomega((p+q)/2)==2,listput(v,p*q));集合(v)\\查尔斯·格里特豪斯四世2014年10月16日
交叉参考
囊性纤维变性。A001358号.
关键字
非n
作者
状态
经核准的

搜索在0.004秒内完成

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

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

上次修改时间:2024年9月21日13:55 EDT。包含376087个序列。(在oeis4上运行。)