diff --git a/Covid19EstimationHydroxychloroquine/PlotsAndTables.R b/Covid19EstimationHydroxychloroquine/PlotsAndTables.R
index 0ac98084..7a11583b 100644
--- a/Covid19EstimationHydroxychloroquine/PlotsAndTables.R
+++ b/Covid19EstimationHydroxychloroquine/PlotsAndTables.R
@@ -135,7 +135,6 @@ preparePowerTable <- function(mainResults, analyses) {
table$comparatorYears <- table$comparatorDays/365.25
table$targetIr <- 1000 * table$targetOutcomes/table$targetYears
table$comparatorIr <- 1000 * table$comparatorOutcomes/table$comparatorYears
-
if (nrow(table) > 1) {
table <- table[, c("databaseId",
"targetSubjects",
@@ -1070,3 +1069,4 @@ preparePropensityModelTable <- function(model) {
return(table)
}
+
diff --git a/Covid19EstimationHydroxychloroquine/global.R b/Covid19EstimationHydroxychloroquine/global.R
index 93451e38..5f45c8cf 100644
--- a/Covid19EstimationHydroxychloroquine/global.R
+++ b/Covid19EstimationHydroxychloroquine/global.R
@@ -1,7 +1,7 @@
source("DataPulls.R")
source("PlotsAndTables.R")
-# shinySettings <- list(dataFolder = "G:/StudyResults/Covid19EstimationHydroxychloroquine_2/SIDIAP/shinyData", blind = TRUE)
+#shinySettings <- list(dataFolder = "G:/StudyResults/Covid19EstimationHydroxychloroquine_2/IPCI/shinyData", blind = TRUE)
shinySettings <- list(dataFolder = "./data", blind = FALSE)
dataFolder <- shinySettings$dataFolder
diff --git a/Covid19EstimationHydroxychloroquine/ui.R b/Covid19EstimationHydroxychloroquine/ui.R
index f17b7257..0acbcc34 100644
--- a/Covid19EstimationHydroxychloroquine/ui.R
+++ b/Covid19EstimationHydroxychloroquine/ui.R
@@ -3,7 +3,7 @@ library(DT)
shinyUI(
fluidPage(style = "width:1500px;",
- titlePanel(paste("Hydroxychloroquine safety as an antiviral prophylaxis in light of potential wide-spread use in COVID-19: a multinational, large-scale network cohort study", if(blind) "***Blinded***" else "")),
+ titlePanel(paste("Safety of hydroxychloroquine, alone or in combination with azithromycin, in light of rapid wide-spread use for COVID-19: a multinational, network cohort and self-controlled case series study", if(blind) "***Blinded***" else "")),
tags$head(tags$style(type = "text/css", "
#loadmessage {
position: fixed;
@@ -25,13 +25,13 @@ shinyUI(
tabsetPanel(id = "mainTabsetPanel",
tabPanel("About",
HTML("
"),
- div(p("The Observational Health Data Sciences and Informatics (OHDSI) international community is hosting a COVID-19 virtual study-a-thon this week (March 26-29) to inform healthcare decision-making in response to the current global pandemic. The preliminary research results on this web-based application are from a retrospective, real-world, observational study in support of this activity and will subsequently be submitted to a peer-reviewed, scientific journal. During manuscript development and the subsequent review period, these results are considered under embargo and should not be disclosed without explicit permission and consent from the authors."), style="border: 1px solid black; padding: 5px;"),
+ div(p("The Observational Health Data Sciences and Informatics (OHDSI) international community hosted a COVID-19 virtual study-a-thon over March 26-29, 2020 to collaboratively generate evidence to inform healthcare decision-making in response to the current global pandemic. The preliminary research results on this web-based application are from a retrospective, real-world, observational study in support of this activity and will subsequently be submitted to a peer-reviewed, scientific journal. During manuscript development and the subsequent review period, these results are considered under embargo and should not be disclosed without explicit permission and consent from the authors."), style="border: 1px solid black; padding: 5px;"),
HTML("
"),
HTML("Below is the abstract of the manuscript that summarizes the findings:
"),
- HTML("Background:
"),
- HTML("Methods:
"),
- HTML("Results:
"),
- HTML("Discussion:
"),
+ HTML("Background: Hydroxychloroquine has recently received Emergency Use Authorization by the FDA and is currently prescribed in combination with azithromycin for COVID-19 pneumonia. We studied the safety of hydroxychloroquine, alone and in combination with azithromycin.
"),
+ HTML("Methods: New user cohort studies were conducted including 16 severe adverse events (SAEs). Rheumatoid arthritis patients aged 18+ and initiating hydroxychloroquine were compared to those initiating sulfasalazine and followed up over 30 days. Self-controlled case series (SCCS) were conducted to further establish safety in wider populations. Separately, SAEs associated with hydroxychloroquine-azithromycin (compared to hydroxychloroquine-amoxicillin) were studied. Data comprised 14 sources of claims data or electronic medical records from Germany, Japan, Netherlands, Spain, UK, and USA. Propensity score stratification and calibration using negative control outcomes were used to address confounding. Cox models were fitted to estimate calibrated hazard ratios (CalHRs) according to drug use. Estimates were pooled where I2<40%.
"),
+ HTML("Results: Overall, 950,769 and 306,706 users of hydroxychloroquine and sulfasalazine, and 318,821 and 337,424 users of hydroxychloroquine-azithromycin and hydroxychloroquine-amoxicillin were included. No excess risk of SAEs was identified when 30-day hydroxychloroquine and sulfasalazine use were compared. SCCS confirmed these findings. However, when azithromycin was added to hydroxychloroquine, we observed an increased risk of 30-day cardiovascular mortality (CalHR 2.19 (95% CI 1.22-3.94)), chest pain/angina, and heart failure.
"),
+ HTML("Conclusions: Short-term hydroxychloroquine treatment is safe, but addition of azithromycin may induce heart failure and cardiovascular mortality, potentially due to synergistic effects on QT length. We call for caution if such combination is to be used in the management of Covid-19.
"),
HTML("
"),
HTML("Below are links for study-related artifacts that have been made available as part of this study:
"),
HTML("