tests/testthat/test_ssh.R

context("ssh")

test_that("The SSH URL is made", {
  skip_on_cran()
  ## won't open browser on travis
  sshurl <- gce_ssh_browser("mc-server")
  
  expect_equal(sshurl, "https://ssh.cloud.google.com/projects/mark-edmondson-gde/zones/europe-west1-b/instances/mc-server?projectNumber=mark-edmondson-gde")
})

Try the googleComputeEngineR package in your browser

Any scripts or data that you put into this service are public.

googleComputeEngineR documentation built on May 6, 2019, 1:01 a.m.