diff --git a/DESCRIPTION b/DESCRIPTION index 38cca8d..47170d2 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: rBAPS Title: Bayesian Analysis of Population Structure -Version: 0.0.0.9014 +Version: 0.0.0.9015 Date: 2020-11-09 Authors@R: c( diff --git a/R/dec2bitv.R b/R/dec2bitv.R index 2124936..db680a8 100644 --- a/R/dec2bitv.R +++ b/R/dec2bitv.R @@ -10,7 +10,7 @@ dec2bitv <- function(d, n) { d <- d[] f <- e <- NA - c(f, e) <- log2(max(d)) # How many digits do we need to represent the numbers? + c(f, e) <- matlab2r::log2(max(d)) # How many digits do we need to represent the numbers? bits <- floor(d * 2 ^ (seq(1 - max(n, e), 0))) %% 2 return(bits) }