https://github.com/cran/pracma
Tip revision: 84a50252b184200bc6328ef733b7f94da0b64e4b authored by Hans W. Borchers on 29 May 2016, 21:34:12 UTC
version 1.9.3
version 1.9.3
Tip revision: 84a5025
find.R
##
## f i n d . R tests
##
finds <- pracma::finds
v <- c(3, 2, 1, 1, 2, 3)
identical(finds(v == 1), c(3L, 4L))
v <- c(1, 0, 4, -3, 0, 0, 0, 8, 6)
identical(finds(v), as.integer(c(1, 3, 4, 8, 9)))
identical(finds(v > 2), c(3L, 8L, 9L))
identical(finds(c()), integer(0))
identical(finds(c(TRUE, FALSE, TRUE, FALSE, TRUE)), c(1L, 3L, 5L))