A345319 Numbers whose reciprocals have period 10.
451, 1353, 2981, 4059, 8943, 9091, 26829, 27273, 81819, 100001, 122221, 300003, 366663, 372731, 900009, 1099989, 1118193, 2463661, 3354579, 4100041, 7390983, 12300123, 22172949, 27100271, 36900369, 81300813, 101010101, 243902439, 303030303, 909090909, 1111111111, 3333333333, 9999999999
Offset: 1
Examples
1/451 = 0.00221729490022172949002217294900..., whose periodic part is 0022172949.
Programs
-
Mathematica
Select[Range[100000000], MultiplicativeOrder[10, #] == 10 &]
-
PARI
isok(k) = gcd(k, 10) && (znorder(Mod(10, k)) == 10); \\ Michel Marcus, Jun 14 2021
-
PARI
my(v=divisors(10^10-1)); select(x->(znorder(Mod(10,x))==10), v) \\ Jianing Song, Jun 15 2021
Extensions
a(27)-a(28) from Jinyuan Wang, Jun 13 2021
a(29)-a(33) from Jianing Song, Jun 15 2021
Comments