Я хотел бы создать вектор функций, используя функцию двух агрегатов 'func', например, такую:

func = function(number, coefficient) {  
     return(coefficient*number)  
}

вот как я создаю вектор функций:

vector_of_functions = NULL  
for (i in 1:4) {  
     vector_of_functions = c(vector_of_functions, 
                             function(number) func(number=number, coefficient=i))  
}

Моя проблема в том, что все функции, которые составляют мой вектор, одинаковы, даже если они были созданы с использованием разныхi через петлю. Это показывает, что они оцениваются с использованием последнего значенияi (которая является глобальной переменной здесь).

У кого-нибудь есть идея?