We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent e8643bf commit 70de494Copy full SHA for 70de494
tests/testthat/test-rollMean.R
@@ -1,6 +1,6 @@
1
test_that("roll_mean works", {
2
# example 1
3
- expect_equal(roll_mean(1:10,2), c(1,1.5:9))
+ expect_equal(roll_mean(1:10,2), c(1,1.5:9.5))
4
# dummy with all equal values
5
expect_equal(roll_mean(rep(1,100), k = 2), rep(1,100))
6
})
0 commit comments