Skip to contents

Get C_ss values for use in sensitivity_analysis and compute_sensitivity.

Usage

get_fixed_css(simulated_css, age, obesity, C_ss)

Arguments

simulated_css

list of pre-generated C_ss data, for details see: vignette("package_data", package = "GeoTox").

age

list of atomic vectors containing ages.

obesity

list of atomic vectors containing obesity status.

C_ss

list of matrices containing C_ss values.

Value

list of matrices or atomic vectors containing C_ss values.

Examples

# Define inputs
age <- list(c(25, 35, 55),
            c(15, 60))
obesity <- list(c("Obese", "Normal", "Obese"),
                c("Normal", "Normal"))
C_ss <- sample_Css(simulated_css = geo_tox_data$simulated_css,
                   age = age,
                   obesity = obesity)

# Get fixed C_ss data
get_fixed_css(simulated_css = geo_tox_data$simulated_css,
              age = age,
              obesity = obesity,
              C_ss = C_ss)
#> $age
#> $age[[1]]
#>      100-02-7 101-14-4 101-77-9 119-90-4 120-80-9 123-31-9 133-06-2 51-28-5
#> [1,]  0.97155  0.22695   1.3000   7.0115   1.4020  0.29070   2.1865  115.20
#> [2,]  1.19200  0.26170   1.6020   7.3330   1.9675  0.37445   2.7410  134.05
#> [3,]  1.57650  0.32895   2.0525   9.0755   2.7680  0.53645   3.8135  158.40
#>      510-15-6 53-96-3 56-38-2 60-11-7 63-25-2 72-43-5 84-74-2 87-86-5 88-06-2
#> [1,]  0.12195  2.9560  4.1375  2.2505 0.13680  4.6045  1.2480  1.6330  3.7475
#> [2,]  0.14295  3.5485  5.2695  2.7000 0.18190  5.9545  1.6265  2.2385  4.5155
#> [3,]  0.19755  4.7305  7.1695  4.0020 0.22545  7.6990  2.3585  2.8580  5.9575
#>      91-94-1 92-87-5 95-80-7 95-95-4
#> [1,] 0.16620  0.9798  3.4250  6.8665
#> [2,] 0.21995  1.2320  3.7445  8.4465
#> [3,] 0.27775  1.5465  4.4495 10.2700
#> 
#> $age[[2]]
#>      100-02-7 101-14-4 101-77-9 119-90-4 120-80-9 123-31-9 133-06-2 51-28-5
#> [1,]   0.7077  0.15945  0.99965   5.2580   1.1285  0.21640   1.6310  94.345
#> [2,]   1.5765  0.32895  2.05250   9.0755   2.7680  0.53645   3.8135 158.400
#>      510-15-6 53-96-3 56-38-2 60-11-7 63-25-2 72-43-5 84-74-2 87-86-5 88-06-2
#> [1,] 0.092665  2.1605  3.4310  1.7935 0.10950  3.6775  0.9494  1.1665  2.9020
#> [2,] 0.197550  4.7305  7.1695  4.0020 0.22545  7.6990  2.3585  2.8580  5.9575
#>      91-94-1 92-87-5 95-80-7 95-95-4
#> [1,] 0.12925 0.76965  2.7530   4.841
#> [2,] 0.27775 1.54650  4.4495  10.270
#> 
#> 
#> $params
#> $params[[1]]
#>      100-02-7 101-14-4 101-77-9 119-90-4 120-80-9 123-31-9 133-06-2 51-28-5
#> [1,]   0.8238  0.06124   0.7793    6.609    1.010   0.3979    1.444   356.9
#> [2,]   1.1260  0.95920   2.3660    7.605    5.117   1.8530    3.150   178.1
#> [3,]   1.8370  0.10470   0.8396   10.430    2.435   0.1510    1.795  1399.0
#>      510-15-6 53-96-3 56-38-2 60-11-7 63-25-2 72-43-5 84-74-2 87-86-5 88-06-2
#> [1,]  0.11000   1.165   1.431  0.7901  0.5539   5.357  1.1010  0.4393  1.4390
#> [2,]  0.09643   2.633  31.360  1.4420  0.2334   6.828  0.4868  1.3520  0.8864
#> [3,]  0.42460  19.880   6.326  1.0920  0.0756   9.009  0.5308  1.3640  5.2510
#>      91-94-1 92-87-5 95-80-7 95-95-4
#> [1,]  0.2404  0.5090   2.229   2.146
#> [2,]  0.1858  2.8220   3.052   3.751
#> [3,]  0.2685  0.6775   2.209   7.199
#> 
#> $params[[2]]
#>      100-02-7 101-14-4 101-77-9 119-90-4 120-80-9 123-31-9 133-06-2 51-28-5
#> [1,]   1.0500   0.1408   0.6762    5.061   0.8233  0.15170    1.422  1173.0
#> [2,]   0.1945   0.1785   1.1770    9.531   0.8725  0.09678    2.590   111.7
#>      510-15-6 53-96-3 56-38-2 60-11-7 63-25-2 72-43-5 84-74-2 87-86-5 88-06-2
#> [1,]   0.1233   1.951   3.254   1.948 0.09279  13.480  0.7282   1.446   1.763
#> [2,]   0.3452   1.946   2.976   1.568 0.04178   3.347  1.4100   1.130   4.769
#>      91-94-1 92-87-5 95-80-7 95-95-4
#> [1,]  0.8614  3.5780   3.430   2.032
#> [2,]  0.1345  0.6172   4.645   7.406
#> 
#> 
#> $obesity
#> $obesity[[1]]
#>      100-02-7 101-14-4 101-77-9 119-90-4 120-80-9 123-31-9 133-06-2 51-28-5
#> [1,]   1.2430  0.28505    1.684    7.569   2.0180  0.40890   2.8845  132.45
#> [2,]   0.7438  0.16940    1.066    5.776   1.2325  0.23815   1.8485  102.65
#> [3,]   1.2430  0.28505    1.684    7.569   2.0180  0.40890   2.8845  132.45
#>      510-15-6 53-96-3 56-38-2 60-11-7 63-25-2 72-43-5 84-74-2 87-86-5 88-06-2
#> [1,] 0.152300  3.7560   5.587  3.0365  0.1912  6.3135   1.745   2.216  5.0340
#> [2,] 0.094245  2.2785   3.183  1.7825  0.1137  3.7345   1.027   1.345  2.9985
#> [3,] 0.152300  3.7560   5.587  3.0365  0.1912  6.3135   1.745   2.216  5.0340
#>      91-94-1 92-87-5 95-80-7 95-95-4
#> [1,] 0.22455 1.29000  3.8955   8.603
#> [2,] 0.13370 0.82155  2.9980   5.597
#> [3,] 0.22455 1.29000  3.8955   8.603
#> 
#> $obesity[[2]]
#>      100-02-7 101-14-4 101-77-9 119-90-4 120-80-9 123-31-9 133-06-2 51-28-5
#> [1,]   0.7438   0.1694    1.066    5.776   1.2325  0.23815   1.8485  102.65
#> [2,]   0.7438   0.1694    1.066    5.776   1.2325  0.23815   1.8485  102.65
#>      510-15-6 53-96-3 56-38-2 60-11-7 63-25-2 72-43-5 84-74-2 87-86-5 88-06-2
#> [1,] 0.094245  2.2785   3.183  1.7825  0.1137  3.7345   1.027   1.345  2.9985
#> [2,] 0.094245  2.2785   3.183  1.7825  0.1137  3.7345   1.027   1.345  2.9985
#>      91-94-1 92-87-5 95-80-7 95-95-4
#> [1,]  0.1337 0.82155   2.998   5.597
#> [2,]  0.1337 0.82155   2.998   5.597
#> 
#> 
#> $other
#> $other[[1]]
#> [1] 2.802 2.802 2.802
#> 
#> $other[[2]]
#> [1] 1.663 1.663
#> 
#>