Get C_ss Data for Fixed Obesity Status

Usage

get_fixed_obesity(simulated_css, obesity)

Arguments

simulated_css: list of pre-generated C_ss data, for details see: vignette("package_data", package = "GeoTox").
obesity: list of atomic vectors containing obesity status.

Value

list of matrices containing median C_ss values.

Examples

get_fixed_obesity(simulated_css = geo_tox_data$simulated_css,
                  obesity = list(c("Obese", "Normal", "Obese"),
                                 c("Normal", "Normal")))
#> [[1]]
#>      87-86-5 95-95-4 133-06-2 101-14-4 63-25-2 510-15-6 106-50-3 91-94-1
#> [1,]  7.4820  8.6775    2.965  0.28405  0.1432 0.153750   0.5077 0.22425
#> [2,]  4.4205  4.9300    1.849  0.16290  0.0820 0.088135   0.3035 0.12915
#> [3,]  7.4820  8.6775    2.965  0.28405  0.1432 0.153750   0.5077 0.22425
#>      84-74-2 120-80-9 100-02-7 119-90-4 123-31-9 60-11-7 95-80-7 88-06-2
#> [1,]   1.726   2.0710   1.1730   7.3635   0.4089  2.9815   3.926   4.751
#> [2,]   1.037   1.2025   0.7162   5.8545   0.2387  1.7780   2.953   2.757
#> [3,]   1.726   2.0710   1.1730   7.3635   0.4089  2.9815   3.926   4.751
#>      92-87-5 101-77-9 53-96-3 72-43-5 56-38-2
#> [1,] 1.31000    1.758  3.8180  6.3620  3.6535
#> [2,] 0.80915    1.087  2.3715  3.7635  2.1955
#> [3,] 1.31000    1.758  3.8180  6.3620  3.6535
#> 
#> [[2]]
#>      87-86-5 95-95-4 133-06-2 101-14-4 63-25-2 510-15-6 106-50-3 91-94-1
#> [1,]  4.4205    4.93    1.849   0.1629   0.082 0.088135   0.3035 0.12915
#> [2,]  4.4205    4.93    1.849   0.1629   0.082 0.088135   0.3035 0.12915
#>      84-74-2 120-80-9 100-02-7 119-90-4 123-31-9 60-11-7 95-80-7 88-06-2
#> [1,]   1.037   1.2025   0.7162   5.8545   0.2387   1.778   2.953   2.757
#> [2,]   1.037   1.2025   0.7162   5.8545   0.2387   1.778   2.953   2.757
#>      92-87-5 101-77-9 53-96-3 72-43-5 56-38-2
#> [1,] 0.80915    1.087  2.3715  3.7635  2.1955
#> [2,] 0.80915    1.087  2.3715  3.7635  2.1955
#>