[go: up one dir, main page]

login
A200087 revision #4

A200087
Smallest number m such that A079878(m) = n.
2
1, 2, 53, 5, 71, 26, 9, 8, 19, 72, 149, 27, 91, 18, 21, 17, 43, 20, 29, 50, 35, 150, 45, 28, 99, 92, 773, 34, 171, 42, 33, 32, 123, 44, 49, 41, 75227, 58, 137, 51, 295, 48, 789, 68, 47, 46, 65, 57, 891, 100, 269, 90, 111, 428, 921, 64, 131, 172, 105, 203
OFFSET
1,2
COMMENTS
A079878(a(n)) = n and A079878(m) <> n for m < a(n).
LINKS
PROG
(Haskell)
import Data.List (elemIndex)
import Data.Maybe (fromJust)
a200087 n = (fromJust $ elemIndex n a079878_list) + 1
CROSSREFS
Sequence in context: A249656 A248987 A179616 * A346215 A139841 A167771
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Nov 13 2011
STATUS
proposed