Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
(и я) перепроверил 30.10.03 15:18 Число просмотров: 3436
Автор: dl <Dmitry Leonov> Отредактировано 30.10.03 15:21 Количество правок: 1
|
> > Если не учитывать знаки препинания и брать только 26 > > алфивитных символов, то > > S=2038, N=228, результат 0.0393770770538681 > > На 29 символах: > > S=3000, N=268, результат 0.0419252054335066 > > Хоть убей, не получается твой результат. Нашел у себя > ошибочку, лишний символ в алфавит добавлялся, но все равно > не сходится.
Кажется, скобки потерялись (в формуле суммирования я напорол, каюсь):
foreach (keys %count) {
$num += $count{$_};
$sum += $count{$_}*$count{$_} - 1;
$sum += $count{$_}*($count{$_} - 1);
}
print "Q = ${\($sum/($num*$num-1))} (A=${\(scalar keys
%count)} S=$sum N=$num)\n";
print "Q = ${\($sum/($num*($num-1)))} (A=${\(scalar keys
%count)} S=$sum N=$num)\n";
> Q = 0.0450969745067736 (A=29 S=3239 N=268) > > > Кстати, имеет смысл расписать таблицу частот на 4 и 6 > > алфавита, но без учета знаков препинания и пробелов. > > На 4 алфавита я приводил в первом посте, данные касательно > пробелов в нем можно просто проигнорировать. А вот если > имелось в виду выкидывать пробелы/знаки пунктуации ДО > разбиения на 4/6 алфавитов? Можно попробовать..
Угу, именно так.
|
|
|