Von Neumann test for randomness

This function performs the Von Neumann

vonNeumann.test(sequence)

Arguments

sequence	Sequence of data

Value

A list with pvalues for alternative hypothesis, statistics, method and data name

Examples

 vonNeumann.test(c(23,99,89,36,1,64,14,28,2,81))
#> $data.name
#> [1] "c(23, 99, 89, 36, 1, 64, 14, 28, 2, 81)"
#> 
#> $statistic
#>         NM        RVN 
#> 172.000000   2.084848 
#> 
#> $p.value
#>        Exact Left Tail       Exact Right Tail            Double Tail 
#>              1.0000000              1.0000000              1.0000000 
#>   Asymptotic Left Tail  Asymptotic Right Tail Asymptotic Double Tail 
#>              0.5579902              0.4420098              0.8840196 
#> 
#> $method
#> [1] "Von Neumann"
#>