File:Twin Study MZ discordant test of hypothesis that exercise protects against depression.png
From Infogalactic: the planetary knowledge core
Size of this preview: 600 × 600 pixels. Other resolutions: 240 × 240 pixels | 750 × 750 pixels.
Original file (750 × 750 pixels, file size: 68 KB, MIME type: image/png)
Summary
- R code to create
library(ggplot2); library(MASS) set.seed(1000) cov = -0 myCovariance = matrix(nrow = 2, c(1, cov, cov, 1)); xy = MASS::mvrnorm (n = 100, mu = c(0,0), Sigma = myCovariance); xy = data.frame(xy); names(xy) <- c("Exercise", "Depression"); qplot(y = Depression, x = Exercise, data = xy, geom = c("point", "smooth"), method = "lm", xlab = "MZ difference on Exercise", ylab = "MZ difference on Depression", main = "Does Exercise protect against Depression?" )
- Save as pdf, convert to png
"MZ discordant test of hypothesis that exercise protects against depression"
Licensing
Lua error in package.lua at line 80: module 'strict' not found.
File history
Click on a date/time to view the file as it appeared at that time.
| Date/Time | Thumbnail | Dimensions | User | Comment | |
|---|---|---|---|---|---|
| current | 07:13, 15 January 2017 | | 750 × 750 (68 KB) | 127.0.0.1 (talk) | <ol><li> R code to create</li></ol> <p>library(ggplot2); library(MASS) set.seed(1000) cov = -0 myCovariance = matrix(nrow = 2, c(1, cov, cov, 1)); xy = MASS::mvrnorm (n = 100, mu = c(0,0), Sigma = myCovariance); xy = data.frame(xy); names(xy) <- c("Exercise", "Depression"); qplot(y = Depression, x = Exercise, data = xy, geom = c("point", "smooth"), method = "lm", xlab = "MZ difference on Exercise", ylab = "MZ difference on Depression", main = "Does Exercise protect against Depression?" ) </p> <ol><li> Save as pdf, convert to png</li></ol> "MZ discordant test of hypothesis that exercise protects against depression" |
- You cannot overwrite this file.
File usage
The following page links to this file:
