A202259 Right-truncatable nonprimes: every prefix is nonprime number.
0, 1, 4, 6, 8, 9, 10, 12, 14, 15, 16, 18, 40, 42, 44, 45, 46, 48, 49, 60, 62, 63, 64, 65, 66, 68, 69, 80, 81, 82, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 96, 98, 99, 100, 102, 104, 105, 106, 108, 120, 121, 122, 123, 124, 125, 126, 128, 129, 140, 141, 142
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
- Barry Carter, Table of n, a(n) for n=1..23498959 (bz2 compressed)
- Barry Carter, Mathematica package
Crossrefs
Programs
-
Maple
filter:= proc(n) option remember; not isprime(n) and procname(floor(n/10)) end proc: for i from 0 to 9 do filter(i):= not isprime(i) od: select(filter, [$0..1000]); # Robert Israel, Nov 01 2016
Comments