R/ba.R
In jmsigner/steppingstone:
Defines functions
ba
#' @export
ba <- function(x, y) {
r1 <- x[]
r2 <- y[]
r1 <- r1 / sum(r1)
r2 <- r2 / sum(r2)
## bhattacharyya's afinity
sum(sqrt(r1 * r2))
}
jmsigner/steppingstone documentation built on May 27, 2019, 7:26 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions ba
#' @export
ba <- function(x, y) {
r1 <- x[]
r2 <- y[]
r1 <- r1 / sum(r1)
r2 <- r2 / sum(r2)
## bhattacharyya's afinity
sum(sqrt(r1 * r2))
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.