In Blocktt/MIEGLEtools: Michigan EGLE IBI Calculator

knitr::opts_chunk$set(echo = FALSE
                      , results = 'asis'
                      , warning = FALSE
                      , message = FALSE)

A single zip file will be available for download. It will include all result files, reference files, and the original input data file. All result data files will be CSV format, unless otherwise noted.

The zip file will included the base name of the original file along with the date and time.

The individual files and their contents are output in three subfolders. Each output file is described in the table below.

# Packages
library(readxl)
library(knitr)
library(dplyr)
library(kableExtra)

# Data
fn_data <- "OutputFileSubtabs.xlsx"
path_data <- file.path("files", fn_data)
df_data <- read_excel(path_data, sheet = "Calc_IBI")

# Display
options(knitr.kable.NA = '')
df_data %>%
  kable() %>%
  kable_styling(full_width = F, position = "left") %>%
  row_spec(0, extra_css = "border-top: 2px solid black; border-bottom: 1px solid black;") %>%
  row_spec(1:(nrow(df_data) - 1), extra_css = "border-bottom: 1px solid black;") %>%
  row_spec(nrow(df_data), bold = TRUE, color = "#33A39E", extra_css = "border-bottom: 2px solid black;")