Математические пакеты

[yudjin]

Доброе утро, интересует такой вопрос: есть ли модули математические, интерпритирующие функции MathCAD'a, например, qNorm, StDev, hist, проч? Или может, у кого-то есть свои наработки?
Выкладываю пока что есть, мож кто подкинет еще

function TMainFrm.Mean (A:Arr):real;
{ Возвращает среднее значение элементов массива  }
var
 i:integer;
 s:real;
begin
  s:=0;
  for i:=0 to (length(A)) do
    s:=s+A[i];
  Mean:=(1/(length(A)))*s;
end;

function TMainFrm.aVar (A:Arr):real;
{var(A) Возвращает дисперсию элементов массива}
var
 i:integer;
 c:real;
begin
 for i:=0 to (length(A)) do
   c:=sqr(abs(A[i]-mean(A)) );

 aVar:=(1/(length(A)))*c;
end;

function TMainFrm.StDev (A:Arr):real;
{Возвращает среднеквадратичное отклонение (квадратный корень из дисперсии) элементов}
begin
  StDev:=sqrt(aVar(A));
end;

function TMainFrm.qnorm:real;
{qnorm(p,μ,σ) Обращает нормальное распределение со средним μ и среднеквадратичным отклонением σ. 0<p<1 и σ>0}
var
 r,q:real;
begin
 Randomize;
 q:=random;
 r:=sqrt(abs(0.5*pi*ln(1-sqr(1-2*q))));
 if q<0.5 then r:=-r;

 qnorm:=r;
end;

Как видно, коды-то оч просты, единственное что надо для их написания - знать, где лежит книга по статике

Собственно, оч интересует функция hist

hist(int,А) Возвращает вектор, представляющий частоты, с которыми величины, содержащиеся в векторе А, попадают в интервалы, представляемые вектором int. Элементы в А и int и должны быть вещественными. Кроме того, элементы int должны быть расположены в порядке возрастания. Возвращаемый результат – вектор, содержащий на один элемент меньше, чем int.
MathCAD интерпретирует int как набор точек, определяющих последовательность интервалов в гистограмме. Значения в int должны быть расположены в порядке возрастания. Результатом этой функции является вектор f, в котором fi есть число значений в А, удовлетворяющих условию:

MathCAD игнорирует данные, меньшие, чем первое значение в int, или большие, чем последнее значение в int.

dnorm

dnorm(x,μ,σ) Возвращает плотность вероятности нормального распределения