mirror of
https://github.com/msberends/AMR.git
synced 2025-07-18 11:33:18 +02:00
(v0.7.1.9107) v0.8.0
This commit is contained in:
@ -22,6 +22,9 @@
|
||||
context("rsi.R")
|
||||
|
||||
test_that("rsi works", {
|
||||
|
||||
skip_on_cran()
|
||||
|
||||
expect_true(as.rsi("S") < as.rsi("I"))
|
||||
expect_true(as.rsi("I") < as.rsi("R"))
|
||||
expect_true(as.rsi("R") > as.rsi("S"))
|
||||
@ -56,6 +59,9 @@ test_that("rsi works", {
|
||||
})
|
||||
|
||||
test_that("mic2rsi works", {
|
||||
|
||||
skip_on_cran()
|
||||
|
||||
expect_equal(as.character(
|
||||
as.rsi(x = as.mic(0.125),
|
||||
mo = "B_STRPT_PNMN",
|
||||
@ -78,6 +84,9 @@ test_that("mic2rsi works", {
|
||||
})
|
||||
|
||||
test_that("disk2rsi works", {
|
||||
|
||||
skip_on_cran()
|
||||
|
||||
expect_equal(as.character(
|
||||
as.rsi(x = as.disk(22),
|
||||
mo = "B_STRPT_PNMN",
|
||||
|
Reference in New Issue
Block a user