%I #9 Apr 10 2021 20:17:08
%S 2,3,5,7,6,9,14,17,21,29,34,43,53,59,67,83,94,109,121,141,150,163,187,
%T 201,232,677,732,791,850,933,1030,1121,1195,1267,1374,1477,1561,1675,
%U 1762,1883,1977,2101,2237,2335,2437,2539,4466,4707,4907,5109,5358,5573,5831,6103
%N a(n) = prime(n)_n.
%C See A122618 for notation.
%H Harvey P. Dale, <a href="/A122637/b122637.txt">Table of n, a(n) for n = 1..1000</a>
%t Array[FromDigits[IntegerDigits[Prime[#]],#]&,60] (* _Harvey P. Dale_, Jan 27 2016 *)
%K nonn,base
%O 1,1
%A _N. J. A. Sloane_, Sep 21 2006