A227388 - OEIS

A227388

Smallest m such that A226390(m) = n.

1, 2, 4, 10, 14, 24, 30, 36, 42, 48, 54, 72, 80, 88, 96, 120, 130, 140, 150, 160, 170, 180, 190, 200, 210, 246, 258, 270, 282, 294, 306, 350, 364, 378, 392, 406, 420, 472, 488, 504, 520, 536, 552, 612, 630, 648, 666, 684, 702, 770, 790, 810, 830, 850, 870

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

A226390(a(n)) = n and A226390(m) < n for m < a(n).

LINKS

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

PROG

(Haskell)

import Data.List (elemIndex); import Data.Maybe (fromJust)

a227388 = (+ 1) . fromJust . (`elemIndex` a226390_list)

CROSSREFS