OFFSET
1,1
COMMENTS
If n is a term, then so are 10*n, 10*n+4, 10*n+6 and 10*n+8. - Robert Israel, May 15 2020
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
By Robert Israel's comment, a(n) << n^k, where k = 1.4306... = log(10)/log(5) =
A154156. - Charles R Greathouse IV, May 15 2020
EXAMPLE
a(3) = 25 because "2" and "5" are prime substrings of "25".
MAPLE
filter:= proc(n) local L, S, i, j, k;
L:= convert(n, base, 10);
nops(select(isprime, {seq(seq(add(L[i]*10^(i-j), i=j..k), j=1..k), k=1..nops(L))}))=2
end proc:
select(filter, [$1..300]); # Robert Israel, May 15 2020
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Gil Broussard, Aug 03 2009
STATUS
approved