[Delphi]Восстановление ПРВ( помощь в исправлении и создании модификации)

[CityZen73]

Добрый день уважаемые.Требуется помощь в нахождении ошибки и создании модификации.На данный момент имеется программа по восстановлению ПРВ,написанная на Delphi.Грубо говоря суть в том,что у меня имеется изначально некоторые условия,имеется 3 закона распределения случайной величины ( по старинке ДСЧ-Датчик случайных чисел,по 3 законам,это нормальный,лог-нормальный и релей),на основании них строится график.Так же имеется второй график,который строится на основании значений по первому,но он строится по системе значение из первого+формула(аппроксимирующие функции,и их там 4 штуки).И так же есть третий график,который представляет из себя разницу между первым и вторым.В целом получается,что есть теоритический(тот что по законам), оценочный( тот что по данным первого+формула аппроксимирующей функции) и их разница( то есть вероятность ошибки) и суть в том,что теоритический и оценочный должны быть предельно близки друг другу,а третий,который разница,должен демонстрировать минимальную ошибку. И все вроде бы по теории,по заданию,и вроде как все должно быть нормально,теоритический строится замечательно,А вот оценочный не правильно,отсюда и третий,который разница показывает чудовищную ошибку. (прикрепил скрины,один как должно быть и один,как есть сейчас).Хотелось бы попросить помощи в отлове ошибки и помощи в создании модификации на основе этой программы,которая будет строить еще 3 графика на основании мод имеющихся графиков.

[Fintest1]

Здравствуйте.
На датчик смотрите, он изначально белый шум должен давать, потом уже подрезается по закону распределения.
Прогоните отдельно датчик.

[CityZen73]

Сообщение от Fintest1

Здравствуйте.
На датчик смотрите, он изначально белый шум должен давать, потом уже подрезается по закону распределения.
Прогоните отдельно датчик.

Да с датчиком все вроде бы нормально,он добротно строит теоретический график(зеленый),проблема в графике оценочном(синем,который теоретический+апроксимирующая функция),по теории должно получаться что они должны быть предельно близки друг к другу,а у меня не выходит добиться такого сходства, даже если дисперсию менять,даже если параметры альфа и С регулировать,Они либо на одной высоте, но немного сдвинуты, либо не сдвинуты, но на разной высоте

[Fintest1]

Чем же это надо апроксимировать нормальное распределение, что даже матожидание смещается?

[CityZen73]

Сообщение от Fintest1

Чем же это надо апроксимировать нормальное распределение, что даже матожидание смещается?

С помощью вот этих функций

[Fintest1]

Бред какой-то.
Новое слово в науке, так сказать.
Трансцендентные выражения вообще неприемлемы в численных методах, поскольку в любой момент могут дать существенную потерю точности.
Попробуйте погонять с Real=Extended, если это поможет.