OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。

登录

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

 

提示 （来自的问候整数序列在线百科全书!) A071145号 数n，使得不同素数之和除以n可被最大素数除以n整除。此外，n正好有6个不同素数因子，且n是平方自由的。 1 72930, 106590, 190190, 222870, 335478, 397670, 620310, 836418, 844305, 884442, 1008678, 1195670, 1218945, 1247290, 1704794, 1761110, 1799798, 2086238, 2206022, 2328410, 2485830, 2496585, 2517258, 2863718, 2903538, 3024021, 3157665, 3172785, 3291890 (列表;图表;参考;听;历史;文本;内部格式) 抵消 1,1 链接 多诺万·约翰逊，n=1..1000时的n，a（n）表 公式 A008472号（n）/A006530（n） 为整数；A001221号（n） =6，n是平方自由的。 例子 n=pqrstw，p<q<r<s<t<w，素数，p+q+r+s+t+w=kt；n=106590=2*3*5*11*17*19；总和=2+3+5+11+17+19=57=3*19（商=3）（2006年3月6日修正） 数学 ffi[x_]：=展平[FactorInteger[x]]lf[x_]:=长度[FactorInteger[x]]ba[x_】：=表[Part[ffi[x]，2*w-1]，{w，1，lf[x]}]sb[x_〕：=应用[Plus，ba[x]]ma[x__]：=Part[Reverse[Flatten[FactorInteger[x]]，2]amo[x_'：=Abs[MoebiusMu[x]Do[s=sb[n]/ma[n]；如果[IntegerQ[s]&&等于[lf[n]，6]&&！相等[amo[n]，0]，打印[{n，ba[n]}]，{n，2，1000000}] 交叉参考 囊性纤维变性。A008472号,A006530,A000961号,A025475号,A037074号,A071139美元-A071147号. 上下文中的序列：A186047号 A252333型 A161730型*2005年2月 A254589号 A254357号 相邻序列：A071142号 A071143美元 A071144号*A071146号 A071147号 A071148号 关键词 非n 作者 拉博斯·埃利默2002年5月13日 状态 经核准的

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

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

最后修改时间：美国东部时间2024年6月11日03:41。包含373288个序列。（在oeis4上运行。）