A129693 Right truncatable primes in base 9 (written in decimal form).
2, 3, 5, 7, 19, 23, 29, 31, 47, 53, 67, 71, 173, 179, 211, 263, 269, 281, 283, 431, 479, 607, 641, 643, 647, 1559, 1613, 1619, 1901, 1907, 2371, 2423, 2531, 2549, 2551, 3881, 5471, 5791, 5827, 14033, 14519, 17117, 17167, 21341, 21347, 22783, 22787, 22943
Offset: 1
Links
- Martin Renner, Table of n, a(n) for n = 1..68
- I. O. Angell, and H. J. Godwin, On Truncatable Primes, Math. Comput. 31, 265-267, 1977.
- Eric Weisstein's World of Mathematics, Truncatable Prime.
- Index entries for sequences related to truncatable primes
Programs
-
Maple
Extend:= proc(n) op(select(isprime, [seq(9*n+k,k=1..8)])) end proc: S:= {}: Agenda:= {2,3,5,7}: while Agenda <> {} do S:= S union Agenda; Agenda:= map(Extend, Agenda); od: sort(convert(S,list)); # Robert Israel, Mar 25 2018
Comments