login
A190131
Inverse permutation to A190130.
2
1, 4682, 7076, 7661, 8246, 8831, 9416, 2, 587, 1172, 1757, 2342, 2927, 3512, 4097, 4683, 5268, 5853, 6438, 6784, 6857, 6930, 7003, 7077, 7150, 7223, 7296, 7369, 7442, 7515, 7588, 7662, 7735, 7808, 7881, 7954, 8027, 8100, 8173, 8247, 8320, 8393, 8466, 8539
OFFSET
1,2
COMMENTS
a(A190128(n)) = A190128(a(n)) = n.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000 (full sequence)
PROG
(Haskell)
import Data.List (elemIndex)
import Data.Maybe (fromJust)
a190131 n = a190131_list !! (n-1)
a190131_list =
map (succ . fromJust . (`elemIndex` a190130_list)) [1..10000]
CROSSREFS
Sequence in context: A230483 A022244 A252382 * A226801 A320620 A218096
KEYWORD
nonn,base,fini,full
AUTHOR
Reinhard Zumkeller, May 06 2011
STATUS
approved