21 lines
681 B
R
21 lines
681 B
R
# Load required libraries
|
|
library(tidyverse)
|
|
library(ez)
|
|
library(car)
|
|
library(afex) # For aov_ez (cleaner ANOVA output)
|
|
library(nortest) # For normality tests
|
|
library(emmeans) # For post-hoc comparisons
|
|
library(purrr) # For map functions
|
|
library(effsize) # For Cohen's d calculations
|
|
library(effectsize) # For effect size calculations
|
|
|
|
# Global options to remove scientific notation
|
|
options(scipen = 999)
|
|
|
|
# Set contrasts to sum for mixed ANOVA (necessary for proper interpretation)
|
|
options(contrasts = c("contr.sum", "contr.poly"))
|
|
|
|
setwd("C:/Users/irina/Documents/DND/EOHI/eohi2")
|
|
|
|
# Read the data
|
|
data <- read.csv("eohi2.csv") |