Skip to content

Commit

Permalink
abbreviate CWRES
Browse files Browse the repository at this point in the history
kylebaron committed Feb 16, 2024
1 parent 04e1d8b commit 1f61c37
Showing 2 changed files with 4 additions and 4 deletions.
2 changes: 1 addition & 1 deletion R/pm_axis_data.R
Original file line number Diff line number Diff line change
@@ -30,7 +30,7 @@ pm_axis_data <- list(
npde = "NPDE"
),
title = list(
cwres = "Conditional weighted residual",
cwres = "CWRES",
cwresi = "CWRES with interaction",
res = "Residual",
wres = "Weighted residual",
6 changes: 3 additions & 3 deletions tests/testthat/test-res_time.R
Original file line number Diff line number Diff line change
@@ -57,7 +57,7 @@ test_that("res time [PMP-TEST-053]", {
p <- cwres_time(df)
expect_is(p, "gg")
expect_labels(p, "TIME", "CWRES")
expect_titles(p, "Time (hr)", "Conditional weighted residual")
expect_titles(p, "Time (hr)", "CWRES")

p <- res_tad(df)
expect_is(p, "gg")
@@ -77,7 +77,7 @@ test_that("res time [PMP-TEST-053]", {
p <- cwres_tad(df)
expect_is(p, "gg")
expect_labels(p, "TAD", "CWRES")
expect_titles(p, "Time after dose (hr)", "Conditional weighted residual")
expect_titles(p, "Time after dose (hr)", "CWRES")

p <- res_tafd(df)
expect_is(p, "gg")
@@ -97,7 +97,7 @@ test_that("res time [PMP-TEST-053]", {
p <- cwres_tafd(df)
expect_is(p, "gg")
expect_labels(p, "TAFD", "CWRES")
expect_titles(p, "Time after first dose (hr)", "Conditional weighted residual")
expect_titles(p, "Time after first dose (hr)", "CWRES")


})

0 comments on commit 1f61c37

Please sign in to comment.