R/rem.R

rem <-
function(a, b){
  if (b>0){
  n = floor(a/b)
  a - n*b 
 }
}
galuardi/hmmwoa documentation built on May 16, 2019, 5:37 p.m.