変換テーブル

1 を 11，2 を 13，3 を 15，4 を 50 に変換するには

> tbl = c(11, 13, 15, 50)
> (a = tbl[c(1, 2, 3, 1, 1, 2, 3, 4, 2)])
[1] 11 13 15 11 11 13 15 50 13