A382118 Prime indices k such that prime(k) and prime(k) + 9 are anagrams.
19, 73, 79, 163, 197, 241, 269, 281, 431, 439, 619, 647, 691, 739, 751, 761, 823, 877, 953, 1019, 1051, 1109, 1223, 1259, 1291, 1307, 1423, 1471, 1723, 1741, 1747, 1847, 1949, 1979, 2213, 2371, 2473, 2503, 2647, 2789, 2803, 2819, 2879, 2903, 2909, 3019, 3163, 3361
Offset: 1
Examples
The prime 19 is a term of the sequence because prime(19)= 67 and 67 + 9 = 76 are anagrams.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..19861
Programs
-
Magma
[n: n in [0..10000] | IsPrime(n) and Sort(Intseq(NthPrime(n))) eq Sort(Intseq(NthPrime(n) + 9))];
-
Mathematica
Select[Prime[Range[500]],Sort[IntegerDigits[Prime[#]]]==Sort[IntegerDigits[Prime[#]+9]]&]
Comments