A344477 Primes that occur as p - (digit product of p) for p in A228139.
11, 17, 19, 31, 37, 59, 113, 173, 179, 193, 199, 211, 227, 233, 239, 241, 257, 263, 307, 311, 317, 331, 383, 389, 397, 419, 439, 479, 499, 521, 547, 563, 571, 577, 613, 617, 659, 691, 719, 733, 1117, 1153, 1171, 1193, 1201, 1213, 1279, 1319, 1399, 1447, 1483, 1493, 1511, 1531, 1543, 1609, 1871
Offset: 1
Examples
a(5) = 37 is a term because 41 is prime with no digit 0 and 37 = 41-4*1.
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Programs
-
Maple
d:= 4: # to get terms with at most d digits M:= 10^d + 9^d: f:= proc(n) local L,v; L:= convert(n,base,10); if member(0,L) then return NULL fi; if isprime(n) then v:= n - convert(L,`*`); if isprime(v) then v fi fi end proc: sort(convert(select(`<`,map(f, {seq(i,i=11..M,2)}),10^d),list));
Comments