как поставить функцию с несколькими предложениями в вихре?

Вы можете использовать aes_string:

f <- function( column ) {
    ...
    ggplot( rates.by.groups, aes_string(x="name", y="rate", colour= column,
                                        group=column ) )
}

, пока вы передаете столбец функции как строку (f("majr"), а не f(majr)). Также обратите внимание, что мы изменили другие столбцы "name" и "rate", чтобы быть строками.

Если по какой-либо причине вы предпочитаете не использовать aes_string, вы можете изменить ее на (несколько более громоздкий):

    ggplot( rates.by.groups, aes(x=name, y=rate, colour= get(column),
                                        group=get(column) ) )