%I#25 2016年7月1日11:46:52
%S-2,3,-5,7,-11,13,-17,19,-23,29,-31,37,-41,43,-47,53,-59,61,-67,71,
%电话-73,79,-83,89,-97101,-103107,-109113,-127131,-137139,-149151,
%U-157163、-167173、-179181、-191193、-197199、-211223、-27229、-233239、-241251、-257263、-269271
%N a(N)=(-1)^N*素数(N)。
%F a(n)=A000040(n)*A033999(n)-_Felix Fröhlich,2016年6月15日
%e a(1)=2*(-1)^1=-2。
%e a(2)=3*(-1)^2=3。
%e a(3)=5*(-1)^3=-5。
%t表[素数[n]*(-1)^n,{n,1,70}]
%t表[If[OddQ[n],-Prime[n]、Prime[n]],{n,70}](*哈维·P·戴尔,2016年7月1日*)
%o(PARI)a(n)=素数(n)*(-1)^n \\ Föhlich_,2016年6月15日
%Y参考A000040、A083236。
%K符号
%O 1,1号机组
%A _特里·D·格兰特,2016年6月12日
|