inst/unitTests/test_acc.R

test_acc = function() {
    p   = 8    # p is the scales number
    n   = 200  # n is the amino acid number
    lag = 7    # the lag paramter
    mat = matrix(rnorm(p * n), nrow = p, ncol = n)
    checkEquals(length(acc(mat, lag)), 448L)
}

Try the Rcpi package in your browser

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

Rcpi documentation built on Nov. 24, 2018, 6 p.m.