Nothing
R/setFlagCompensation.R
In SimBindProfiles: Similar Binding Profiles
Defines functions
setFlagCompensation
setFlagCompensation <- function(x, cutoff) {
ws <- 0
ws <- ifelse(x[,4] == 1 & x[,5] == 1 & x[,6] == 0 & (((x[,1]+x[,2])/2 - x[,3]) >= cutoff),1,ws) # 1,1,0
}
Try the SimBindProfiles package in your browser
Any scripts or data that you put into this service are public.
SimBindProfiles documentation built on Nov. 8, 2020, 5:57 p.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 setFlagCompensation
setFlagCompensation <- function(x, cutoff) {
ws <- 0
ws <- ifelse(x[,4] == 1 & x[,5] == 1 & x[,6] == 0 & (((x[,1]+x[,2])/2 - x[,3]) >= cutoff),1,ws) # 1,1,0
}
Try the SimBindProfiles package in your browser
Any scripts or data that you put into this service are public.
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.