Description Usage Arguments Value Examples
This is intended for application to the tables which get attached
to Cpe
instances after invocation of the $trace_paths()
method.
But any table with columns named pid
, t1
and t2
suffices.
1 |
perftab |
A performance table with columns:
|
... |
Optional parameters passed along to |
FUN |
A function for summarizing all workers' duty cycles |
layout |
Trellis layout, passed to |
An xyplot
with a duty-cycle panel for each worker,
plus an overall average
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | if (interactive()) {
## Example from Braun2020
d1_maxn <- 5
cum_maxn <- 10
mod <- Crm$new(skeleton = c(0.03, 0.11, 0.25, 0.42, 0.58, 0.71),
scale = 0.85, # aka 'sigma'
target = 0.25)$
no_skip_esc(TRUE)$ # compare Braun's 'restrict = T'
no_skip_deesc(FALSE)$
stop_func(function(x) {
enrolled <- tabulate(x$level, nbins = length(x$prior))
x$stop <- enrolled[1] >= d1_maxn || max(enrolled) >= cum_maxn
x
})
mod$trace_paths(1, rep(2, 13), unroll = 4
, mc.cores = parallelly::availableCores(omit=2))
print(mod$performance)
plot_dutycycle(mod$performance)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.