%I#27 2022年4月17日01:55:05
%S 1,6,14,15,26,33,35,36,38,51,58,65,69,74,77,84,86,90,93,95106119,
%电话:122123141142143145156158161177185196198201202209,
%电话:21021421521621721922122522622824926265278287291299
%N个数,其偶数质数指数与奇数质数索引相同,以重数计算。
%这些是A045931计数的整数分区的Heinz数。
%C n的素数指数是一个数m,素数(m)除以n。n的多素数指数集是A112798的第n行。
%C由两个连续素数(A006094)的乘积生成的正有理数的乘法子群中的整数。序列在乘法、素数移位(A003961)和除法(其中结果是整数)下闭合。使用这些闭包,所有的项都可以从6的存在中导出。例如,A003961(6)=15,A00396(15)=35,6*35=210,210/15=14。由于A297845可以使用平方、素数移位和乘法进行定义,因此也在A297846下关闭_Peter Munn,2020年10月5日
%H David A.Corneth,<A href=“/A225698/b325698.txt”>n,A(n)表,n=1.-10000</a>
%e术语序列及其基本指数开始于:
%e1:{}
%e 6:{1,2}
%e 14:{1,4}
%e 15:{2,3}
%e 26:{1,6}
%e 33:{2,5}
%e 35:{3,4}
%e 36:{1,1,2,2}
%e 38:{1,8}
%e 51:{2,7}
%e 58:{1,10}
%e 65:{3,6}
%e 69:{2,9}
%e 74:{1,12}
%e 77:{4,5}
%e 84:{1,1,2,4}
%e 86:{1,14}
%e 90:{1,2,2,3}
%e 93:{2,11}
%e 95:{3,8}
%t选择[Range[100],Total[Cases[If[#==1,{},FactorInteger[#]],{p_,k_}:>k*(-1)^PrimePi[p]]==0&]
%o(PARI)是(n)={my(v=向量(2),f=因子(n));对于(i=1,#f~,v[1+primepi(f[i,1])%2]+=f[i、2]);v[1]==v[2]}\\_David A.Corneth_,2020年10月6日
%o(Python)
%o来自sympy import factorint,primepi
%o定义正常(n):
%o v=[0,0]
%o表示因子(n)中的p,e。items():v[primepi(p)%2]+=e
%o返回v[0]==v[1]
%o打印([k代表范围(300)内的k,如果可以(k)])#_Michael S.Branicky_,2022年4月16日,在_David A.Corneth之后_
%A195017中0的Y位置。
%Y A257992(n)=A257991(n)。
%Y参见A000712、A001222、A001405、A006094、A026010、A045931、A063886、A097613、A112798、A130780、A171966、A239241、A241638、A325700。
%Y根据:A003961、A003991、A297845关闭。
%A028260、A332820的Y子序列。
%K非n
%O 1,2号机组
%A _Gus Wiseman_,2019年5月17日
|