|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.02.2013, 18:33 | #1 |
Пользователь
Регистрация: 19.02.2013
Сообщений: 16
|
Нормальный (Гауссовский) закон распределения
Здравствуйте! Построил нормальный (гауссовский) закон распределения. Все отображается. Однако при изменении среднего арифметического и оценки с.к.о. распределение почему-то стоит на месте? Т.Е не изменяет своё положение относительно среднего арифметического. Спасибо.
float Mean,StdDev,x,h; Series1->Active=false; //избежать мелькания изображения Series1->Clear(); //Для замены предыдущих данных Mean=StrToFloat(Edit1->Text); //среднее значение StdDev=StrToFloat(Edit2->Text); // ско h= fabs(Mean-3*StdDev)/100; //Расчет шага const Pi=3.14159; x=Mean-3*StdDev; //Начать с левой границы while (x<=Mean+3*StdDev) //Дойти до правой границы { Series1->AddXY(x,(1/StdDev*sqrt(2*Pi)*exp(-((x-Mean)*(x+Mean))/2* StdDev*StdDev)), "", clRed); //Точка первого графика x+=h;} //Перейти к следующей точке Series1->Active=true; //Отобразить графики |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
закон распределения Эрланга. | Lenr88 | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 13.02.2012 12:56 |
Фед. закон от 29-го. | Alex Cones | Свободное общение | 8 | 09.01.2011 03:15 |
Закон и программы | cowboy | Свободное общение | 21 | 18.06.2010 09:01 |
закон отражения | DRAgon™ | Свободное общение | 4 | 28.05.2010 12:07 |
второй закон Кеплера | Olenka555 | Помощь студентам | 0 | 06.12.2009 16:13 |