%I A093734
%S A093734 3,19,79,127,131,149,373,401,487,1031,1303,1427,1699,1801,2069,2477,
%T A093734 2659,2767,3307,3391,3449,3583,3671,3727,4093,4423,4603,4817,5081,5501,
%U A093734 5641,5737,5813,5839,6619,7219,7243,7351,7393,8293,8543,8641,8693,8699
%N A093734 Primes p such that both prime(p) + prime(p+1) +/-1 are also primes.
%t A093734 Select[ Range[ 10000 ], PrimeQ[ # ] && PrimeQ[ Prime[ # ] + Prime[ # 
               + 1 ] - 1 ] && PrimeQ[ Prime[ # ] + Prime[ # + 1 ] + 1 ] & ]
%Y A093734 Cf. A072669, A092738.
%Y A093734 Sequence in context: A072263 A090698 A027175 this_sequence A099421 A061171 
               A163431
%Y A093734 Adjacent sequences: A093731 A093732 A093733 this_sequence A093735 A093736 
               A093737
%K A093734 nonn
%O A093734 1,1
%A A093734 Robert G. Wilson v (rgwv(AT)rgwv.com) and Jorge Coveiro (jorgecoveiro(AT)yahoo.com), 
               Apr 14 2004