Доставка цветов в Севастополе: SevCvety.ru
Главная -> Справочник по алгоритмам

0 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] 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78

Случайные числа с нормальным распределением могут быть получены с помощью формул

/?/=л/21п (I/V,) cos (2яК ), /?r=V2ln sin (2яК 1).

При этом получается сопряжеин1Я пара чисел, имеющих среднее значение = 0 и среднеквадратичное отклонение о = 1. При других значениях R и о производится пересчет по формуле

Обобщенный алгоритм реализации метода Монте-Карло (рис. 5.3) обеспечивает моделирование работы объекта и вычисление основных статистических характеристик его функциональных параметров.

Наглядным примером применения метода Монте-Карло является программа 5.13 для обучения щкольников млэдщих классов таблице умножения. Программа генерирует два случайных числа, переводит их в отрезок [1;9] и предлагает учащемуся перемножить эти числа. Результат сравнивается с правильным. Оценка выставляется по результатам анализа десяти операций перемножения. Читателю предлагается самостоятельно разобрать эту программу.

Программа 5.15.

формирование слути.нь1х шсел-параметров с равномерным распределением

Лреодразодание законов распределения

Вы1/исление реакции. оБъента на случайные бозВейстВая-параметры

Статистическая оЬраБотка результатов

Рис. 5.3. Обобщенный алгоритм примеиеиня метода Моите-Карло

Корреляционный момент двух последовательностей

/?л.»=-д ({/. -"11») (А-.-m,,).

85 PRINT-ОБУЧЕНИЕ TftEfiHUE УМНОЖЕНИЯ

18 LETX=.7654321:LETN=8

20 FOR 1=1 TO 18

38 LET ft=RNIi<X>:LET B=RND<X)

40 LET ft=INT«:ft!«9+l>:LET E=INT<B*9+1)

58 PRINT!2.8!CK0flbK0 БУДЕТйжВ=?--s INPUT"C

68 LET D=ft*B! IF C=Ii THEN 88

70 PRINTHEBEPHO-ft!«B=Ii:LET N=N+l!&0T0 85

88 PRINTПРАВИЛЬНО

85 NE-XT I

98 IF N=0 THEN 148 .

188 IF N<=1 THEN 158 118 IF N<=3 THEN 160

128 PRINTВЫ HE ЗНАЕТЕ ТАБЛИЦУ УИНОМЕНИЯ

130 PR INTПОУПРАЖНЯЙТЕСЬ EHlEsGOTO 18

148 PRINTOTflHHHO.BCE РЕШЕНО ВЕРНОs&OTO 18

158 PRINTХОРОШО.ОДНА ОШИБКА:GOTO 18

168 PRINTПОСРЕДСТВЕННО.ДОПУЩЕНЫ N ОШИБКИ:GOTO 18

178 ENII

Отметим основные области применения метода Моите-Карло: решение нелинейных уравнений, вычисление экстремумов (в том числе глобальных у многоэкстремальных функций многих переменных), вычисление определенных интегралов большой кратности и др.

§ 5.5. Корреляционный анализ

Корреляция является признаком, указывающим на взаимосвязь ряда численных последовательностей. П.арная корреляция характеризует взаимосвязь двух последовательностей Xi и I .

Коэффициент парной корреляции R =

W . N N

I т-( I Xi I уЛ/N ,=1 \/= ,=1 /

(5.23)

характеризует степень отклонения связи между Xi и у, от линейной. Если \R\ близок к 1, то эта связь линейна, т. е. yi=axi+b.



причем знак R определяет знак коэффициента а. Если R> О, то а> О, и напротив, при /?<0 а<0.

Программа 5.16.

описывающей связь между некоторым числом N пар значений Xi и yi, обеспечивая , при этом наименьшую среднеквадратичную погрешность. Графически эту задачу можно

65 РР1НТВЫЧИСЯЕНИЕ КОЭФФИЦИЕНТА ПАРНОЙ КОРРЕЛЯЦИИ

10 IWUTВВЕДИТЕ Н=Н

20 LETA=0!LETB=0!LETC=0!LETri=0!LETE=0

30 РРШТВВЕДИТЕ ПОПАРНО X<I),V<I)

40 FOR 1=1 TO H!PRINT!3.0!I=I

45 INPUTX<I>=X!INPUTV<I>=V

50 LETA=A*X5LETB=B+V!LETC=C+X

60 LETIi=Ii+V2!LETE=E+X*V:HEXT I

70 LETR= <E-АжВ/Н > /SQR < < C- СA"2 ) /"N >ж < B- <B"2 > /N > )

80 РК1НТ!Р1.9!К0ЭФ.КОРРЕЛЯЦИИ R=R

Пример. Для N=5 и yi(xi}, равных 2(0,95); 4,05(2,1); 5,8(3); 8.1(4,1) и 9,2(4,9), получим /?=0.9987280191.

Порядковая корреляция по Спирмену оценивается коэффициентом порядковой корреляции [18]

представить следующим образом - в облаке точек Xiyi плоскости ху (рис. 5.4) требуется провести прямую так, чтобы величина всех отклонений отвечала условию

где у {xi) - зависимость (5.24). Для этого

где Ak и Bk - место (ранг), которое занимают Xk и yk при убывании Xk. Программа 5.17.

18 PRINTВЫЧИСЛЕНИЕ КОЭФФИЦИЕНТА РАНГОВОЙ КОРРЕЛЯЦИИ

28 ШРиТВВЕДИТЕ N=N:LETS=0

