mixOmics для гуманитариев. Денис Владимирович Соломатин. Читать онлайн. Newlib. NEWLIB.NET

Автор: Денис Владимирович Соломатин
Издательство: ЛитРес: Самиздат
Серия:
Жанр произведения: Программы
Год издания: 2021
isbn:
Скачать книгу
связи с этим возникает естественный вопрос об оптимальном количестве главных компонент. С другой стороны, важную роль в дисперсионном анализе (ANOVA) играет объясненная дисперсия, пропорционально характеризующая долю общего числа образцов, охватываемую той или иной главной компонентой. Объяснённая дисперсия может быть представлена наглядно, функцией plot, либо фактическими численными её пропорциями и накапливаемыми пропорциями:

      plot(My_result.pca2)

      Следующая команда:

      My_result.pca2

      Выведет собственные значения для первых трех главных компонент:

            PC1       PC2       PC3

      2.8142478 1.2477355 0.7394421

      Пропорциональное отношение объяснённой ими дисперсии:

            PC1            PC2            PC3

      0.5433274      0.2408917      0.1427590

      И совокупное значение оной по мере увеличения числа главных компонент:

            PC1            PC2            PC3

      0.5433274      0.7842191      0.9269781

      К сожалению, не существует строгих правил, руководствуясь которыми можно определить, сколько компонентов должно быть включено в PCA, – это зависит от данных и от уровня шума. Зачастую просто по приведённой выше диаграмме делают вывод о том, что увеличение количества главных компонент в модели не способствует резкому увеличению оставшейся доли объяснённой дисперсии.

      С другой стороны, всегда можно посмотреть на переменные коэффициенты в каждом компоненте с векторами нагрузки. Весы нагрузки представлены по убыванию абсолютной величины снизу вверх. Абсолютное значение указывает на важность каждой переменной для определения каждого главной компоненты и представлено длиной каждого прямоугольника:

      plotLoadings(My_result.pca)

      Можно открыть справку командой ?plotLoadings, чтобы ознакомиться с полным списком аргументов. Следующий пример покажет только две темы, оказавших наибольше влияние на разделение, с указанием их названий и увеличением шрифта на 10%:

      plotLoadings(My_result.pca, ndisplay = 2,

        name.var = c('первая тема','вторая тема','третья тема','четвертая тема','пятая тема'),

        size.name = rel(1.1))

      Такое представление будет особенно информативным в случае, когда необходимо выбирать из нескольких переменных. Диаграммы и графики можно отображать интерактивно в 3D, используя стилевую опцию style="3d". Для этого используется пакет rgl, устанавливаемый и подключаемый предварительно:

      Конец ознакомительного фрагмента.

      Текст предоставлен ООО «ЛитРес».

      Прочитайте эту книгу целиком, купив полную легальную версию на ЛитРес.

      Безопасно оплатить книгу можно банковской картой Visa, MasterCard, Maestro, со счета мобильного телефона, с платежного терминала, в салоне МТС или Связной, через PayPal, WebMoney, Яндекс.Деньги, QIWI Кошелек, бонусными картами или другим удобным Вам способом.

/9j/4AAQSkZJRgABAQEAlgCWAAD//gAmQ3JlYXRlZCBieSBmQ29kZXIgR3JhcGhpY3MgUHJvY2Vzc29y/9sAQwAFAwQEBAMFBAQEBQUFBgcMCAcHBwcPCwsJDBEPEhIRDxERExYcFxMUGhURERghGBodHR8fHxMXIiQiHiQcHh8e/8AACwgCVARiAQERAP/EAB8AAAEFAQEBAQEBAAAAAAAAAAABAgMEBQYHCAkKC//EALUQAAIBAwMCBAMFBQQEAAABfQECAwAEEQUSITFBBhNRYQcicRQygZGhCCNCscEVUtHwJDNicoIJChYXGBkaJSYnKCkqNDU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6g4SFhoeIiYqSk5SVlpeYmZqio6Slpqeoqaqys7S1tre4ubrCw8TFxsfIycrS09TV1tfY2drh4uPk5ebn6Onq8fLz9PX29/j5+v/aAAgBAQAAPwD2z4MfDL4bX/we8F3198PfCV1d3Ph+wmnnm0a3eSV2t0LOzFMsxJJJPJJrrP8AhU/ws/6Jp4M/8EVt/wDEUf8ACp/hZ/0TTwZ/4Irb/wCIo/4VP8LP+iaeDP8AwRW3/wARR/wqf4Wf9E08Gf8Agitv/iKP+FT/AAs/6Jp4M/8ABFbf/EUf8Kn+Fn/RNPBn/gitv/iKP+FT/Cz/AKJp4M/8EVt/8RR/wqf4Wf8ARNPBn/gitv8A4ij/AIVP8LP+iaeDP/BFbf8AxFH/AAqf4Wf9E08Gf+CK2/8AiKP+FT/Cz/omngz/AMEVt/8AEUf8Kn+Fn/RNPBn/AIIrb/4ij/hU/wALP+iaeDP/AARW3/xFH/Cp/hZ/0TTwZ/4Irb/4ij/hU/ws/wCiaeDP/BFbf/EUf8Kn+Fn/AETTwZ/4Irb/AOIo/wCFT/Cz/omngz/wRW3/AMRR/wAKn+Fn/RNPBn/gitv/AIij/hU/ws/6Jp4M/wDBFbf/ABFH/Cp/hZ/0TTwZ/wCCK2/+Io/4VP8ACz/omngz/wAEVt/8RR/wqf4Wf9E08Gf+