Difference between revisions of "Burden of disease"

From Testiwiki
Jump to: navigation, search
(Global Burden of Disease Study 2010)
(Calculations)
Line 144: Line 144:
  
 
These ovariables are used to calculate burden of disease based either on relative or absolute risks, and counted as [[DALY]]s. For ovariables that calculate numbers of cases, see [[Health impact assessment]].
 
These ovariables are used to calculate burden of disease based either on relative or absolute risks, and counted as [[DALY]]s. For ovariables that calculate numbers of cases, see [[Health impact assessment]].
 
BoDt is an ovariable to calculate total burden of disease for selected endpoints based on IHME data.
 
 
<rcode name="BoDt" label="Initiate BoDt (for developers only)">
 
# This is code Op_en7422/BoDt on page [[Burden of disease]]
 
library(OpasnetUtils)
 
 
dummy <- 0
 
 
BoDt <- Ovariable(
 
  "BoDt",
 
  dependencies = data.frame(Name="dummy"),
 
  formula = function(...) {
 
    BoDt <- opbase.data("Op_en5917", subset = "IHME_Goherr")# [[Disease risk]]
 
    BoDt <- BoDt[BoDt[[1]]=="DALY" , -1]
 
    # Measure has a special character in name, so use position.
 
   
 
    # levels(BoDt$Country)
 
    # [1] "Denmark" "Estonia" "Finland" "Sweden"
 
    levels(BoDt$Country) <- c("DK", "EST", "FI", "SWE")
 
   
 
    # levels(BoDt$Age)
 
    #[1] "1 to 4"  "10 to 14" "15 to 19" "20 to 24" "25 to 29" "30 to 34" "35 to 39" "40 to 44"
 
    #[9] "45 to 49" "5 to 9"  "50 to 54" "55 to 59" "60 to 64" "65 to 69" "70 to 74" "75 to 79"
 
    #[17] "80 plus"  "All Ages"
 
    BoDt$Ages <- BoDt$Age
 
    levels(BoDt$Ages) <-  c(NA,NA,rep("18-45",6),">45","18-45",rep(">45",7),NA)
 
    BoDt <- BoDt[!is.na(BoDt$Ages) , ]
 
   
 
    #levels(BoDt$Response)
 
    #[1] "Hemorrhagic stroke"    "Ischemic heart disease" "Ischemic stroke"     
 
    #[4] "Permanent caries"     
 
    levels(BoDt$Response) <- c("Stroke","Ischaemic heart disease","Stroke","Tooth defect")
 
   
 
    BoDt$Result <- paste(BoDt$Lower, BoDt$Result, BoDt$Upper, sep=":")
 
    BoDt<- Ovariable(
 
      data = BoDt[!colnames(BoDt) %in% c("Upper", "Lower", "Year")]
 
    )
 
    BoDt <- EvalOutput(BoDt)
 
    BoDt$Source <- NULL
 
    BoDt@marginal <- colnames(BoDt@output) != "Result"
 
    BoDt <- oapply(BoDt, cols="Age", FUN=sum)
 
    return(BoDt)
 
  }
 
)
 
 
# dummy is needed to fill an empty dependencies table.
 
objects.store(BoDt, dummy)
 
cat("Ovariable BoDt and a dummy stored.\n")
 
</rcode>
 
  
 
Burden of disease estimate for responses that can be calculated based on population attributable fraction (PAF).
 
Burden of disease estimate for responses that can be calculated based on population attributable fraction (PAF).

Revision as of 16:22, 2 June 2017

Progression class
In Opasnet many pages being worked on and are in different classes of progression. Thus the information on those pages should be regarded with consideration. The progression class of this page has been assessed:
This page is a draft
The relevat content and structure of the page is already present, but there still is a lot of missing content.
The content and quality of this page is being curated by THL.
Error creating thumbnail: Unable to save thumbnail to destination

The quality was last checked: 2016-04-10.


Question

How to estimate the disease burden of important risk factors?

Answer

# : THIS PAGE SHOULD CONTAIN AN OVERVIEW ON HOW TO PERFORM DISEASE BURDEN STUDIES. --Jouni (talk) 16:16, 10 April 2016 (UTC)

Rationale

Global Burden of Disease Study 2010

Data from the study

Instructions

  • Download the data from this page as csv
  • Change names of columns: Causes of disease or injury -> Response; Measurement -> Unit; Value -> Result. Move Result to the rightmost column.
  • Upload the csv to Opasnet Base using OpasnetBaseImport to table "GBD by risk factor" and unit "several". (This is for archiving purposes only: the latter tasks may be easier directly from the csv file.)
  • Pick only rows with Unit = DALY per 100000.
  • Sum over causes of disease so that you get one value for each risk factor.
  • Go to Wikidata and suggest that "disease burden" is taken as a new property. When the property is available,
  • go to each Item of the risk factor and add property disease burden to that item. Include qualifiers Global, Both sexes, Year 2013, all ages, all causes. (Find out what properties are available)
  • Make references to the link above, the IHME institute, this article, and secondarily to this Opasnet page. Remember to put date of entry.



Calculations

These ovariables are used to calculate burden of disease based either on relative or absolute risks, and counted as DALYs. For ovariables that calculate numbers of cases, see Health impact assessment.

Burden of disease estimate for responses that can be calculated based on population attributable fraction (PAF).

+ Show code

BoDcase calculates burden of disease based on numbers of cases, durations of diseases, and disability weights.

+ Show code

BoD calculates burden of disease as a combination of burdens of disease based on either PAF or cases.

Note! There may double counting if there are responses that have both BoDt and incidence. The ovariable gives a warning against double counting, if both methods have calculated a burden estimate for the same response.

+ Show code

See also

Keywords

References

  1. Reference to the Lim Lancet article