|
%I #34 Feb 23 2023 14:11:09
%S 12,23,35,47,613,819,923,1029,1237,1547,1653,1759,1967,2071,2173,2489,
%T 2597,27103,28107,35149,39167,40173,45197,53241,57269,58271,60281,
%U 61283,69347,70349,72359,79401,85439,89461,90463,91467,93487,96503,98521,104569,108593
%N Distinct-digit numbers that are the concatenation of m and prime(m) for some number m.
%C The sequence is complete, and the last term is a(101)=310628549 with m=3106 and prime(m)=28549.
%H Zak Seidov, <a href="/A255729/b255729.txt">Table of n, a(n) for n = 1..101</a>
%t Select[FromDigits[IntegerDigits@ #~Join~IntegerDigits[Prime[#]]] & /@
%t Range@ 3106, Max@ DigitCount@ # == 1 &] (* _Michael De Vlieger_, Mar 25 2015 *)
%Y A255596 is a subsequence.
%K nonn,base,fini,full
%O 1,1
%A _Zak Seidov_, Mar 25 2015
|
