diff options
author | Oscar D. Lara Yejas <odlaraye@oscars-mbp.attlocal.net> | 2016-03-10 17:10:23 -0800 |
---|---|---|
committer | Shivaram Venkataraman <shivaram@cs.berkeley.edu> | 2016-03-10 17:10:23 -0800 |
commit | 416e71af4d26e67afb715ea1d625341cdea4873d (patch) | |
tree | 2109a2378678fb3bbf797894c90b2a5c92fd4acb /R/pkg/inst/tests | |
parent | 88fa866620b85522bae2f71601cebb744c09ba7e (diff) | |
download | spark-416e71af4d26e67afb715ea1d625341cdea4873d.tar.gz spark-416e71af4d26e67afb715ea1d625341cdea4873d.tar.bz2 spark-416e71af4d26e67afb715ea1d625341cdea4873d.zip |
[SPARK-13327][SPARKR] Added parameter validations for colnames<-
Author: Oscar D. Lara Yejas <odlaraye@oscars-mbp.attlocal.net>
Author: Oscar D. Lara Yejas <odlaraye@oscars-mbp.usca.ibm.com>
Closes #11220 from olarayej/SPARK-13312-3.
Diffstat (limited to 'R/pkg/inst/tests')
-rw-r--r-- | R/pkg/inst/tests/testthat/test_sparkSQL.R | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/R/pkg/inst/tests/testthat/test_sparkSQL.R b/R/pkg/inst/tests/testthat/test_sparkSQL.R index 236bae6bde..cad5766812 100644 --- a/R/pkg/inst/tests/testthat/test_sparkSQL.R +++ b/R/pkg/inst/tests/testthat/test_sparkSQL.R @@ -691,6 +691,17 @@ test_that("names() colnames() set the column names", { colnames(df) <- c("col3", "col4") expect_equal(names(df)[1], "col3") + expect_error(colnames(df) <- c("sepal.length", "sepal_width"), + "Colum names cannot contain the '.' symbol.") + expect_error(colnames(df) <- c(1, 2), "Invalid column names.") + expect_error(colnames(df) <- c("a"), + "Column names must have the same length as the number of columns in the dataset.") + expect_error(colnames(df) <- c("1", NA), "Column names cannot be NA.") + + # Note: if this test is broken, remove check for "." character on colnames<- method + irisDF <- suppressWarnings(createDataFrame(sqlContext, iris)) + expect_equal(names(irisDF)[1], "Sepal_Length") + # Test base::colnames base::names m2 <- cbind(1, 1:4) expect_equal(colnames(m2, do.NULL = FALSE), c("col1", "col2")) |