The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A256751 Index of A166133(n) in the list of divisors of A166133(n-1)^2 - 1. 2
 2, 4, 3, 5, 2, 7, 2, 8, 3, 7, 4, 6, 4, 10, 8, 4, 12, 2, 11, 3, 10, 6, 11, 4, 8, 6, 12, 10, 4, 12, 4, 12, 8, 7, 4, 14, 2, 19, 5, 21, 3, 17, 7, 9, 7, 13, 4, 19, 7, 13, 5, 17, 5, 21, 9, 11, 5, 17, 3, 17, 7, 9, 13, 17, 5, 17, 6, 12, 5, 24, 4, 16, 12, 8, 6, 15, 2 (list; graph; refs; listen; history; text; internal format)
 OFFSET 4,1 COMMENTS A166133(n) = A027750(A166133(n-1)^2-1,a(n)). LINKS Reinhard Zumkeller, Table of n, a(n) for n = 4..10000 EXAMPLE n = 12: A166133(12) = 9, A166133(12-1) = 10, 10^2 - 1 = 99, 9 is the third term of divisors(99) = [1,3,9,11,33,99], therefore a(12) = 3; n = 13: A166133(13) = 16, A166133(13-1) = 9, 9^2 - 1 = 80, 16 is the seventh term of divisors(80) = [1,2,4,5,8,10,16,20,40,80], therefore a(13) = 7. PROG (Haskell) import Data.List (elemIndex); import Data.Maybe (fromJust) a256751 n = (+ 1) \$ fromJust \$ a166133 n `elemIndex` a027750_row' (a166133 (n - 1) ^ 2 - 1) CROSSREFS Cf. A166133, A027750. Sequence in context: A136743 A011387 A019656 * A249484 A134017 A292285 Adjacent sequences: A256748 A256749 A256750 * A256752 A256753 A256754 KEYWORD nonn AUTHOR Reinhard Zumkeller, Apr 09 2015 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified March 30 13:03 EDT 2023. Contains 361618 sequences. (Running on oeis4.)