Skip to content
This repository was archived by the owner on May 14, 2018. It is now read-only.

Commit a6d95cb

Browse files
committed
Updated slack notifications
1 parent 837c0e8 commit a6d95cb

File tree

4 files changed

+24
-24
lines changed

4 files changed

+24
-24
lines changed

.travis.yml

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,11 @@
11
language: c
2-
script: ./travis-tool.sh run_tests
2+
script: "./travis-tool.sh run_tests"
33
before_script:
44
- curl -OL http://raw.github.com/craigcitro/r-travis/master/scripts/travis-tool.sh
55
- chmod 755 ./travis-tool.sh
66
- sudo apt-get update
7-
- ./travis-tool.sh bootstrap
8-
- ./travis-tool.sh install_deps
9-
- ./travis-tool.sh install_r
7+
- "./travis-tool.sh bootstrap"
8+
- "./travis-tool.sh install_deps - ./travis-tool.sh install_r"
109
notifications:
11-
slack: ropensci:wh30e1MP9Am3wXb2wJx1ZRFi
10+
slack:
11+
secure: CtaG0vSsFMQfxVtrmnW/5ZRD3EC4OFg1n6EyGx5KvQIUkZatVBC6DxPiPTtBxuh6QrrlV02ATNZtisdFt3BgqOBhfO07ZFd0Kcsvd50JASxDQHUvwM2Ru1E97p/MTWpsuRAzCKWTysbaXCXCA996NMu81P3JqpCgrMHFPYlYACU=

NAMESPACE

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -2,6 +2,7 @@
22

33
export(browse_dat)
44
export(detect_outliers)
5+
export(find_NA)
56
export(fix_NA)
67
export(fix_date_continuity)
78
export(is.count)
@@ -10,6 +11,7 @@ export(sanitize_text)
1011
export(test_NA)
1112
export(test_continuous_date)
1213
export(test_datecol)
14+
export(test_for_NA)
1315
export(test_lat)
1416
export(test_long)
1517
export(test_utf8)

R/test_NA.R

Lines changed: 17 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5,7 +5,7 @@
55
#' @param dat input dataset. Currently only supports \code{data.frame} but will soon support \code{data.table}
66
#' @export
77
#' @references 2 Ethan P. White, Elita Baldridge, Zachary T. Brym, Kenneth J. Locey, Daniel J. McGlinn, and 3 and Sarah R. Supp. 1 Nine simple ways to make it easier to (re)use your data. PeerJ PrePrints. , doi: 10.7287/peerj.preprints.7v2
8-
test_NA <- function(dat) {
8+
test_for_NA <- function(dat) {
99
if (!is(dat, "data.frame")) {
1010
stop("Can only test data.frames at this time")
1111
}
@@ -41,3 +41,19 @@ test_NA <- function(dat) {
4141
stringsAsFactors = FALSE
4242
))
4343
}
44+
45+
#noRd
46+
#' @export
47+
test_NA <- function(...) {
48+
z <- test_for_NA(...)
49+
return(ifelse(nrow(z) ==0, TRUE, FALSE))
50+
}
51+
52+
53+
#noRd
54+
#' @export
55+
find_NA <- function(...) {
56+
z <- test_for_NA(...)
57+
return(z)
58+
}
59+

man/test_NA.Rd

Lines changed: 0 additions & 18 deletions
This file was deleted.

0 commit comments

Comments
 (0)