登录

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

 

提示 （来自的问候整数序列在线百科全书!) A074332号 从第n次完全幂到最接近素数的方向（向下为-1，向上为1，两个素数最接近为0）。 0 -1, 0, 1, 0, -1, 1, -1, 1, -1, 1, 0, 0, -1, -1, -1, 1, 0, 1, -1, 1, 0, 1, -1, -1, 0, -1, 1, -1, 0, -1, 1, 1, -1, 0, -1, 1, -1, 1, -1, -1, 1, 1, 0, 1, 1, -1, 1, 1, -1, -1, -1, 0, 0, 1, 1, 1, -1, -1, 1, 1, -1, 1, -1, 1, -1, 0, -1, 1, 1, -1, 1, 1, -1, -1, 1, 1, -1, 0, 1, -1, 1, 0, -1, -1, -1, 1, 1, -1, 1, 1, 0, -1, -1, 1, -1, 1, 1, 0, -1, 1, -1, 1, 1, 1, -1 (列表；图表；参考；听；历史；文本；内部格式) 抵消 1,1 链接 n=1..105时的n、a（n）表。 配方奶粉 符号（n次完全幂-最接近的素数）或0，如果两个素数最接近。 例子 第七完美力量(A001597号)是27。最接近27的素数是29。符号（27-29）=-1，因此a（7）=-1。第11完美幂是64。没有一个最接近64的素数，因为有两个素数是最接近的，即61和67，所以a（11）=0。 数学 NextPrim[n_]：=块[{k=n+1}，While[！PrimeQ[k]，k++]；k] ；PrevPrim[n_]：=块[{k=n-1}，而[！PrimeQ[k]，k--]；k] ；pp=选择[Range[10000]！PrimeQ[#]&&应用[GCD，Last[Transpose[FactorInteger[#]]]>1&]；连接[{-1}，符号[Table[NextPrim[pp[[n]]]-pp[[n]，{n，1，124}]-Table[pp[n]]-PrevPrim[p[[n]]]，{n,124}]] ppcp[n_]：=模块[{a=NextPrime[n，-1]，b=Next Prime[n]}，其中[n-a==b-n，0，n-a<b-n，1，True，-1]]；ppcp/@Join[{1}，选择[Range[8000]，GCD@@FactorInteger[#][[All，2]]>1&]](*哈维·P·戴尔2018年8月28日*） 交叉参考 囊性纤维变性。A001597号. 上下文中的序列：A266112型 A331990型 2018年3月49日*A152065型 A267870型 A267878型 相邻序列：A074329号 A074330号 A074331号*A074333号 A074334号 A074335号 关键字 签名 作者 尼尔·费尔南德斯2002年10月12日 扩展 编辑人罗伯特·威尔逊v2002年10月13日 状态 经核准的

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

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

上次修改时间：美国东部夏令时2024年5月10日13:29。包含372387个序列。（在oeis4上运行。）