A069795 Prime(n) and prime(n+3) use the same digits.

79, 379, 613, 1013, 1979, 2713, 3613, 4817, 5413, 9413, 11113, 11579, 11813, 12437, 12479, 14713, 14813, 14879, 15313, 15937, 17239, 18617, 19037, 19979, 20071, 21379, 23279, 23813, 23917, 24337, 27091, 28279, 29437, 29537, 30091, 30781

Offset

1,1

Links

Table of n, a(n) for n=1..36.

Example

79 is a member as the third next prime 97 uses the same digits.

Mathematica

p = {0}; q = {1}; r = {1}; s = {1}; Do[ If[p == s, Print[ Prime[n - 4]]]; p = q; q = r; r = s; s = Sort[ IntegerDigits[ Prime[n]]], {n, 3 10^3}]
Prime[#]&/@Select[Range[3500], Sort[IntegerDigits[Prime[#]]]==Sort[ IntegerDigits[ Prime[ #+3]]]&] (* Harvey P. Dale, Mar 13 2019 *)

Crossrefs

Cf. A069793, A069567, A069794, A069796.

Sequence in context: A142439 A200847 A132252 * A142556 A023315 A142618

Adjacent sequences: A069792 A069793 A069794 * A069796 A069797 A069798

Keyword

base,nonn

Author

Amarnath Murthy, Apr 09 2002

Extensions

Edited, corrected and extended by Robert G. Wilson v, Apr 12 2002

Status

approved