A174384 - OEIS

A174384

n such that n = product of 3 consecutive even numbers and n+-1 are primes.

%I #6 Aug 18 2015 16:14:29

%S 192,2688,21840,26880,63840,175392,238080,314160,592368,4573632,

%T 9260160,9527280,13823040,22424640,27542400,34010928,35286240,

%U 85182240,103821120,113377968,150566640,189116928,220346448,242968128,257256912

%N n such that n = product of 3 consecutive even numbers and n+-1 are primes.

%C 4*6*8 = 192+-1 -> primes,..

%H Harvey P. Dale, <a href="/A174384/b174384.txt">Table of n, a(n) for n = 1..1000</a>

%t f[n_]:=n*(n+2)*(n+4);Select[Table[f[n],{n,0,7!,2}],PrimeQ[ #-1]&&PrimeQ[ #+1]&]

%t Select[Table[n(n+2)(n+4),{n,0,700,2}],AllTrue[#+{1,-1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Aug 18 2015 *)

%Y Cf. A174383

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Mar 17 2010

%E Definition clarified by _Harvey P. Dale_, Aug 18 2015