A166283 Primes such that the concatenation of its index and itself is a prime.

3, 7, 13, 37, 59, 61, 83, 103, 113, 149, 151, 179, 181, 197, 199, 251, 263, 269, 271, 283, 353, 421, 431, 439, 479, 487, 523, 631, 643, 653, 661, 677, 709, 769, 811, 829, 853, 937, 947, 1019, 1039, 1049, 1051, 1277, 1319, 1399, 1427, 1433, 1489, 1543, 1663

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

The prime, 3 has an index of 2, i.e.; pi(3) = 2 and the concatenation, 23 is a prime.

Mathematica

Select[ Prime@ Range@ 273, PrimeQ@ FromDigits@ Join[ IntegerDigits@ PrimePi@#, IntegerDigits@# ] &]
Select[Table[{n, Prime[n]}, {n, 300}], PrimeQ[#[[1]]*10^IntegerLength[ #[[2]]]+ #[[2]]]&][[All, 2]] (* Harvey P. Dale, Jun 01 2017 *)

Crossrefs

Complement of 155030, A000040, A084671.

Sequence in context: A106951 A106057 A049492 * A350676 A186721 A177945

Adjacent sequences: A166280 A166281 A166282 * A166284 A166285 A166286

Keyword

base,nonn

Author

Robert G. Wilson v, Oct 10 2009

Status

approved