The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A227632

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

Record values in A227617.
(history; published version)

#4 by Reinhard Zumkeller at Fri Jul 19 14:18:20 EDT 2013

STATUS

editing

approved

#3 by Reinhard Zumkeller at Fri Jul 19 12:03:02 EDT 2013

NAME

allocated for Reinhard ZumkellerRecord values in A227617.

DATA

1, 2, 5, 19, 34, 61, 114, 175, 1094, 1695, 3390, 9372, 15605, 116478, 220288, 455587, 552188

OFFSET

1,2

COMMENTS

a(n) = A227617(A227633(n));

A227633(n) = A100707(a(n)).

PROG

(Haskell)

a227632 n = a227632_list !! (n-1)

(a227632_list, a227633_list) = unzip $ (1, 1) : f 1 1 a227617_list where

f i v (q:qs) | q > v = (q, i) : f (i + 1) q qs

| otherwise = f (i + 1) v qs

KEYWORD

allocated

nonn,more

AUTHOR

STATUS

approved

editing

#2 by Reinhard Zumkeller at Thu Jul 18 15:45:49 EDT 2013

KEYWORD

allocating

allocated

#1 by Reinhard Zumkeller at Thu Jul 18 15:45:49 EDT 2013

NAME

allocated for Reinhard Zumkeller

KEYWORD

allocating

STATUS

approved