analyses:morris2008
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revision | |||
analyses:morris2008 [2022/08/03 11:19] – Wolfgang Viechtbauer | analyses:morris2008 [2022/08/03 17:05] (current) – Wolfgang Viechtbauer | ||
---|---|---|---|
Line 130: | Line 130: | ||
<code rsplus> | <code rsplus> | ||
sd_pool <- sqrt((with(datT, | sd_pool <- sqrt((with(datT, | ||
- | dat <- data.frame(yi = metafor::: | + | dat <- data.frame(yi = metafor::: |
+ | (with(datT, m_post - m_pre) - with(datC, m_post - m_pre)) / sd_pool) | ||
dat$vi <- 2*(1-datT$ri) * (1/datT$ni + 1/datC$ni) + dat$yi^2 / (2*(datT$ni + datC$ni)) | dat$vi <- 2*(1-datT$ri) * (1/datT$ni + 1/datC$ni) + dat$yi^2 / (2*(datT$ni + datC$ni)) | ||
round(dat, 2) | round(dat, 2) |
analyses/morris2008.txt · Last modified: 2022/08/03 17:05 by Wolfgang Viechtbauer