%I #17 Sep 08 2022 08:46:08
%S 0,1,4,7,13,19,28,34,49,52,67,73,88,94,97,112,118,133,139,154,172,208,
%T 214,229,259,283,298,307,319,328,403,409,412,427,439,508,514,523,529,
%U 544,574,613,637,643,649,658,712,724,739,742,802,808,832,847,859,892,934
%N Numbers n such that 2*n+3 and 2*n+5 are both prime.
%H Vincenzo Librandi, <a href="/A243811/b243811.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A040040(n)-2.
%t Select[Range[0, 1000], PrimeQ[2 # + 3] && PrimeQ[2 # + 5] &]
%o (Magma) [n: n in [0..1000] | IsPrime(2*n+3) and IsPrime(2*n+5)];
%Y Cf. A040040, A067076, A089038.
%K nonn,easy,less
%O 1,3
%A _Vincenzo Librandi_, Jun 11 2014
|