Update to chartcatalog 1.17.0

growthcharts · Dec 4, 2024 · 0a54aaa · 0a54aaa
1 parent afe7b2a
commit 0a54aaa
Show file tree

Hide file tree

Showing 4 changed files with 20 additions and 9 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: chartcatalog
 Type: Package
 Title: Catalog of JAMES Growth Charts
-Version: 1.16.0
+Version: 1.17.0
 Authors@R: person("Stef", "van Buuren", email = "[email protected]", role = c("aut", "cre"))
 Maintainer: Stef van Buuren <[email protected]>
 Description: Tools for naming growth charts, and methods for 

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,7 @@
+# chartcatalog 1.17.0
+
+* Extends to `ynames_lookup` table with inverse transformation for `x` and `y`
+
 # chartcatalog 1.16.0
 
 * Update to roxygen 7.3.2

diff --git a/README.Rmd b/README.Rmd
@@ -21,7 +21,7 @@ knitr::opts_chunk$set(
 
 The `chartcatalog` package contains tools to
 
-- Lookup available charts in JAMES;
+- Lookup available charts in JAMES; 
 - Create and parse chart codes;
 - Find outcomes, chart group and growth reference;
 - Obtain viewport number and transformation functions;

diff --git a/README.md b/README.md
@@ -42,13 +42,20 @@ head(ynames_lookup)
 #> 4   nl2010      DJAH   hgt   1  A clopus::nl2009[["nl2009.mhgtDS"]]
 #> 5   nl2010      DJAO   hdc   1  A clopus::nl2009[["nl2009.mhdcDS"]]
 #> 6   nl2010      DJAW   wgt   1  A   clopus::nl1980[["nl1980.mwgt"]]
-#>                   tx            ty seq             refcode
-#> 1 function(x) x * 12 function(y) y  tr nl_2009_hdc_male_ds
-#> 2 function(x) x * 12 function(y) y  tr nl_2009_hgt_male_ds
-#> 3 function(x) x * 12 function(y) y  tr   nl_1980_wgt_male_
-#> 4 function(x) x * 12 function(y) y  tr nl_2009_hgt_male_ds
-#> 5 function(x) x * 12 function(y) y  tr nl_2009_hdc_male_ds
-#> 6 function(x) x * 12 function(y) y  tr   nl_1980_wgt_male_
+#>                   tx             inv_tx            ty        inv_ty seq
+#> 1 function(x) x * 12 function(x) x / 12 function(y) y function(y) y  tr
+#> 2 function(x) x * 12 function(x) x / 12 function(y) y function(y) y  tr
+#> 3 function(x) x * 12 function(x) x / 12 function(y) y function(y) y  tr
+#> 4 function(x) x * 12 function(x) x / 12 function(y) y function(y) y  tr
+#> 5 function(x) x * 12 function(x) x / 12 function(y) y function(y) y  tr
+#> 6 function(x) x * 12 function(x) x / 12 function(y) y function(y) y  tr
+#>               refcode
+#> 1 nl_2009_hdc_male_ds
+#> 2 nl_2009_hgt_male_ds
+#> 3   nl_1980_wgt_male_
+#> 4 nl_2009_hgt_male_ds
+#> 5 nl_2009_hdc_male_ds
+#> 6   nl_1980_wgt_male_
 length(unique(ynames_lookup$chartcode))
 #> [1] 440
 ```