1 / 1 / 0
Регистрация: 01.04.2013
Сообщений: 73
1

аппроксимация подскажите господа!

13.04.2013, 21:27. Показов 1070. Ответов 0
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Делаю аппроксимацию функции по методу наименьших квадратов, но она строится неправильно! вот исходник для логарифмической аппроксимации, для линейной не отличается почти:
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
//---------------------------------------------------------------------------
 
#include <vcl.h>
#include <math.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{double x[12]={1,2,3,4,5,6,7,8,9,10,11,12};//значения х
double y[10]={6.14,6.14,6.09,6.14,6.09,6.09,6.12,6.09,6.14,6.12};//значения у
float a,b,p[10];
int n;
float c=0,z=0,u=0,e=0;
n=sizeof(y)/sizeof(float);
//линейная аппроксимация
for(int i=0;i<10;i++)
{c=log(x[i])+c;
z=log(y[i])+z;
u=log(x[i]*x[i])+u;
e=log(x[i]*y[i])+e;
}
//находим коэффициенты
a=(n*e-c*z)/(n*u-c*c);
b=exp((z-a*c)/n);
Label1->Caption=FloatToStr(a);
Label2->Caption=FloatToStr(b);
for(int i=0;i<10;i++)
{Series1->Add(y[i],x[i],clRed);}  //график функции
for(int i=0;i<12;i++){
p[i]=a*log(x[i])+log(b);
Series2->Add(p[i],x[i],clGreen);}//график аппроксимации
}
//---------------------------------------------------------------------------
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.04.2013, 21:27
Ответы с готовыми решениями:

Господа, подскажите исходники компилятора для С++ написанного на С++
Господа, подскажите исходники компилятора для С++ написанного на С++. Главное чтобы была...

подскажите, пожалуйста, господа гуру
www.fitnessmanager.ru Что можно сделать, чтобы поднять посещаемостЬ? /целевых клиентов? ...

Господа, подскажите firewall для 8ки
Господа, подскажите firewall для 8ки. COMODO ставиться, но после этого рабочий стол перестает...

Господа, подскажите как подключить М-плату
Сорян за нубанство. Не знаю куда подключать некоторые провода от корпуса, помогите разобраться....

0
13.04.2013, 21:27
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.04.2013, 21:27
Помогаю со студенческими работами здесь

Уважаемые господа, подскажите как побороть Рамблер
С Яндексом, вроде разобрался, с Рамблером... ни как ... Бьюсь два месяца, не могу попасть в...

Подскажите решение пожалуйста, интерполяция и аппроксимация
1.По 11 измерениям входного и выходного сигналов статической системы, осуществить интерполяцию...

Господа оптимизаторы
Я - заказчик. Взял на удаленку на очень неплохую ЗП оптимизатора из этого форума. Он в свое время...

Господа началось
На внутряках сильно подрос ПР ... надеюсь не только у меня

Господа вопрос
сателитов про художников , вставляя натяжные потолки , календари и так далее прям в текст . Все...

Господа специалисты?
Господа специалисты, подскажите. Яндекс не с того не с сего с 6 места переместил сайт на 21, из за...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru