Волнение в океане личностных факторов

No Comments

Анимация демонстрирует влияние выборочных флуктуаций на корреляционную структуру пунктов личностного опросника (набор данных bfi из пакета psych). Из генеральной совокупности в 2800 человек случайным образом извлекаются выборки (слайдер — ‘Случайных выборок’) испытуемых по N человек в каждой (слайдер — ‘Размер выборки’). На выборке вычислялись корреляции между 10 вопросами — на Экстраверсию (E1-E5) и Нейротизм (N1-N5). Сила связи отражается насыщенностью цвета, направление — цветом (отрицательные связи обозначаются оттенками синего).

Скриншот приложения

Скриншот приложения

Считаем фи-коэффициент для четырехклеточных таблиц в R

No Comments

Ранее я приводил пример расчета фи-коэффициента в MS Excel (см. файл), при этом значимость определяется с помощью хи-квадрат автоматически. Можно задавать p <0.05 < 0.01 <0.001), или ориентироваться на точное вычисленное значение. Более подробное описание фи-коэффициента с примерами заинтересованные читатели могут найти в кн. А.Г. Шмелева «Практическая тестология» (стр. 287 — 293), а также в эксель-файле на диске-электронном приложении к книге.

Кратко рассмотрим алгоритм вычисления фи-коэффицента в R. Для этого необходимо подключить пакет psych, в котором присутствует необходимая функция phi(): More

«Идеальный» пример идеальной положительной корреляции

No Comments

Термин «корреляция» означает взаимосвязь. Мы можем сказать, что при положительной корреляции двух переменных высокие значения одной связаны высоким значениями другой переменной, и наоборот. Это можно увидеть, если попробовать построить график, который называется «график рассеивания». Если по оси абсцисс отложить значения одной переменной, а по оси ординат – второй, то получится график рассеивания, который как раз позволит нам увидеть силу связи между переменными. Полученный график представляет собой поле встречи двух значений, где каждая точка на нем представлена парой значений (x и y). More

Младенческая смертность в России (2011-2012) и результаты выборов в госдуму (2011) по регионам РФ

No Comments

Пытаюсь делать простые вещи в R, поэтому решил проверить одну гипотезу. В России младенческая смертность в 2012 году увеличилась на 18%. Это результат изменений в  критериях учета в 2012 году:  в статистике перинатальной смертности учитываются все плоды массой от 500 грамм или сроком от 22 полных недель гестации, а также новорожденные до 7 дней. После перехода на новые правила младенческая смертность в России выросла. К слову, по мнению Леонида Рошаля, статистика детской смертности была занижена примерно вдвое. Да, в СССР были приняты не соответствующие нормам ВОЗ стандарты для учета младенческой смертности, в результате чего статистика младенческой смертности в СССР и затем в России занижалась. Теперь она приближается к более реальному положению дел. Интересен не сам факт ожидаемого скачка в официальных цифрах младенческой смертности. Я решил посмотреть то, как связаны показатели детской смертности в регионах и голоса за партии на выборах в госдуму в 2011 году. More

Statistics 1, Assignment 2

No Comments

#Statistics 1, Assignment 2
library(psych)
working_memory < -read.table("DAA.02.TXT", header=T)
head(working_memory)
groupdes <- subset(working_memory, subset=(cond=="des"))
groupaer <- subset(working_memory, subset=(cond=="aer"))
noconddes <- groupdes[3:10]
nocondaer <- groupaer[3:10]
describe(noconddes)
cor(noconddes)
describe(nocondaer)
cor(nocondaer)

Correlation Quiz

No Comments

Прошёл краткий тест по теме «Корреляция»

Результат: 13 из 13.

Мне показалось, что вопросы слишком лёгкие.