login
a(n) = prime(n)_prime(n).
1

%I #15 Oct 15 2021 14:27:41

%S 2,3,5,7,12,16,24,28,49,67,94,118,165,175,195,268,304,367,409,498,514,

%T 562,667,721,880,10202,10612,11456,11890,12885,16390,17555,19187,

%U 19747,22806,23557,25441,27550,28898,31143,33303,34210,38201,38989,40589,41401,89254

%N a(n) = prime(n)_prime(n).

%C See A122618 for notation.

%H Alois P. Heinz, <a href="/A122622/b122622.txt">Table of n, a(n) for n = 1..10000</a>

%p a:= n-> (b-> (l-> add(l[i]*b^(i-1), i=1..nops(l)))(

%p convert(b, base, 10)))(ithprime(n)):

%p seq(a(n), n=1..50); # _Alois P. Heinz_, Aug 31 2021

%t FromDigits[IntegerDigits[#],#]&/@Prime[Range[50]] (* _Harvey P. Dale_, Aug 31 2021 *)

%Y Cf. A000040, A122618.

%K nonn,base

%O 1,1

%A _N. J. A. Sloane_, Sep 21 2006