# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a153166
Showing 1-1 of 1

%I A153166 #9 Oct 05 2024 04:32:08
%S A153166 37,5372,5387,5537,38722,38887,53872,388722,388887,537037,537222,
%T A153166 538887,555372,3703887,3705372,3705387,3870372,3870537,3887037,
%U A153166 5387037,5537037,37220537,37222222,38705372,38705537,38870372,38870537,53703887
%N A153166 Numbers k with property that 6*k+1 is prime and uses only digits 2 and 3.
%C A153166 a(n) = (A153165(n)-1)/6.
%H A153166 Harvey P. Dale, <a href="/A153166/b153166.txt">Table of n, a(n) for n = 1..1000</a>
%t A153166 pd23Q[n_]:=Module[{c=6n+1},PrimeQ[c]&&Union[IntegerDigits[c]]=={2,3}]; Select[ Range[ 54000000],pd23Q] (* _Harvey P. Dale_, Feb 08 2013 *)
%t A153166 Table[Select[(#-1)/6&/@Select[FromDigits/@Tuples[{2,3},n],OddQ[#] && PrimeQ[ #]&],IntegerQ],{n,9}]//Flatten (* _Harvey P. Dale_, Oct 04 2016 *)
%Y A153166 Cf. A153165.
%K A153166 nonn,base
%O A153166 1,1
%A A153166 _Zak Seidov_, Dec 20 2008

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE