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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A350735型 具有p<=q的半素数p*q,使得和{素数r<=p}(qmodr)=q。 0
143, 169, 209, 1943, 8413, 11773, 288727, 292421, 544987, 1519381, 1798397, 3245527, 3506509, 4528499, 7043693, 9682711, 10476493, 11670493, 12603709, 16051433, 21499519, 21916327, 64595353, 68086903, 75022813, 81430093, 90537803, 134473993, 136693819, 146316323 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
例子
a(3)=209是一个项,因为209=11*19,其中和{素数r<=11}(19modr)=(19mod2)+(19mod3)+(19 mod5)+(20mod7)+(9mod11)=1+1+4+5+8=19。
MAPLE公司
过滤器:=proc(n)局部p,q,r,i;
如果numtheory:-bigomega(n)<>2,则返回false fi;
p、 q:=(最小值,最大值)(数量:-系数集(n));
q=加法(q mod r,r=选择(i素数,[2,seq(i,i=3..p,2)])
结束进程:
选择(过滤器,[seq(i,i=9..600000,2)]);
数学
seqQ[n_]:=模[{f=FactorInteger[n],p=0,q},如果[f[[;;,2]]=={1,1},p=f[[1,1]];q=f[[2,1]]];如果[f[[;;,2]]=={2},p=q=f[[1,1]]];p>0&&Sum[Mod[q,r],{r,选择[Range[p],PrimeQ]}]==q];选择[Range[600000],seqQ](*阿米拉姆·埃尔达尔2022年1月13日*)
交叉参考
关键词
非n
作者
扩展
a(10)-a(22)来自阿米拉姆·埃尔达尔2022年1月13日
a(23)-a(30)来自丹尼尔·苏图2022年5月12日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月25日05:27。包含373697个序列。(在oeis4上运行。)