simclem {crossrun}

Check of joint probabilities by simulations

Description

Simulation of a sequence of n=2m observations around the median in the sequence. To be used for checking the results of crossrunem.

Usage

simclem(m1 = 7, nsim = 1e+05)

Arguments

m1

half the sequence length

nsim

number of simulations

Value

data frame with cs, number of crossings and ls, longest run in the simulations.

Examples

simclem14 <- simclem(nsim=sum(joint14em))
print(table(simclem14)) # joint distributions in the simulations
print(joint14em) # for comparison