tests/testthat/test-currentWeather.R

context("Current weather")

test_that("ByCityName works.", {
  
  place <- "Tokyo,Japan"
  current.weather <- getCurrentWeatherByCityName(place)
  
  expect_equal(current.weather$name, "Tokyo")
  
})
teramonagi/rOpenWeatherMap documentation built on May 31, 2019, 8:38 a.m.