A255136 Records in A255134.

12, 28, 36, 44, 52, 68, 76, 84, 92, 100, 116, 124, 132, 140, 148, 156, 172, 180, 188, 196, 204, 212, 228, 244, 252, 260, 268, 276, 284, 292, 300, 316, 324, 332, 340, 348, 356, 364, 372, 380, 396, 404, 412, 420, 428, 436, 444, 452, 460, 476, 484, 492, 500

Offset

1,1

Comments

a(n) = A255134(A255137(n)) and A255134(m) < a(n) for m < A255137(n).

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Prog

(Haskell)
a255136 n = a255136_list !! (n-1)
(a255136_list, a255137_list) = unzip $ f [1..] a255134_list (-1) where
   f (x:xs) (y:ys) r = if y > r then (y, x) : f xs ys y else f xs ys r

Crossrefs

Cf. A255137, A255134, A097764.

Sequence in context: A196208 A196475 A253534 * A087252 A141274 A224613

Adjacent sequences: A255133 A255134 A255135 * A255137 A255138 A255139

Keyword

nonn

Author

Reinhard Zumkeller, Feb 15 2015

Status

approved