Single_ERT"

In IOHanalyzer: Data Analysis Part of 'IOHprofiler'

knitr::opts_chunk$set(echo = FALSE)
dsl_sub <- subset(dsl, DIM == dim && funcId == fid && algId %in% algs)
name <- get_data_id(dsl_sub)
tryCatch(
  {
  fv_min <- as.numeric(REG$ERTPlot.Min[name])
  if (is.na(fv_min)) fv_min <- NULL
  fv_max <- as.numeric(REG$ERTPlot.Max[name])
  if (is.na(fv_max)) fv_max <- NULL
},
error = function(e) {
    fv_min <- NULL
    fv_max <- NULL
  }
)
p <- Plot.RT.Single_Func(dsl_sub, Fstart = fv_min, Fstop = fv_max,
                         show.CI = input$ERTPlot.show.CI,
                         show.ERT = input$ERTPlot.show.ERT,
                         show.mean = input$ERTPlot.show.mean,
                         show.median = input$ERTPlot.show.median,
                         scale.xlog = input$ERTPlot.semilogx,
                         scale.ylog = input$ERTPlot.semilogy,
                         scale.reverse = !attr(dsl_sub[[1]],'maximization'))
save_plotly(p, paste0('ERT_single_F', fid, '-', dim, 'D.pdf'), 'pdf', width = 1000, height = 500)

ERT plot of Fr paste(fid) on r paste(dim)D

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

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