Цитата:
Сообщение от Вляпалась...
Вот так уважаемые люди дурят провинциальных дурочек
|
Дык, я второй раз накалываюсь, доверяя русским публикациям. Думаете, это я сам придумал? Вот так и учусь на ошибках. Тест Шапиро-Уилка, например, даже в учебниках описан с ошибками. Заказывал через доброго человека (не указывая пальцем на
watteau) оригинал статьи, чтобы разобраться.
Надеюсь, что сюда математик нормальный забредет, подскажет идею какую-нибудь.
Добавлено через 8 часов 12 минут
Мысль для
Дмитрий В. и не только.
Пусть у Вас имеются данные по 5 языкам. Чтобы на одном графике показать все распределения, лучше всего использовать диаграмму "Ящик с усами".Привожу пример. Данные выдуманы (заполняются в начале скрипта). У Дмитрия наверняка они есть.
Код:
#Инициируем данные, чтобы были, заполнив по 1000 чисел из распределения Пуассона и нормального распределения.
lgRU<-rpois(1000,5)
lgGB<-rpois(1000,5.1)
lgNL<-rpois(1000,7)
lgFR<-rnorm(1000,2,1)
lgDE<-rnorm(1000,3,1)
##### Всё счастье тут. Вот он, график!
boxplot(list("Рус"=lgRU,"Анг"=lgGB,"Чук"=lgNL,"Нен"=lgDE,"Франц"=lgFR),main="Сравнение распределения\n длины слов в языках",xlab="Язык",ylab="Длина слова",col = "lavender", notch = TRUE, varwidth = TRUE)
Результат:
Добавлено через 58 минут
А вот пример
Бутстреппинга
Код:
> bw<-bootdist(XY,niter=1001)
> plot(bw)
> summary(bw)
Parametric bootstrap medians and 95% percentile CI
Median 2.5% 97.5%
7.199874 7.175821 7.223915
