R/refine.R
In menghaomiao/itrrnr: Alternative Individual Treatment Recommendation
Defines functions
refine
refine=function(inner, delta) {
rule=matrix(0, nrow(inner), ncol(inner))
rule[inner>=delta]=1
ind=rowSums(rule)==0
if (sum(ind)>0) rule[ind, ][inner[ind, ]>=-delta]=1
return(rule)
}
menghaomiao/itrrnr documentation built on June 21, 2020, 2:22 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 refine
refine=function(inner, delta) {
rule=matrix(0, nrow(inner), ncol(inner))
rule[inner>=delta]=1
ind=rowSums(rule)==0
if (sum(ind)>0) rule[ind, ][inner[ind, ]>=-delta]=1
return(rule)
}
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.