登录
数字k,使2*k^2-2*k+19为复合数。
(原名M5068)
1

%I M5068#19 2022年9月8日08:44:35

%S 19,20,22,25,29,34,38,39,45,47,48,55,56,57,58,60,61,63,64,65,68,71,

%电话74,76,77,78,82,83,85,90,91,93,94,95,96,97102104107110112113,

%电话114115117119122123124126127129130131133134135137139

%N数k,使2*k^2-2*k+19为复合数。

%D N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。

%H Vincenzo Librandi,n表,n=1..3400时的a(n)</a>

%t Select[Range[140],CompositeQ[2#^2-2#+19]&](*需要Mathematica版本10或更高版本*)(*Harvey P.Dale_,2017年6月5日*)

%t选择[范围[200]!PrimeQ[2#^2-2#+19]&](*Vincenzo Librandi_,2017年6月8日*)

%o(Magma)[n:n在[0..200]|不是IsPrime(2*n^2-2*n+19)];//_Vincenzo Librandi_,2017年6月8日

%K非n

%O 1,1号机组

%A _N.J.A.Sloane、Mira Bernstein、Robert G.Wilson v_