Social Inequality - Sociogenomics - Statistics
b_obs = Cov(X_o,Y) / V(X_o) = b_true*V(X_t) / V(X_t) +V(x_error)
so if V(x_error)=0 everything is fine. I somehow suspect, that the DAG is not the right one but I am lacking arguments here..
If you rearrange the equation for X_obs you get
b_obs = Cov(X_o,Y) / V(X_o) = b_true*V(X_t) / V(X_t) +V(x_error)
so if V(x_error)=0 everything is fine. I somehow suspect, that the DAG is not the right one but I am lacking arguments here..
If you rearrange the equation for X_obs you get
probably i am missing something very basic in the DAG line of thought?
probably i am missing something very basic in the DAG line of thought?
library(tidyverse)
N <- 5000
df <- tibble(
X_true = rnorm(N),
X_error = rnorm(N),
X_obs = X_true + X_error,
Y_error = rnorm(N),
Y = 3*X_true + Y_error
)
summary(lm(Y ~ X_obs, data = df))
library(tidyverse)
N <- 5000
df <- tibble(
X_true = rnorm(N),
X_error = rnorm(N),
X_obs = X_true + X_error,
Y_error = rnorm(N),
Y = 3*X_true + Y_error
)
summary(lm(Y ~ X_obs, data = df))