Merge branch 'quick-fix' into develop
This commit is contained in:
commit
7c7b4c5322
2 changed files with 2 additions and 2 deletions
|
|
@ -1,6 +1,6 @@
|
||||||
Package: rBAPS
|
Package: rBAPS
|
||||||
Title: Bayesian Analysis of Population Structure
|
Title: Bayesian Analysis of Population Structure
|
||||||
Version: 0.0.0.9014
|
Version: 0.0.0.9015
|
||||||
Date: 2020-11-09
|
Date: 2020-11-09
|
||||||
Authors@R:
|
Authors@R:
|
||||||
c(
|
c(
|
||||||
|
|
|
||||||
|
|
@ -10,7 +10,7 @@ dec2bitv <- function(d, n) {
|
||||||
d <- d[]
|
d <- d[]
|
||||||
|
|
||||||
f <- e <- NA
|
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
|
bits <- floor(d * 2 ^ (seq(1 - max(n, e), 0))) %% 2
|
||||||
return(bits)
|
return(bits)
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue