knitr::opts_chunk$set(echo = TRUE)
result_df <- params$df
result_df$lowest_p <- format(result_df$lowest_p, digits = 2)
result_df$highest_p <- format(result_df$highest_p, digits = 2)

create_link <- function(text, link)
  return(paste0("[", text, "]", "(", link, ")"))

knitr::kable(result_df, align = "c", table.caption.prefix ="")


egeulgen/pathfindr documentation built on Feb. 20, 2025, 4:30 p.m.