Bob Rudis
8 年前
共有 3 個檔案被更改,包括 17 行新增 和 10 行删除
@ -1,6 +1,11 @@ |
|||
context("basic functionality") |
|||
test_that("we can do something", { |
|||
|
|||
#expect_that(some_function(), is_a("data.frame")) |
|||
expect_that(length(gdns::query("example.com")), equals(8)) |
|||
|
|||
doms <- c("example.com", "example.org", "example.net") |
|||
qry <- gdns::bulk_query(doms) |
|||
|
|||
expect_that(dim(qry), equals(c(3, 4))) |
|||
|
|||
}) |
|||
|
載入中…
新增問題並參考