Australian EQ-5D-Y-3L value set added.

Author: fragla

NEWS.Rmd

@@ -7,6 +7,10 @@ output: github_document
 ```{r setup, include=FALSE}
 knitr::opts_chunk$set(echo = TRUE)
 ```
+# eq5d (development version)
+
+- Australian EQ-5D-Y-3L value set added.
+
 # eq5d 0.16.0 (2025-06-19)
 
 - Moroccan EQ-5D-5L value set added.

NEWS.md

@@ -1,6 +1,10 @@
 
 <!-- NEWS.md is generated from NEWS.Rmd. Please edit that file -->
 
+# eq5d (development version)
+
+- Australian EQ-5D-Y-3L value set added.
+
 # eq5d 0.16.0 (2025-06-19)
 
 - Moroccan EQ-5D-5L value set added.

R/data.R

@@ -236,11 +236,12 @@
 
 #' EQ-5D-Y-3L value set data
 #'
-#' EQ-5D-Y-3L value set calculation data for Belgium, Brazil, China, Germany, Hungary, 
+#' EQ-5D-Y-3L value set calculation data for Australia, Belgium, Brazil, China, Germany, Hungary, 
 #' Indonesia, Japan, Netherlands, Slovenia and Spain.
 #'
 #' @source
 #'   \itemize{
+#'     \item{\strong{Australia}: Pan T, Roudijk B, Devlin N, Mulhern B, Norman R. An Australian Value Set for the EQ-5D-Y-3L. Health Qual Life Outcomes. 2025 Jul 15;23(1):72. \doi{10.1186/s12955-025-02402-x}. PMID: 40660259.}
 #'     \item{\strong{Belgium}: Dewilde S, Roudijk B, Tollenaar NH, Ramos-Goñi JM. An EQ-5D-Y-3L Value Set for Belgium. Pharmacoeconomics. 2022 Nov 1:1–12. \doi{10.1007/s40273-022-01187-x}. Epub ahead of print.  PMID: 36316544.}
 #'     \item{\strong{Brazil}: Espirito Santo CM, Miyamoto GC, Santos VS, Ben ÂJ, Finch AP, Roudijk B, de Jesus-Moraleida FR, Stein AT, Santos M, Yamato TP. Estimating an EQ-5D-Y-3L Value Set for Brazil. Pharmacoeconomics. 2024 Jul 2. \doi{10.1007/s40273-024-01404-9}. Epub ahead of print. PMID: 38954389.}
 #'     \item{\strong{China}: Yang Z, Jiang J, Wang P, Jin X, Wu J, Fang Y, Feng D, Xi X, Li S, Jing M, Zheng B, Huang W, Luo N. Estimating an EQ-5D-Y-3L Value Set for China. Pharmacoeconomics. 2022 Nov 18. \doi{10.1007/s40273-022-01216-9}. Epub ahead of print. PMID: 36396878.}

R/sysdata.rda