30 FOR 1=1 ТО NSPRINT!4.0!ДЛЯ 1=I

48 ШРИТВВЕДИТЕ Aj-B А,В

58 LETS=S+<A-B)"2!NEXT I

68 LETR=1-6*S/N/<N"2-1>

78 PRINTIFI.S!КОЭФФИЦИЕНТ R KOP=R!ENIi

Пример. Для N=7 и А (В), равных 5(6), 4(7), 3(3), 7(5), 2(1), 1(2), 6(4), получим /?„ = 0,6428571429.

Вычисление коэффициента корреляции на специализированных ПЭВМ выполняется микропрограммно. Так, на ПЭВМ FX-702P для этого выполняются следующие операции.

1. Нажатием клавиш Fi и SAC обнуляются ячейки памяти статистических расчетов.

2. По схеме

вводятся пары чисел xi и {/,-. Ошибочно введенная и обработанная пара исключается нажатием клавиш Fi и DEL/STAT.

3. Вводом команды COR вычисляется R.

§ 5.6. Регрессионный анализ (приближение функций по методу

наименьших квадратов)

Линейный парный регрессионный анализ заключается в определении параметров эмпирической линейной зависимости

нужно приравнять нулю частные производные

dU дЬ,

J у-

-=2 [г/.-(6о+6а-,)].

= [«/.- (йо-f *!>:,) Xi],

i = l

что дает для определения неизвестных коэффициентов Ьй и fci систему линейных


у (х) ==b,x+bo.

(5.24)

Рис. 5.4. К линейной регрессии



\ = l 1 = 1

Программа 5.18.

05 PRINTЯИНЕйНйЯ РЕГРЕССИЯ

10 INPUT ВВЕДИТЕ N=N

20 LETft=0!LETB=0sLETC=0:LETIi=0

38 PRINT!3,0!ВВЕДИТЕ Х<П»7<1>

48 FOR 1=1 TO H:PRINT 1=I

58 INPUT X<n=Xs IHPUT V4n=V

60 LETft=ft+X!LETB=B+Vs LETC=C+X"2

70 letri=il+X*V!next I

80 LETBl=<fti«B-N*D><ft--2-N!«C)

90 LETB8=«:B-Bli«ftVN

188 PRINT!F1.9!V=B8+B1!«X

lie INPUTbbeahte X=X

128 РК1НТ7<Х>=В8+В1жХ!Б0Т0 118!ehb

Пример. Пусть имеется совокупность из /V = 5 пар y,{Xi): 5,5(2); 6,3(4); 7,2(6); 8(8); 8,6(10). Введя эти данные, получим 6о=4,75 и 61=0,395. Следовательно, зависимость у (х) имеет вид

Программа предусматривает вычисление у по заданному значению х.

При необходимости программа может быть легко дополнена вычислением коэффициента парной корреляции R (5.23) или среднеквадратичной погрешности

6о Xiy,

у (а-) = 4,75-f0,395а:.

что позволит количественно оценивать степень приближения точек ад к прямой (5.24).

Линейная регрессия с помощью специализированных ПЭВМ выполняется микропрограммно. Так, у ПЭВМ FX-702P предусмотрены операторы LRA и LRB для вычисления параметров А==Ьо и B = bi линейной регрессии у (х)=А-\-Вх, а также операторы EOY для вычисления у по заданному X и ЕОХ для вычисления х по заданному у. Одновременно при этом вычисляется коэффициент корреляции R и другие статистические параметры массивов а, и у,-, описанные ранее (всего 17 параметров).

Последовательность вычислений рассмотрим иа примере к программе 5.18 (см. ниже).

Как показывает данный пример, ПЭВМ FX-702P, специализированные иа научно-технические и статистические расчеты, обеспечивают микропрограммное (т. е. без ввода внешних программ) вычисление важнейших характеристик двумерных массивов xiyi, а также проведение корреляционного и линейного регрессионного анализа. Указанные выше операторы могут использоваться и в составе внешних программ, что резко упрощает последние.

Нелинейная парная регрессия сводится к получению заданной нелинейной зависимости у (а) (нелинейной по независимой переменной а, но линейной по параметрам этой зависимости!), приближающей совокупность

Обнуление регистров памяти

Ввод 1 пары Xi, yi

STAT

Ввод 2 пары Xi, yi

STAT

Ввод 3 пары а;, yi

STAT

Ввод 4 пары а,, yi

STAT

Ввод 5 пары Xi, yi

STAT

Вычисление А

4.75

Вычисление В

0.395

Вычисление о.

3.16227766

Вычисление оо*

SDXN

2.828427125

Вычисление Оу

1.251798706

Вычисление ooj,

SDYN

1.1196428

Вычисление R

0.9978438785

Вычисление N

ASTAT CNT = 5

Вычисление суммы а,-Вычисление суммы у. Вычисление суммы xf Вычисление суммы yf Вычисление суммы x,i/,-Вычисление а Вычисление у Вычисление у при х=5 Вычисление х при i/=6,725

MY EOY 5 ЕОХ 6.725

SX=30 SY=35.6 SX2=220 SY2 = 259.74 SXY = 229.4 EXE 6

EXE 7.12

EXE 6.725

EXE 5

boN + bi X X №.

N N N

60 Xi+b, Y. xi==T "•У-1=1 /=1 1=1

Решение этой системы:

N N N

Z I №-Л I A-ii/i 6,=



0 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] 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78



0.0355
Яндекс.Метрика