https://github.com/cran/pracma
Raw File
Tip revision: 3f1c6b45c918375fc2b65bb2a7d6e3590979cb61 authored by HwB on 12 December 2011, 00:00:00 UTC
version 0.9.1
Tip revision: 3f1c6b4
primroot.R
##
##  p r i m r o o t . R  Test suite
##


modpower <- pracma::modpower
modorder <- pracma::modorder
primroot <- pracma::primroot

modpower
identical(modpower(3, 0, 4), 1)
identical(modpower(3, 1, 1), 0)
identical(modpower(3, 100, 17), 13)
identical(modpower(0, 3, 4), 0)

identical(primroot(71), 7L)
identical(modorder(7, 71), 70)
back to top