@@ -1,15 +1,15 @@
-,Belgium,Brazil,China,Germany,Hungary,Indonesia,Japan,Netherlands,Slovenia,Spain
-FullHealth,1,1,1,1,1,1,1,1,1,1
-Intercept,NA,NA,-0.012,NA,NA,,-0.025,NA,NA,NA
-Power,NA,NA,NA,NA,NA,1.9013,NA,NA,NA,NA
-A3,NA,NA,-0.158,NA,NA,NA,NA,NA,NA,NA
-MO2,-0.06427099,-0.124924673,-0.05,-0.0242,-0.054,-0.1317,-0.04,-0.036,-0.083,-0.104
-MO3,-0.20284167,-0.228665295,-0.183,-0.1175,-0.257,-0.2265,-0.089,-0.191,-0.305,-0.2892
-SC2,-0.04580016,-0.102653598,-0.011,-0.0191,-0.038,-0.1017,-0.018,-0.028,-0.046,-0.0513
-SC3,-0.17435497,-0.190900384,-0.127,-0.145,-0.189,-0.1793,-0.07,-0.139,-0.221,-0.1959
-UA2,-0.1037746,-0.103339847,-0.046,-0.0837,-0.078,-0.1441,-0.038,-0.058,-0.106,-0.1002
-UA3,-0.28138339,-0.185773946,-0.17,-0.1993,-0.252,-0.2093,-0.101,-0.211,-0.322,-0.2609
-PD2,-0.15670509,-0.109558484,-0.078,-0.1337,-0.133,-0.1256,-0.077,-0.111,-0.162,-0.1719
-PD3,-0.48665879,-0.236729081,-0.267,-0.419,-0.481,-0.2277,-0.27,-0.363,-0.463,-0.4647
-AD2,-0.10455303,-0.060601154,-0.061,-0.1254,-0.083,-0.1283,-0.049,-0.096,-0.117,-0.1144
-AD3,-0.33023667,-0.163819483,-0.172,-0.4019,-0.306,-0.2016,-0.156,-0.314,-0.38,-0.3285
+,Australia,Belgium,Brazil,China,Germany,Hungary,Indonesia,Japan,Netherlands,Slovenia,Spain
+FullHealth,1,1,1,1,1,1,1,1,1,1,1
+Intercept,NA,NA,NA,-0.012,NA,NA,,-0.025,NA,NA,NA
+Power,NA,NA,NA,NA,NA,NA,1.9013,NA,NA,NA,NA
+A3,NA,NA,NA,-0.158,NA,NA,NA,NA,NA,NA,NA
+MO2,-0.025,-0.06427099,-0.124924673,-0.05,-0.0242,-0.054,-0.1317,-0.04,-0.036,-0.083,-0.104
+MO3,-0.071,-0.20284167,-0.228665295,-0.183,-0.1175,-0.257,-0.2265,-0.089,-0.191,-0.305,-0.2892
+SC2,-0.023,-0.04580016,-0.102653598,-0.011,-0.0191,-0.038,-0.1017,-0.018,-0.028,-0.046,-0.0513
+SC3,-0.079,-0.17435497,-0.190900384,-0.127,-0.145,-0.189,-0.1793,-0.07,-0.139,-0.221,-0.1959
+UA2,-0.052,-0.1037746,-0.103339847,-0.046,-0.0837,-0.078,-0.1441,-0.038,-0.058,-0.106,-0.1002
+UA3,-0.146,-0.28138339,-0.185773946,-0.17,-0.1993,-0.252,-0.2093,-0.101,-0.211,-0.322,-0.2609
+PD2,-0.123,-0.15670509,-0.109558484,-0.078,-0.1337,-0.133,-0.1256,-0.077,-0.111,-0.162,-0.1719
+PD3,-0.298,-0.48665879,-0.236729081,-0.267,-0.419,-0.481,-0.2277,-0.27,-0.363,-0.463,-0.4647
+AD2,-0.097,-0.10455303,-0.060601154,-0.061,-0.1254,-0.083,-0.1283,-0.049,-0.096,-0.117,-0.1144
+AD3,-0.264,-0.33023667,-0.163819483,-0.172,-0.4019,-0.306,-0.2016,-0.156,-0.314,-0.38,-0.3285

data-raw/Y.csv

@@ -107,6 +107,7 @@ EQ-5D-5L,CW,Thailand,22867780,10.1016/j.jval.2012.02.008,,
 EQ-5D-5L,CW,UK,22867780,10.1016/j.jval.2012.02.008,,
 EQ-5D-5L,CW,USA,22867780,10.1016/j.jval.2012.02.008,,
 EQ-5D-5L,CW,Zimbabwe,22867780,10.1016/j.jval.2012.02.008,,
+EQ-5D-Y-3L,cTTO,Australia,40660259,10.1186/s12955-025-02402-x,,
 EQ-5D-Y-3L,cTTO,Belgium,36316544,10.1007/s40273-022-01187-x,,
 EQ-5D-Y-3L,cTTO,Brazil,38954389,10.1007/s40273-024-01404-9,,
 EQ-5D-Y-3L,cTTO,China,36396878,10.1007/s40273-022-01216-9,,

data-raw/references.csv

@@ -1,5 +1,12 @@
 context("EQ-5D-Y")
 
+test_that("EQ-5D-Y Australia gives correct answer", {
+  expect_equal(eq5dy3l(c(MO=1,SC=1,UA=1,PD=1,AD=1), "Australia"), 1)
+  expect_equal(eq5dy3l(c(MO=1,SC=2,UA=1,PD=1,AD=1), "Australia"), 0.977)
+  expect_equal(eq5dy3l(c(MO=2,SC=3,UA=3,PD=3,AD=3), "Australia"), 0.188)
+  expect_equal(eq5dy3l(c(MO=3,SC=3,UA=3,PD=3,AD=3), "Australia"), 0.142)
+})
+
 test_that("EQ-5D-Y Belgium gives correct answer", {
   expect_equal(eq5dy3l(c(MO=1,SC=1,UA=1,PD=1,AD=1), "Belgium"), 1)
   expect_equal(eq5dy3l(c(MO=1,SC=2,UA=3,PD=2,AD=1), "Belgium"), 0.516)