Publication Bias

As estimated wth fail-safe numbers

Preamble

Load Libraries

library(ezknitr)
library(knitr)
library(metafor)

Clear environment

remove(list=ls())

Document settings

opts_chunk$set(fig.width = 6, fig.height = 4)

Load data

load(file="data/output_data/data_cleaned.R")

Fail-safe numbers

Rust

fsn.rust <- fsn(yi = yi, vi = vi, data = rust.data.SMD)
fsn.rust

## 
## Fail-safe N Calculation Using the Rosenthal Approach 
## 
## Observed Significance Level: <.0001 
## Target Significance Level:   0.05 
## 
## Fail-safe N: 106301

# compared to actual number of data points
nrow(rust.data.SMD)

## [1] 324

Yield

fsn.yield <- fsn(yi = yi, vi = vi, data = yield.data.SMD)
fsn.yield

## 
## Fail-safe N Calculation Using the Rosenthal Approach 
## 
## Observed Significance Level: <.0001 
## Target Significance Level:   0.05 
## 
## Fail-safe N: 87200

# compared to actual number of data points
nrow(yield.data.SMD)

## [1] 513

100-seed-weight

fsn.100sw <- fsn(yi = yi, vi = vi, data = seedwt.data.SMD)
fsn.100sw

## 
## Fail-safe N Calculation Using the Rosenthal Approach 
## 
## Observed Significance Level: <.0001 
## Target Significance Level:   0.05 
## 
## Fail-safe N: 9688

# compared to actual number of data points
nrow(seedwt.data.SMD)

## [1] 207

Cercospora

fsn.cerco <- fsn(yi = yi, vi = vi, data = cerco.data.MD)
fsn.cerco

## 
## Fail-safe N Calculation Using the Rosenthal Approach 
## 
## Observed Significance Level: <.0001 
## Target Significance Level:   0.05 
## 
## Fail-safe N: 187

# compared to actual number of data points
nrow(cerco.data.MD)

## [1] 40

Target Spot

fsn.target.spot <- fsn(yi = yi, vi = vi, data = target.spot.data.MD)
fsn.target.spot

## 
## Fail-safe N Calculation Using the Rosenthal Approach 
## 
## Observed Significance Level: <.0001 
## Target Significance Level:   0.05 
## 
## Fail-safe N: 605

# compared to actual number of data points
nrow(target.spot.data.MD)

## [1] 31

Footer

Spun with ezspin(“programs/publication_bias.R”, out_dir=“output”, fig_dir=“figures”, keep_md=FALSE)

Session Info:

sessionInfo()

## R version 3.3.0 (2016-05-03)
## Platform: x86_64-apple-darwin13.4.0 (64-bit)
## Running under: OS X 10.10.5 (Yosemite)
## 
## locale:
## [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
## 
## attached base packages:
## [1] stats     graphics  grDevices utils     datasets  methods   base     
## 
## other attached packages:
## [1] doBy_4.5-15   metafor_1.9-8 Matrix_1.2-6  knitr_1.13    ezknitr_0.4  
## 
## loaded via a namespace (and not attached):
##  [1] lattice_0.20-33   R.methodsS3_1.7.1 MASS_7.3-45      
##  [4] grid_3.3.0        formatR_1.4       magrittr_1.5     
##  [7] evaluate_0.9      stringi_1.1.1     R.oo_1.20.0      
## [10] R.utils_2.3.0     tools_3.3.0       stringr_1.0.0    
## [13] markdown_0.7.7