Чтобы вычислить оптимальную тэту, например в логистической регрессии мне нужно создать функцию costFunction (функцию, которая должна быть минимизирована), которая затем передается в fminunc для получения оптимальной теты. Кроме того, если градиент costFunction может быть вычислен, я устанавливаю Параметр GradObj должен быть включен с помощью
options = optimset('GradObj','on');
и закодировать функцию costFunction так, чтобы она возвращала в качестве второго выходного аргумента значение градиента g для X. Затем я даю
[theta, cost] = fminunc(@(t)(costFunction(t, X, y)), initial_theta, options);
, где X - данные матрица и y ответ. Как я могу реализовать это в R?