Merge branch 'main' into update

mbg-unsw · Jun 30, 2024 · 199d8de · 199d8de
2 parents 3323c48 + afb61a2
commit 199d8de
Show file tree

Hide file tree

Showing 16 changed files with 6 additions and 598 deletions.
diff --git a/README.md b/README.md
@@ -35,13 +35,16 @@ fit_r <- ranwtdttt(data = df,
 
 summary(fit_r)
 ```
+Please see [examples.R](sandpit/examples.R) for more.
 
 ## More
 
 ### Known bugs
 
 Robust variance calculation, used by default in the randwtdttt() function, is very slow. We are working on improving this.
 
+Other planned improvements are listed in [TODO](sandpit/TODO)
+
 ### Bug reports, feature requests etc.
 
 This is a young project with some rough edges. Please submit any bug reports, feature request and comments as a Github issue.
@@ -57,6 +60,8 @@ The package was developed by:
 * Malcolm Gillies
 * Olga Paoletti
 
+Thank you to Jesper Hallas for kindly allowing us to reproduce the synthetic dispensing data in the `drugpakud.dta` dataset.
+
 ### License
 
 Rwtdttt is licensed under the GNU General Public License, Version 3.

diff --git a/inst/extdata/drugpakud.dta b/inst/extdata/drugpakud.dta
diff --git a/inst/extdata/score_ex.xlsx b/inst/extdata/score_ex.xlsx
diff --git a/sandpit/d1functions.R b/sandpit/d1functions.R
diff --git a/sandpit/examples.R b/sandpit/examples.R
@@ -373,4 +373,4 @@ fit1 <- ranwtdttt(data = df2,
   subset = atc=='A10AC01'&!is.na(ddd), reverse=T, nsamp=5,
   parameters=list(mu~log(ddd))
 )
-summary(fit1)
+summary(fit1)
diff --git a/sandpit/good_practises.R b/sandpit/good_practises.R
diff --git a/sandpit/mlwtdttt_lnorm.R b/sandpit/mlwtdttt_lnorm.R
diff --git a/sandpit/sand_test_HS.R b/sandpit/sand_test_HS.R
diff --git a/sandpit/sandwich_estimation_code_malcolm.R b/sandpit/sandwich_estimation_code_malcolm.R