https://github.com/cran/pracma
Raw File
Tip revision: a850b1ad48fcaac7a21cb289147c932e23b23acb authored by HwB on 15 July 2011, 00:00:00 UTC
version 0.7-3
Tip revision: a850b1a
modinv.R
##
##  m o d i n v . R  tests
##

modinv <- pracma::modinv

Modinv <- Vectorize(modinv, 'n')
all.equal(Modinv(1:10, 11), c(1, 6, 4, 3, 9, 2, 8, 7, 5, 10))
back to top