ПР2_Заболотников_9373

COND_SEL_AVR = 0; for i = 1 : n

COND_SEL_AVR = COND_SEL_AVR + COND_VERS(2, i) * GAPS_ROW(3,

i); end;

COND_SEL_AVR = COND_SEL_AVR / N;

SEL_AVR_1 = h * COND_SEL_AVR + MID_VERSION;

%Поиск выборочной дисперсии

SEL_DISP = 0; for i = 1 : n

SEL_DISP = SEL_DISP + ((GAP_MIDS_ROW(1, i) - SEL_AVR) ^ 2) * GAPS_ROW(3, i);

end;

SEL_DISP = SEL_DISP / N; COND_SEL_DISP = 0;

for i = 1 : n

COND_SEL_DISP = COND_SEL_DISP + COND_VERS(2, i) ^ 2 * GAPS_ROW(3, i);

end;

COND_SEL_DISP = COND_SEL_DISP / N;

SEL_DISP_1 = h ^ 2 * (COND_SEL_DISP - COND_SEL_AVR ^ 2); summa = 0;

for i = 1 : n

summa = summa + (COND_VERS(2, i) - 0) ^ 2 * GAPS_ROW(3, i);

end;

summa = summa / N; SEL_DISP_2 = h ^ 2 * summa; %% 5 пункт

COR_SEL_DISP = n * SEL_DISP / (n - 1); COR_SKO = sqrt(COR_SEL_DISP);

SKO = sqrt(SEL_DISP);

%% 6 пункт

COEF_ASSIM = EMP_MOMENTS(2, 3) / (SKO ^ 3); COEF_EXC = EMP_MOMENTS(2, 4) / (SKO ^ 4) - 3;

%% 7 пункт

%поиск моды

MODA = GAPS_ROW(1, i) + h * (SUB_1 / (SUB_1 + SUB_2)); % поиск медианы

i = 1;

while ACCUM_FREQS(i) < 0.5 i = i + 1;

end;

11

MEDIANA = GAPS_ROW(1, i) + h * (0.5 - ACCUM_FREQS(i - 1)) / GAPS_ROW(4, i);

%% 8 пункт

V = SKO * 100 / SEL_AVR;

12