Closed vasishth closed 3 months ago
You mean the red intervals for the observed data?
Here are the numbers (see also Fig 9):
round(posterior_summary(m_m_n4, variable = "b_syn"),2) Estimate Est.Error Q2.5 Q97.5 b_syn -0.14 0.1 -0.33 0.05 round(posterior_summary(m_m_n4, variable = "b_sem"),2) Estimate Est.Error Q2.5 Q97.5 b_sem -0.3 0.1 -0.5 -0.1 round(posterior_summary(m_m_n4, variable = "b_syn:sem"),2) Estimate Est.Error Q2.5 Q97.5 b_syn:sem 0.03 0.18 -0.33 0.38
ok
Are you really sure that the 95% credible intervals in this figure are this tight? It seems implausible to me.