%I #46 Nov 19 2015 02:52:48
%S 11,12,14,16,29,49,89,109,122,128,130,136,140,142,146,152,158,160,166,
%T 170,172,178,182,188,196,299,499,899,1009,1049,1126,1130,1136,1138,
%U 1148,1150,1156,1162,1166,1172,1178,1180,1190,1192,1196,1198,1210,1222,1226,1228,1232
%N Suppose k is the concatenation of two integers, x and y: k = concat(x,y); a(n) is the smallest value of k such that x+y = prime(n).
%o (PARI) vsums(k) = {vs = []; for (j=1, #digits(k)-1, vs = concat(vs, k\10^j+k % 10^j);); vs;}
%o isokvs(vs, n) = for (j=1, #vs, if (vs[j]==n, return(1))); return(0);
%o findp(n) = {p = prime(n); k = 10; ok = 0; while (!ok, vs = vsums(k); ok = isokvs(vs, p); if (! ok, k++);); k;} \\ _Michel Marcus_, Nov 13 2015
%Y Cf. A000040, A007953.
%K nonn,base,easy
%O 1,1
%A _Giovanni Teofilatto_, Nov 01 2015
%E More terms and better definition from _Altug Alkan_, Nov 13 2015