 |
|
Модераторы: Akina |
 
|
|
МНК на VB 6.0, Аппроксимация полиномом 3 или 5 степени 
| учч |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 12 Регистрация: 6.10.2005 Репутация: нет Всего: нет |
Помогите начинающему. Нужен алгоритм и формулы для аппроксимации временного ряда полиномом с использованием МНК для VB 6.0.
Временной ряд - массив ~50-300 точек, дискрет по времени 5 мин. Сначала работал вручную с линиями тренда в Exel (полиномиальная степень 3 и 5), в принципе всё устраивало. Для набора статистики написал на VB 6.0 свою программу, нужен фрагмент с аппроксимацией. Такая реализация есть на другом языке на http://forum.igp.org.ua/?board=faq;action=...;num=1134767171 Растолкуйте, как сделать? Спасибо. |
|||
|
||||
Загрузка ...
| maxim1000 |
|
|||
 Эксперт  Профиль Группа: Участник Сообщений: 3334 Регистрация: 11.1.2003 Где: Киев Репутация: нет Всего: 110 |
перемещено из Алгоритмов
-------------------- qqq |
|||
|
||||
| Akina |
|
|||
|
Советчик Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
В чем проблема-то? аппроксимация на полином степени N по МНК - это обычный поиск минимума функции N+1 переменных. Выбирай любой способ.
Самый имхо простой - это покоординатный спуск. Самый быстрый из простых - симплексный. -------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
|||
|
||||
| учч |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 12 Регистрация: 6.10.2005 Репутация: нет Всего: нет |
Проблема даже не в программировании, а в конкретном алгоритме. Привести найденые общетеоретические выкладки к конкретной последовательности действий для программирования что-то не удаётся. Может быть есть пример для полинома степени выше 2-й ( или степени m в общем виде ), или текст на Бэйсике, очень надо!!! Спасибо. |
|||
|
||||
| Akina |
|
|||
|
Советчик Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
Давай свой текст - будем смотреть. -------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
|||
|
||||
| учч |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 12 Регистрация: 6.10.2005 Репутация: нет Всего: нет |
Текст программы в файле в приложении.
Там надо определить функции. Как сделать функцию, в принципе, понятно, но что имеется ввиду здесь? ' Function SVDSolve(ByRef A_() As Double, _ ' ByVal M As Long, _ ' ByVal N As Long, _ ' ByRef Sol() As Double) As Boolean не могу понять как работает. Это сообщение отредактировал(а) учч - 17.3.2006, 16:02 Присоединённый файл ( Кол-во скачиваний: 11 ) 
___.txt 6,94 Kb |
|||
|
||||
| Akina |
|
|||
|
Советчик Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
Вырежи все комментарии. Потом отправляйся в гости к Google и сделай поиск по словам "Convert Pascal code to BASIC" или просто "PAS2BAS".
-------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
|||
|
||||
| учч |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 12 Регистрация: 6.10.2005 Репутация: нет Всего: нет |
Спасибо!
Текст программы на VB 6.0 в файле в приложении. Нашёл на http://alglib.sources.ru/interpolation/polleastsq.php Там надо определить функции. Как сделать функцию, в принципе, понятно, но что имеется ввиду здесь? ' Function SVDSolve(ByRef A_() As Double, _ ' ByVal M As Long, _ ' ByVal N As Long, _ ' ByRef Sol() As Double) As Boolean не могу понять как работает. Присоединённый файл ( Кол-во скачиваний: 14 )
MNK.txt 2,50 Kb |
|||
|
||||
| Akina |
|
|||
|
Советчик Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
Посмотри вот это.
-------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
|||
|
||||
| учч |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 12 Регистрация: 6.10.2005 Репутация: нет Всего: нет |
Спасибо, пока разбираюсь.
|
|||
|
||||
|
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
[ Время генерации скрипта: 0.0506 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |