A338010 Odd composite integers m such that A001109(m)^2 == 1 (mod m).
9, 35, 51, 55, 77, 85, 119, 153, 169, 171, 187, 209, 261, 319, 369, 385, 451, 531, 551, 595, 649, 715, 741, 779, 899, 935, 961, 969, 989, 1105, 1121, 1189, 1241, 1309, 1443, 1469, 1479, 1711, 1829, 1989, 2001, 2047, 2091, 2261, 2345, 2419, 2555, 2849, 2915
Offset: 1
Keywords
References
- D. Andrica and O. Bagdasar, Recurrent Sequences: Key Results, Applications and Problems. Springer (2020).
Links
- D. Andrica and O. Bagdasar, On some new arithmetic properties of the generalized Lucas sequences, preprint for Mediterr. J. Math. 18, 47 (2021).
Programs
-
Mathematica
Select[Range[3, 3000, 2], CompositeQ[#] && Divisible[ChebyshevU[#-1, 3]*ChebyshevU[#-1, 3] - 1, #] &]
Comments