Format rxSolve and related objects as html.
See also
Other Utilities:
rxDerived(),
rxGetDefaultSerialize(),
rxInv(),
rxIsCurrent(),
rxLock(),
rxNumLoaded(),
rxOmegaVarCovDeriv(),
rxSuppressMsg(),
rxSymInvChol(),
rxTempDir()
Examples
# \donttest{
if (requireNamespace("knitr", quietly = TRUE)) {
mod <- function() {
ini({
tcl <- log(3)
tv <- log(30)
})
model({
cl <- exp(tcl)
v <- exp(tv)
d/dt(central) <- -cl / v * central
cp <- central / v
})
}
s <- rxSolve(mod, et(amt = 100, cmt = "central") |> et(0:4))
rxHtml(s)
}
#>
#>
#> ℹ parameter labels from comments are typically ignored in non-interactive mode
#> ℹ Need to run with the source intact to parse comments
#>
#>
#> <style>
#> th,td{
#> padding:2px 5px 2px 5px;
#> }
#> </style><table style="border-radius: 10px 10px 10px 10px; -moz-border-radius: 10px 10px 10px 10px; -webkit-border-radius: 10px 10px 10px 10px; border: 5px solid #7b3e3e;"><tr><td style="text-align: center; padding: 5px;"><strong>Solved rxode2 object</strong></td><tr><td><strong>Parameters</strong> (<span style="color: Orange;"></span><strong "color: Blue;">$params</strong>):</td></tr><tr><td><table>
#> <thead>
#> <tr>
#> <th style="text-align:right;"> tcl </th>
#> <th style="text-align:right;"> tv </th>
#> </tr>
#> </thead>
#> <tbody>
#> <tr>
#> <td style="text-align:right;"> 1.098612 </td>
#> <td style="text-align:right;"> 3.401197 </td>
#> </tr>
#> </tbody>
#> </table></td></tr><tr><td><strong>Initial Conditions</strong> (<span style="color: Orange;"> </span><strong "color: Blue;">$inits</strong>):</td></tr><tr><td>| central| |-------:| | 0|<strong>First part of data (object):</strong><table>
#> <thead>
#> <tr>
#> <th style="text-align:right;"> time </th>
#> <th style="text-align:right;"> cl </th>
#> <th style="text-align:right;"> v </th>
#> <th style="text-align:right;"> cp </th>
#> <th style="text-align:right;"> central </th>
#> </tr>
#> </thead>
#> <tbody>
#> <tr>
#> <td style="text-align:right;"> 0 </td>
#> <td style="text-align:right;"> 3 </td>
#> <td style="text-align:right;"> 30 </td>
#> <td style="text-align:right;"> 3.333333 </td>
#> <td style="text-align:right;"> 100.00000 </td>
#> </tr>
#> <tr>
#> <td style="text-align:right;"> 1 </td>
#> <td style="text-align:right;"> 3 </td>
#> <td style="text-align:right;"> 30 </td>
#> <td style="text-align:right;"> 3.016128 </td>
#> <td style="text-align:right;"> 90.48383 </td>
#> </tr>
#> <tr>
#> <td style="text-align:right;"> 2 </td>
#> <td style="text-align:right;"> 3 </td>
#> <td style="text-align:right;"> 30 </td>
#> <td style="text-align:right;"> 2.729105 </td>
#> <td style="text-align:right;"> 81.87316 </td>
#> </tr>
#> <tr>
#> <td style="text-align:right;"> 3 </td>
#> <td style="text-align:right;"> 3 </td>
#> <td style="text-align:right;"> 30 </td>
#> <td style="text-align:right;"> 2.469397 </td>
#> <td style="text-align:right;"> 74.08191 </td>
#> </tr>
#> <tr>
#> <td style="text-align:right;"> 4 </td>
#> <td style="text-align:right;"> 3 </td>
#> <td style="text-align:right;"> 30 </td>
#> <td style="text-align:right;"> 2.234402 </td>
#> <td style="text-align:right;"> 67.03206 </td>
#> </tr>
#> </tbody>
#> </table></td></tr></table>
# }
