登录

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

 

提示 （来自的问候整数序列在线百科全书!) A274437号 形式为3*k+1的素因子比形式为3*k+2的素因子更明显的数。 三 7, 13, 19, 21, 31, 37, 39, 43, 49, 57, 61, 63, 67, 73, 79, 91, 93, 97, 103, 109, 111, 117, 127, 129, 133, 139, 147, 151, 157, 163, 169, 171, 181, 182, 183, 189, 193, 199, 201, 211, 217, 219, 223, 229, 237, 241, 247, 259, 266, 271, 273, 277, 279, 283, 291 (列表;图表;参考;听;历史;文本;内部格式) 抵消 1,1 评论 包含的所有条款A004611号除了1-罗伯特·伊斯雷尔2016年8月3日 链接 克拉克·金伯利，n，a（n）表，n=1.10000 例子 39=3^1 13^1，所以不同素数3*k+1为1，不同素数3+k+2为0。 枫木 过滤器：=proc（n）局部P1，P2； P1，P2:=选择删除（t->t mod 3=1，数量理论：-系数集（n））； nops（P1）>nops（P2减去{3}） 结束进程： 选择（过滤器，[1..1000]美元）#罗伯特·伊斯雷尔2016年8月3日 数学 g[n_]：=映射[First，FactorInteger[n]]；z=5000； p1=选择[Prime[范围[z]]，Mod[#，3]==1&]； p2=选择[Prime[Range[z]]，Mod[#，3]==2&]； q1[n_]：=长度[交点[g[n]，p1]] q2[n_]：=长度[交点[g[n]，p2]] 选择[Range[z]，q1[#]==q2[#]&]；(*1974年2月35日*) 选择[Range[z]，q1[#]<q2[#]&]；(*A274436号*) 选择[Range[z]，q1[#]>q2[#]&]；(*A274437号*) 交叉参考 囊性纤维变性。A004611号，1974年2月35日，A274436号. 上下文中的序列：A024606号 A074628号 A232436号*A031194美元 A121058号 A007921号 相邻序列：A274434号 1974年2月35日 A274436号*1974年 A274439号 A274440型 关键词 非n，容易的 作者 克拉克·金伯利2016年7月19日 状态 经核准的

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

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

上次修改时间：2024年5月7日21:53 EDT。包含372317个序列。（在oeis4上运行。）