Skip to content
Snippets Groups Projects
Commit 17ca4357 authored by Yuka  SUZUKI's avatar Yuka SUZUKI
Browse files

changed the covariances in epsg2 from -0.2 to -pgh

parent de15994e
No related branches found
No related tags found
No related merge requests found
...@@ -17,7 +17,7 @@ epsh = matrix(c(h1, 0, 0, h2), ncol=2)/M ...@@ -17,7 +17,7 @@ epsh = matrix(c(h1, 0, 0, h2), ncol=2)/M
epshlow = matrix(c(0.1, 0, 0, 0.1), ncol=2)/M epshlow = matrix(c(0.1, 0, 0, 0.1), ncol=2)/M
epsg1 = matrix(c(h1, pgh, pgh, h2), ncol=2)/ M epsg1 = matrix(c(h1, pgh, pgh, h2), ncol=2)/ M
epsg2 = matrix(c(h1, -0.2, -0.2, h2), ncol=2)/ M epsg2 = matrix(c(h1, -pgh, -pgh, h2), ncol=2)/ M
# draw genetic effect according to several scenarios # draw genetic effect according to several scenarios
BG_mat <-list() BG_mat <-list()
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment