A077533 - OEIS

%I #17 Mar 27 2021 23:38:32

%S 3,27,33,57,72,75,222,225,237,252,255,273,327,333,357,372,375,522,525,

%T 537,552,555,573,723,732,735,753,777,2223,2232,2235,2253,2277,2322,

%U 2325,2337,2352,2355,2373,2523,2532,2535,2553,2577,2727,2733,2757,2772,2775

%N Multiples of 3 using only prime digits (2, 3, 5 and 7).

%H David A. Corneth, <a href="/A077533/b077533.txt">Table of n, a(n) for n = 1..10000</a>

%H <a href="/index/Ar#10-automatic">Index entries for 10-automatic sequences</a>.

%t ok3Q[n_]:=And@@(MemberQ[{2,3,5,7},#]&/@IntegerDigits[n]); Select[3Range[0,1000],ok3Q]  (* _Harvey P. Dale_, Mar 22 2011 *)

%o (Python)

%o def pd(n): return set(str(n)) <= set("2357") # has only prime digits

%o def aupto(limit): return [m for m in range(0, limit+1, 3) if pd(m)]

%o print(aupto(3000)) # _Michael S. Branicky_, Mar 27 2021

%Y Cf. A008585 (multiples of 3), A046034 (prime digits).

%K base,nonn

%O 1,1

%A _Amarnath Murthy_, Nov 08 2002

%E More terms from _Sascha Kurz_, Jan 03 2003