|
|
A344477
|
|
Primes that occur as p - (digit product of p) for p in A228139.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Terms are unique and in numerical order.
There are terms that correspond to more than one member of A228139, such as 17 = 23-2*3 = 89-8*9.
|
|
LINKS
|
|
|
EXAMPLE
|
a(5) = 37 is a term because 41 is prime with no digit 0 and 37 = 41-4*1.
|
|
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));
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|