tests/testthat/test_build.R

In Sage-Bionetworks/PythonEmbedInR: Use an embedded Python from Within R

context("test build")

test_that("python version is 3.6.8", {
  pyExec('import platform')
  expect_equal('3.6.8', pyGet('platform.python_version()'))
})

test_that("pip can be imported", {
  pyImport('pip')
  pyImport('ssl')
  expect_match(pyGet('ssl.OPENSSL_VERSION'), 'OpenSSL')
})

test_that("other package can be installed", {
  testPackage<-'ggplot2'
  try(remove.packages(testPackage), silent=T)
  install.packages(testPackage, repos='http://cran.fhcrc.org/')
  library(testPackage, character.only=T)
})