![]() |
Здравствуйте, гость ( Вход | Регистрация )
![]() |
![]()
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 12 Регистрация: 3.02.2018 Пользователь №: 30923 ![]() |
Подскажите, как мне сосчитать лямбду Уилкса, функцию групповых центройдов, и также канонические коэффициенты дискриминантной функции.
Возьмём простой Пример library(MASS) mydat=iris #split sample index <- sample(1:nrow(mydat),round(0.70*nrow(mydat))) train <- mydat[index,] test <- mydat[-index,] str(train) z <- lda(Species ~ .,data = train) как мне высчитать эти показатели, как в экселе в R?
Прикрепленные файлы
|
|
![]() |
![]() |
![]() |
![]()
Сообщение
#2
|
|
Группа: Пользователи Сообщений: 12 Регистрация: 3.02.2018 Пользователь №: 30923 ![]() |
100$, благодарствую)
но что - то в >z не вижу, где тест М-Бокса? Как мне его высчитать? Если он стат.значим, все не очень хорошо. Если я правильно поняла. Сообщение отредактировал alina.K - 13.04.2019 - 13:09 |
|
![]() |
![]() |
![]()
Сообщение
#3
|
|
Группа: Пользователи Сообщений: 902 Регистрация: 23.08.2010 Пользователь №: 22694 ![]() |
100$, благодарствую) но что - то в >z не вижу, где тест М-Бокса? Как мне его высчитать? Если он стат.значим, все не очень хорошо. Если я правильно поняла. М-тест Бокса: >library(biotools) >boxM(data, grouping) По поводу равенства/неравенства ковариашек могу сообщить, что, н-р, квадратичный ДА его и не предполагает. |
|
![]() |
![]() |
![]() ![]() |