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

Author

Amarnath Murthy, Apr 09 2002

Keywords

• base
• nonn

Examples

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

Crossrefs

Cf. A069793, A069567, A069794, A069796.

Programs

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 *)

Extensions

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