login
Smallest twin prime > 3*2^n.
1

%I #7 Sep 12 2015 13:36:29

%S 11,17,29,59,101,197,419,809,1607,3119,6197,12377,24917,49169,98321,

%T 196661,393299,786551,1572869,3145739,6292007,12582917,25166129,

%U 50331707,100663427,201327011,402653411,805306457,1610613929,3221225549

%N Smallest twin prime > 3*2^n.

%e For n=1 the smallest twin prime > 3*2^n is 11.

%t stp[n_]:=Module[{t=NextPrime[3*2^n]},While[!PrimeQ[t+2],t=NextPrime[t]];t]; Array[stp, 30] (* _Harvey P. Dale_, Sep 12 2015 *)

%Y Cf. A001359, A208574.

%K nonn

%O 1,1

%A _Washington Bomfim_, Feb 28 2012