From 6fad435bf176a6078644701b3198e2e7d10dce32 Mon Sep 17 00:00:00 2001 From: Felix Cheung Date: Wed, 15 Feb 2017 19:26:48 -0800 Subject: [PATCH 1/3] fix test --- R/pkg/inst/tests/testthat/test_sparkSQL.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/pkg/inst/tests/testthat/test_sparkSQL.R b/R/pkg/inst/tests/testthat/test_sparkSQL.R index 0447d2470d467..95cf75b3a0273 100644 --- a/R/pkg/inst/tests/testthat/test_sparkSQL.R +++ b/R/pkg/inst/tests/testthat/test_sparkSQL.R @@ -1229,8 +1229,8 @@ test_that("column functions", { c17 <- cov(c, c1) + cov("c", "c1") + covar_samp(c, c1) + covar_samp("c", "c1") c18 <- covar_pop(c, c1) + covar_pop("c", "c1") c19 <- spark_partition_id() + coalesce(c) + coalesce(c1, c2, c3) - c20 <- to_timestamp(c) + to_timestamp(c, "yyyy") + to_date(c, "yyyy") - + c20 <- to_timestamp(c) + # Test if base::is.nan() is exposed expect_equal(is.nan(c("a", "b")), c(FALSE, FALSE)) From c6855076c43c3383e2fadfaf89af00a21ffed70f Mon Sep 17 00:00:00 2001 From: Felix Cheung Date: Wed, 15 Feb 2017 19:37:22 -0800 Subject: [PATCH 2/3] fix whitespace inserted by editor --- R/pkg/inst/tests/testthat/test_sparkSQL.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/pkg/inst/tests/testthat/test_sparkSQL.R b/R/pkg/inst/tests/testthat/test_sparkSQL.R index 95cf75b3a0273..2d026d2dc9159 100644 --- a/R/pkg/inst/tests/testthat/test_sparkSQL.R +++ b/R/pkg/inst/tests/testthat/test_sparkSQL.R @@ -1230,7 +1230,7 @@ test_that("column functions", { c18 <- covar_pop(c, c1) + covar_pop("c", "c1") c19 <- spark_partition_id() + coalesce(c) + coalesce(c1, c2, c3) c20 <- to_timestamp(c) - + # Test if base::is.nan() is exposed expect_equal(is.nan(c("a", "b")), c(FALSE, FALSE)) From 2b98d749167442995fe28b4c5fe8b8220ce22643 Mon Sep 17 00:00:00 2001 From: Felix Cheung Date: Wed, 15 Feb 2017 20:45:52 -0800 Subject: [PATCH 3/3] one more time --- R/pkg/inst/tests/testthat/test_sparkSQL.R | 1 - 1 file changed, 1 deletion(-) diff --git a/R/pkg/inst/tests/testthat/test_sparkSQL.R b/R/pkg/inst/tests/testthat/test_sparkSQL.R index 2d026d2dc9159..d9dd0f3e14de8 100644 --- a/R/pkg/inst/tests/testthat/test_sparkSQL.R +++ b/R/pkg/inst/tests/testthat/test_sparkSQL.R @@ -1229,7 +1229,6 @@ test_that("column functions", { c17 <- cov(c, c1) + cov("c", "c1") + covar_samp(c, c1) + covar_samp("c", "c1") c18 <- covar_pop(c, c1) + covar_pop("c", "c1") c19 <- spark_partition_id() + coalesce(c) + coalesce(c1, c2, c3) - c20 <- to_timestamp(c) # Test if base::is.nan() is exposed expect_equal(is.nan(c("a", "b")), c(FALSE, FALSE))