Paper Data

mean(fertility_dif$Difference, na.rm = TRUE )

[1] 0.4691406

max(fertility_dif$Difference, na.rm = TRUE )

[1] 0.74

min(fertility_dif$Difference, na.rm = TRUE )

[1] 0.26

sd(fertility_dif$Difference, na.rm = TRUE )

[1] 0.1205265