A256703 Numbers m such that A166133(m+1) = A166133(m)^2 - 1.
4, 292, 330, 615, 625, 744, 982, 1075, 1671, 2176, 2389, 2820, 2937, 3228, 3598, 4187, 6590, 7803, 9960, 10173, 11628, 13140, 13396, 14035, 15588, 16396, 17766, 18813, 19858, 21111, 21115, 21246, 22808, 23241, 24784, 25050, 25149, 25167, 25384
Offset: 1
Keywords
Links
- Ray Chandler, Table of n, a(n) for n = 1..6575
Crossrefs
Cf. A166133.
Programs
-
Haskell
import Data.List (findIndices) a256703 n = a256703_list !! (n-1) a256703_list = map (+ 1) $ findIndices (\(u, v) -> v == u^2-1) $ zip a166133_list (tail a166133_list)