In ajwtech/pfsrsdk: Functions for interacting with Platform for Science APIs

knitr::opts_chunk$set(echo = FALSE, warning = FALSE)

Introduction

This document lists the test results for pfsrsdk from automated testing on Jenkins.

Test Results

library(testthat)
testResultsFiles <- list.files("../build/tests", ".Rds", full.names = TRUE)
testResults <- data.frame()

if(!length(testResultsFiles) == 0) {
  for (x in testResultsFiles) {
    testResults <- rbind(testResults, as.data.frame(readRDS(x)))
  }
  tr <- subset(testResults[order(testResults$context),], select = -c(file))
  knitr::kable(tr, row.names = FALSE, longtable = TRUE, font_size = 7)
} else {
  print("Test results failed to output; therefore, this package cannot be validated.")
}