commit 61a8044097f0a29eb57395ad82ebe26d264930b5
parent a9ccf4a5be05fbe43c426fecaad95ef95f515954
Author: eamoncaddigan <eamon.caddigan@gmail.com>
Date: Fri, 28 Aug 2015 15:47:09 -0400
Just a lil' plot showing the good stuff.
Diffstat:
1 file changed, 6 insertions(+), 0 deletions(-)
diff --git a/antivax-attitudes.R b/antivax-attitudes.R
@@ -98,3 +98,9 @@ plotMCMC(mcmcCoda,
compVal = 3.5,
saveName = fileNameRoot,
saveType = "png")
+
+# This right here is the good stuff:
+plotPost((mcmcMat[, "b2b3[3,2]"] - mcmcMat[, "b2b3[3,1]"]) -
+ (mcmcMat[, "b2b3[1,2]"] - mcmcMat[, "b2b3[1,1]"]))
+# It shows that post-pre for the "disease risk" is greater than post-pre for
+# "autism correction", supporting the authors' findings.