RT_Histogram"

knitr::opts_chunk$set(echo = FALSE)
dsl_sub <- subset(dsl, DIM == dim && funcId == fid && algId %in% algs)
name <- get_data_id(dsl_sub)
fvs <- get_funvals(dsl_sub)
tryCatch(
  {
  ftarget <- as.numeric(REG$RTPMF.Hist.Target[name])
  if (is.null(ftarget) || is.na(ftarget)) ftarget <- median(fvs)
},
error = function(e) {
    ftarget <- median(fvs)
  }
)
p <- Plot.RT.Histogram(dsl_sub, ftarget = ftarget, plot_mode = input$RTPMF.Hist.Mode, 
                      use.equal.bins = input$RTPMF.Hist.Equal)
save_plotly(p, paste0('RT_Hist_F', fid, '-', dim, 'D.pdf'), 'pdf', width = 1000, height = 500)

Histogram of hitting times of Fr paste(fid) on r paste(dim)D at runtime r paste(ftarget)

r}, results='asis', fig.align='center', fig.cap="TEsting", fig.width=500, fig.height=300, fig.pos='!hbt'} include_graphics(paste0('RT_Hist_F', fid, '-', dim, 'D.pdf'))



Try the IOHanalyzer package in your browser

Any scripts or data that you put into this service are public.

IOHanalyzer documentation built on Sept. 20, 2023, 5:07 p.m.