A185893 Terms in A048398 ending with 1.
101, 12101, 32321, 210101, 432121, 1012321, 1212121, 3210101, 3210121, 3212101, 3232321, 3432101, 5432321, 5434321, 21212101, 21232121, 23210101, 23232101, 43432321, 45434321, 101012321, 101210101, 101232121, 121232101, 123210121, 123232121, 321012121
Offset: 1
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Prime[Range[100000]], IntegerDigits[#][[-1]] == 1 && Union[Abs[Differences[IntegerDigits[#]]]] == {1} &]
Comments