OFFSET
1,1
COMMENTS
If p is a prime and the number of digits of 3*p is in A363353, then the concatenation of p and 3*p is a term. The first term of this type is a(2728) = 37111.
EXAMPLE
a(3) = 116 is a term because 11 is a prime, 6 = 2*3 is a semiprime, and their concatenation 116 = 2^2 * 29 is a triprime.
MAPLE
P[1]:= [2, 3, 5, 7]:
for d from 2 to 3 do P[d]:= select(isprime, [seq(i, i=10^(d-1)+1..10^d-1, 2)]) od:
for d from 1 to 3 do SP[d]:= select(t -> numtheory:-bigomega(t) = 2, [$10^(d-1).. 10^d-1]) od:
R:= {}:
for d from 2 to 4 do
for d1 from 1 to d-1 do
d2:= d-d1;
V:= select(t -> numtheory:-bigomega(t)=3, {seq(seq(dcat(a, b), a=P[d1]), b=SP[d2])});
R:= R union V;
od
od:
sort(convert(R, list));
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Robert Israel, Aug 16 2023
STATUS
approved