From 1820f829539d4edba3085ecf77c766a26ea243e5 Mon Sep 17 00:00:00 2001 From: remlapmot Date: Tue, 27 Aug 2024 20:25:57 +0000 Subject: [PATCH] =?UTF-8?q?Deploying=20to=20gh-pages=20from=20@=20remlapmo?= =?UTF-8?q?t/OneSampleMR@2327d78bc7c952f333c67eb8e06d710fc0f1f082=20?= =?UTF-8?q?=F0=9F=9A=80?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- dev/articles/compare-smm-fits.html | 6 +++--- dev/articles/f-statistic-comparison.html | 5 +++-- dev/pkgdown.yml | 2 +- dev/reference/OneSampleMR-package.html | 1 + dev/search.json | 2 +- 5 files changed, 9 insertions(+), 7 deletions(-) diff --git a/dev/articles/compare-smm-fits.html b/dev/articles/compare-smm-fits.html index 9d7e016..587b099 100644 --- a/dev/articles/compare-smm-fits.html +++ b/dev/articles/compare-smm-fits.html @@ -92,9 +92,9 @@

Comparison fitspsi0 <- 0.5 psi1 <- 0.2 Z <- rbinom(n, 1, 0.5) -X <- rbinom(n, 1, 0.7*Z + 0.2*(1 - Z)) -m0 <- plogis(1 + 0.8*X - 0.39*Z) -Y <- rbinom(n, 1, plogis(psi0*X + log(m0/(1 - m0)))) +X <- rbinom(n, 1, 0.7 * Z + 0.2 * (1 - Z)) +m0 <- plogis(1 + 0.8 * X - 0.39 * Z) +Y <- rbinom(n, 1, plogis(psi0 * X + log(m0 / (1 - m0)))) dat <- data.frame(Z, X, Y)