График для индексов с особой легендой

На днях познакомился с графиком, который коллеги используют для разных индексов. К примеру, чтобы показать как изменились валютные курсы или уровни цен с выбранной даты. Под рукой нет настоящего примера так что могу только показать набросок:

Особенности следующие:
* каждый из рядов раскрашен в цвет по своему последнему значению относительно остальных рядов;
* легенда находится прямо на графике и начинается сразу после последнего наблюдения;
* названия рядов отмечены на правой оси.

Попробуем воспроизвести подобный график в Mathematica.  Здесь довольно легко добиться близкого вида, используя BarLegend, но, после несколько попыток поместить легенду в необходимой близости от графика, мне показалось сделать собственную легенду (см. пример в приложении).

Например, следующий график показывает динамику (лог-)выпуска на человека в долларах  нормированного на значение в 2000 г. для каждой из стран (данные МВФ):

Номинальный ВВП на душу в текущих долларах к уровню 2000 г., МВФ, собств. расчет.
График для индексов с особой легендой

mma 9

Первые впечатления от новой Mathematica положительные. Безусловно, нового и интересного много. Из того, что точно пригодится:
*  TemporalData –  удобно хранить несколько рядов без “приклеивания” дат к каждому;
* новый GraphLayout “StarEmbedding” – лучше старых шаблонов подходит для данных, с которыми приходится встречаться;
* временные ряды – еще не успел все посмотреть, но выглядит заманчиво.
 С другой стороны несколько удивительно, что программу так и не научили работать с кириллицей:
Но это проблема решаемая (и решенная).

mma 9