tests/testthat/testSim.R

set.seed(2345)

test_that("Track simulation", {
	expect_equal(nrow(brownianTrack(100,1)), 101)
	expect_equal(meanTurningAngle(beaucheminTrack(1000,p.persist=1)), 0)
} )

Try the MotilityLab package in your browser

Any scripts or data that you put into this service are public.

MotilityLab documentation built on May 31, 2017, 5:19 a.m.