Skip to content

Commit

Permalink
updated readme.Rmd
Browse files Browse the repository at this point in the history
  • Loading branch information
shanmdphd committed Aug 14, 2017
1 parent 85a49ec commit bc96531
Show file tree
Hide file tree
Showing 11 changed files with 156 additions and 153 deletions.
9 changes: 4 additions & 5 deletions README.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -12,7 +12,6 @@ editor_options:
library(knitr)
knitr::opts_chunk$set(fig.width=8, fig.height=4, dev = 'png', dpi = 150,
fig.path='assets/figures/', echo=TRUE, warning=FALSE, message=FALSE,
#cache=TRUE,
results = 'asis')
```

Expand Down Expand Up @@ -44,14 +43,14 @@ caffsim::caffDatasetMulti(Weight = 20, Dose = 200, N = 20, Tau = 12)
```{r}
library(caffsim)
MyDataset <- caffDataset(Weight = 20, Dose = 200, N = 20)
knitr::kable(head(MyDataset))
knitr::kable(head(MyDataset), format = 'markdown')
```

### Create a dataset for concentration-time curve

```{r}
MyConcTime <- caffConcTime(Weight = 20, Dose = 200, N = 20)
knitr::kable(head(MyConcTime))
knitr::kable(head(MyConcTime), format = 'markdown')
```

### Create a concentration-time curve
Expand Down Expand Up @@ -87,14 +86,14 @@ plot_grid(MyPlotPub[[1]], MyPlotPub[[2]],

```{r}
MyDatasetMulti <- caffDatasetMulti(Weight = 20, Dose = 200, N = 20, Tau = 12)
knitr::kable(head(MyDatasetMulti))
knitr::kable(head(MyDatasetMulti), format = 'markdown')
```

### Create a dataset for concentration-time curve

```{r}
MyConcTimeMulti <- caffConcTimeMulti(Weight = 20, Dose = 200, N = 20, Tau = 12, Repeat = 10)
knitr::kable(head(MyConcTimeMulti))
knitr::kable(head(MyConcTimeMulti), format = 'markdown')
```

### Create a concentration-time curve
Expand Down
76 changes: 40 additions & 36 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -31,36 +31,38 @@ caffsim::caffDatasetMulti(Weight = 20, Dose = 200, N = 20, Tau = 12)
```r
library(caffsim)
MyDataset <- caffDataset(Weight = 20, Dose = 200, N = 20)
knitr::kable(head(MyDataset))
knitr::kable(head(MyDataset), format = 'markdown')
```

Tmax Cmax AUC Half_life CL V Ka Ke
---------- ---------- ---------- ---------- --------- --------- ---------- ----------
0.7776109 10.567459 60.69779 3.396494 3.295013 16.14934 4.045327 0.2040339
0.5247960 9.923271 55.00315 3.457693 3.636156 18.14244 6.960282 0.2004227
0.6431633 10.418663 110.02141 6.857586 1.817828 17.98833 6.598512 0.1010560
0.7039204 13.833981 75.87181 3.274701 2.636025 12.45627 4.579301 0.2116224
0.3819273 11.308010 63.10853 3.592874 3.169144 16.43050 10.710281 0.1928818
0.9321291 11.589101 65.22935 3.184408 3.066104 14.08907 3.049987 0.2176228


| Tmax| Cmax| AUC| Half_life| CL| V| Ka| Ke|
|---------:|---------:|---------:|---------:|--------:|--------:|---------:|---------:|
| 1.0906131| 11.314388| 121.76524| 6.657688| 1.642505| 15.77963| 3.262995| 0.1040902|
| 0.5077390| 9.503155| 32.08079| 1.953896| 6.234261| 17.57734| 5.887948| 0.3546760|
| 0.5619410| 12.913824| 107.44157| 5.361767| 1.861477| 14.40232| 7.310243| 0.1292484|
| 0.8627242| 14.795723| 125.85073| 5.261418| 1.589184| 12.06546| 4.123528| 0.1317135|
| 1.9623962| 13.828196| 138.83715| 5.411751| 1.440537| 11.24939| 1.314898| 0.1280547|
| 0.3461002| 14.109070| 106.51535| 4.986041| 1.877664| 13.50954| 13.322522| 0.1389880|

### Create a dataset for concentration-time curve


```r
MyConcTime <- caffConcTime(Weight = 20, Dose = 200, N = 20)
knitr::kable(head(MyConcTime))
knitr::kable(head(MyConcTime), format = 'markdown')
```



Subject Time Conc
-------- ----- ---------
1 0.0 0.000000
1 0.1 1.916637
1 0.2 3.503230
1 0.3 4.812908
1 0.4 5.890289
1 0.5 6.772843
| Subject| Time| Conc|
|-------:|----:|---------:|
| 1| 0.0| 0.000000|
| 1| 0.1| 3.997178|
| 1| 0.2| 6.949478|
| 1| 0.3| 9.111235|
| 1| 0.4| 10.675216|
| 1| 0.5| 11.787516|

### Create a concentration-time curve

Expand Down Expand Up @@ -102,36 +104,38 @@ plot_grid(MyPlotPub[[1]], MyPlotPub[[2]],

```r
MyDatasetMulti <- caffDatasetMulti(Weight = 20, Dose = 200, N = 20, Tau = 12)
knitr::kable(head(MyDatasetMulti))
knitr::kable(head(MyDatasetMulti), format = 'markdown')
```

TmaxS CmaxS AUCS AI Aavss Cavss Cmaxss Cminss
---------- ---------- ---------- --------- ---------- ---------- --------- ---------
1.1182720 8.629289 63.93589 1.167687 102.84228 5.327991 12.07380 1.733873
0.7399023 18.149541 107.68076 1.107077 85.44083 8.973397 23.20571 2.244463
0.2484624 19.324724 105.66282 1.111206 86.70719 8.805235 22.52196 2.253929
1.0115241 15.295759 183.16914 1.499428 181.54300 15.264095 25.16186 8.380886
0.9198408 15.738922 137.56975 1.270960 129.13399 11.464146 22.51949 4.800999
3.4830363 10.609518 139.92981 1.352849 148.50802 11.660818 21.20090 5.529603


| TmaxS| CmaxS| AUCS| AI| Aavss| Cavss| Cmaxss| Cminss|
|---------:|---------:|---------:|--------:|---------:|---------:|--------:|--------:|
| 0.5271146| 12.484516| 79.03187| 1.143311| 96.10779| 6.585989| 15.63696| 1.960048|
| 1.8913324| 12.019455| 179.09764| 1.648569| 213.94066| 14.924803| 22.95346| 9.030201|
| 0.6318965| 10.665360| 98.51506| 1.328002| 142.72210| 8.209588| 15.24596| 3.765590|
| 3.1907127| 6.310865| 84.02889| 1.396045| 158.41622| 7.002408| 12.31609| 3.493959|
| 0.2903834| 11.633120| 71.39127| 1.146897| 97.11712| 5.949272| 14.02226| 1.795997|
| 1.1666484| 9.491114| 94.03967| 1.333555| 144.02132| 7.836639| 14.48238| 3.622403|

### Create a dataset for concentration-time curve


```r
MyConcTimeMulti <- caffConcTimeMulti(Weight = 20, Dose = 200, N = 20, Tau = 12, Repeat = 10)
knitr::kable(head(MyConcTimeMulti))
knitr::kable(head(MyConcTimeMulti), format = 'markdown')
```



Subject Time Conc
-------- ----- ---------
1 0.0 0.000000
1 0.2 5.077558
1 0.4 7.194572
1 0.6 7.995335
1 0.8 8.213161
1 1.0 8.175024
| Subject| Time| Conc|
|-------:|----:|--------:|
| 1| 0.0| 0.000000|
| 1| 0.2| 6.107943|
| 1| 0.4| 7.995832|
| 1| 0.6| 8.477541|
| 1| 0.8| 8.493149|
| 1| 1.0| 8.356661|

### Create a concentration-time curve

Expand Down
Binary file modified assets/figures/MyPlotMultiMyConcTimeMulti-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified assets/figures/MyPlotMultiPub-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified assets/figures/MyPlotMyConcTime-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified assets/figures/MyPlotPub-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified docs/assets/figures/MyPlotMultiMyConcTimeMulti-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified docs/assets/figures/MyPlotMultiPub-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified docs/assets/figures/MyPlotMyConcTime-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified docs/assets/figures/MyPlotPub-1.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Loading

0 comments on commit bc96531

Please sign in to comment.