Форум программистов, компьютерный форум, киберфорум
simonovada
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  

Метод сопряженных градиентов

Запись от simonovada размещена 07.12.2019 в 19:10
Показов 1389 Комментарии 1

clear all;
f = @(x,y)(x^2+2.*y^2+(exp(x)).*(exp(y)));%и сходная функция
gradx=@(x,y)2*x+(exp(x)).*(exp(y));
grady=@(x,y)4*y+(exp(x)).*(exp(y));
x0=1;
y0=1;
e=0.05;
p=1;
alfa=1;
a=-5;
b=5;
D=e/2;
p=1;
beta=1;
while sqrt(gradx(x0,y0)*gradx(x0,y0)+grady(x0, y0)*grady(x0,y0))<100
if rem(p,2)==1
dx=-gradx(x0,y0);
dy=-grady(x0,y0);
g=@(alfa)f(x0+(alfa*dx),y0+alfa*dy);
min_alfa=dihot(a,b,e,D,g);
alfa=min_alfa;
x0=x0+(alfa*dx);%- тк d=-diff(x,y)
y0=y0+(alfa*dy);
dx=-gradx(x0,y0);
dy=-grady(x0,y0);
p=p+1;
if sqrt((gradx(x0,y0))^2+(grady(x0,y0))^2)< =e
break
end
else
g=@(alfa)f(x0+(alfa*dx),y0+(alfa*dy));
min_alfa=dihot(a,b,e,D,g);
alfa=min_alfa;
x1=x0-(alfa*dx);%- тк d=-diff(x,y)
y1=y0-(alfa*dy);
beta=(dx^2 + dy^2)/(dx^2 + dy^2);
dx1=-gradx(x1,y1)+beta*dx;
dy1=-grady(x1,y1)+beta*dy;
x0=x1;
yo=y1;
dx=dx1;
dy=dy1;
p=p+1;
end
end
minxy =[x0,y0];
minf=f(x0,y0);
disp(['X Y: ' num2str(minxy,5)])
disp(['min(X,Y): ' num2str(minf,5)])
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Всего комментариев 1
Комментарии
  1. Старый комментарий
    Аватар для bedvit
    Конкурент Баженова?
    Запись от bedvit размещена 08.12.2019 в 12:43 bedvit вне форума
 
Новые блоги и статьи
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru