Форум программистов, компьютерный форум CyberForum.ru

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
DenProx
Техник
310 / 168 / 5
Регистрация: 09.10.2009
Сообщений: 3,048
#1

Рунге-Кутта из 4 порядка в 3-й - C++

20.06.2013, 14:55. Просмотров 347. Ответов 0
Метки нет (Все метки)

Доброго времени суток. У меня есть такой кусок кода, для численного метода Рунге-Кутта 4 порядка:

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
///////////////////////////////////////////////////////////////////////
    //                  - Метод Рунге-Кутта 4 порядка -                  //
    ///////////////////////////////////////////////////////////////////////
    for (j = 0; j < n; j++) y0[j] = y[j];   // Копируем его в y0
    f (y0, q0, xi);         // Заполняем q0, основываясь на значениях из y0
    for (j = 0; j < n; j++) q0[j] *= h; // Делаем q0
    xi += h;                // Следующий шаг
    // ... а остальные 3 добываем с помощью метода Рунге-Кутта 4 порядка.
    for (i = 0; i < 3; i++)     // i - КАКОЕ ЗНАЧЕНИЕ УЖЕ ЕСТЬ
    {                   // А ВЫЧИСЛЯЕМ ЗНАЧЕНИЯ Y[i+1]!!!!
        // Сначала нужны коэффициенты k1
        // Элемент y[i, j] = y0 + (i * n) + j = y0[i * n + j]
        f (&y0[i * n], k1, xi); // Вычислим f(xi, yi) = k1 / h
        // И для каждого дифференциального уравнения системы проделываем
        // операции вычисления k1, а также подготовки в ya аргумента для
        // вычисления k2
        for (j = 0; j < n; j++)
        {
            k1[j] *= h;                 // Вычислим наконец-то k1
            ya[j] = y0[i*n+j] + k1[j] / 2.;
            // И один из аргументов для функции 
        }                           // вычисления k2
        f (ya, k2, xi + (h / 2.));          // Вычислим f(xi,yi) = k2 / h
        for (j = 0; j < n; j++)
        {                           // Вычислим наконец-то k2
            k2[j] *= h;
            ya[j] = y0[i*n+j] + k2[j] / 2.; // И один из аргументов для функции 
        }                           // вычисления k3
        f (ya, k3, xi + h / 2.);            // Вычислим f(xi,yi) = k3 / h
        for (j = 0; j < n; j++)
        {
            k3[j] *= h;                 // Вычислим наконец-то k3
            ya[j] = y0[i*n+j] + k3[j];  // И один из аргументов для функции 
        }                       // вычисления k4
        f (ya, k4, xi + h);         // Вычислим f(xi,yi) = k4 / h
        for (j = 0; j < n; j++) k4[j] *= h; // Вычислим наконец-то k4
        // Надо вычислить приращение каждой функции из n
        for (j = 0; j < n; j++)         // Вычисляем следующее значение
                                // функции
                                // Y[i+1] = Yi + ...
    y0[(i+1)*n+j] = y0[i*n+j] + (k1[j] + 2. * k2[j] + 2 * k3[j] + k4[j]) / 6.;
                                // И новое значение q[i+1]
        f (&y0[(i+1)*n], &q0[(i+1)*n], xi); // qi = f (xi, yi);
        for (j = 0; j < n; j++) q0[((i+1)*n)+j] *= h;
        xi += h;                    // Следующий шаг    }
Помогите пожалуйста переделать его на 3-й порядок. В численных методах я не силен, разбираться времени нет ... сроки поджимают. Думаю тут разница в 2 строки примерно должна быть, одну убрать, другую немного подредактировать.

Заранее спасибо.

Добавлено через 19 часов 4 минуты
Тема закрыта. Изменения не потребовались 3-го порядка требовалось уравнение, а метод можно и 4-го )
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.06.2013, 14:55     Рунге-Кутта из 4 порядка в 3-й
Посмотрите здесь:

Численно решить ОДУ методом Рунге-Кутта 4 порядка - C++
Доброго времени суток. Мне нужно численно решить ОДУ методом Рунге-Кутта 4 порядка. Уравнение имеет вид: p'=-A-B*p, p(0)=p0. Проблема...

Алгоритм Рунге-Кутта для производной второго порядка - C++
Здравствуйте. Нужно составить график зависимости x от t для данного уравнения, для сказали нужно посчитать это уравнение методом...

Рунге-Кутта 4го порядка из книги (The Art of Scientific Computing) - C++
Доброго всем дня! Нашел в сети книгу с исходниками, если кому нужно могу скинуть. Press W.H., Teukolsky S.A., Vetterling W.T., Flannery...

Рунге-Кутта в С++ (ошибки) - C++
Доброй ночи. Решаю ОДУ методом Рунге-Кутта , и такая непонятка выходит, что аналитическое (в excel) и численное (результат проги)...

Алгоритм Рунге-Кутта - C++
Добрый день. Столкнулся с проблемой. Необходимо решить уравнение методом Рунге-Кутта четвертого порядка с точностью 0.0001 (для достижения...

Цикл for. Метод Рунге-Кутта - C++
Программа считает, но неправильно из за цикла for. Он считает только начальное значение, а нужно чтобы считал предыдущее посчитанное. И еще...

Решение методом Рунге - Кутта. Переполнение переменной - C++
Все формулы применил как из учебника. Методы Эйлера работают, а метод Рунге - Кутта не табулируется полностью и программа вылетает....

Решение системы диффуров методом Рунге-Кутта - C++
#include &lt;stdio.h&gt; #include &lt;stdafx.h&gt; #include &lt;math.h&gt; #include &lt;iostream&gt; using namespace std; double f(int i,double...

Решение задачи Коши методом Рунге-Кутта - C++
Решение задачи Коши методом Рунге-Кутта и сравнить результат с MATLAB не могу найти ошибку, работает практически исправно, только где...

Метод Рунге-Кутта. Не сходятся аналитическое и численное значения - C++
Получается большая погрешность между численным и аналитическим значением. В чем может быть ошибка. #include &lt;cstdlib&gt; #include...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru