Search: id:A117738 Results 1-1 of 1 results found. %I A117738 %S A117738 1,1,3,23,43,13,87,71,153,11,19,13,89,219,119,459,1,129,633,131,71,217, %T A117738 1091,911,1141,511,143,201,377,379,371,377,83,201,993,53,143,307,423, %U A117738 919,259,263,759,3933,3,1781,607,2327,7683,541,3443,6507,4023,3399,899 %N A117738 Least number d such that 10^n -/+ 3d form a prime pair. %F A117738 A115564(n)/3. %t A117738 f[n_] := Block[{k = 1}, While[ ! PrimeQ[10^n - 3k] || ! PrimeQ[10^n + 3k], k++ ]; k]; Array[f, 55] %Y A117738 Sequence in context: A116893 A106066 A167216 this_sequence A014582 A146142 A105854 %Y A117738 Adjacent sequences: A117735 A117736 A117737 this_sequence A117739 A117740 A117741 %K A117738 nonn %O A117738 1,3 %A A117738 Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 12 2006 Search completed in 0.001 seconds