This commit is contained in:
agdamsbo 2018-10-04 12:07:23 +02:00
parent 76dd8a4ce7
commit 85b404c646
2 changed files with 2 additions and 2 deletions

View File

@ -5,6 +5,7 @@
#' @param v1 Main variable in model
#' @param string String of columnnames from dataframe to include. Use dput().
#' @keywords change-in-estimate
#' @export
#' @examples
#' l<-5
#' y<-factor(rep(c("a","b"),l))
@ -15,7 +16,6 @@
#' d<-data.frame(y,x,v1,v2,v3)
#' preds<-dput(names(d)[3:ncol(d)])
#' cie_test(meas="y",vars="x",string=preds,data=d,logistic = TRUE,cut = 0.1)
#' @export
cie_test<-function(meas,vars,string,data,logistic=FALSE,cut=0.1){

View File

@ -7,6 +7,7 @@
#' @param ci flag to get results as OR with 95% confidence interval.
#' @param data data frame to pull variables from.
#' @keywords logistic regression
#' @export
#' @examples
#' l<-5
#' y<-factor(rep(c("a","b"),l))
@ -17,7 +18,6 @@
#' d<-data.frame(y,x,v1,v2,v3)
#' preds<-dput(names(d)[3:ncol(d)])
#' rep_glm(meas="y",vars="x",string=preds,ci=FALSE,data=df)
#' @export
rep_glm<-function(meas,vars,string,ci=FALSE,data){
## x is data.frame of predictors, y is vector of an aoutcome as a factor