This commit is contained in:
agdamsbo 2018-10-04 12:40:22 +02:00
parent fca077fd40
commit 25c126360e
2 changed files with 2 additions and 18 deletions

View File

@ -17,14 +17,6 @@ cie_test(meas, vars, string, data, logistic = FALSE, cut = 0.1)
For bivariate analyses. From "Modeling and variable selection in epidemiologic analysis." - S. Greenland, 1989.
}
\examples{
l<-5
y<-factor(rep(c("a","b"),l))
x<-rnorm(length(y), mean=50, sd=10)
v1<-factor(rep(c("r","s"),length(y)/2))
v2<-as.numeric(sample(1:100, length(y), replace=FALSE))
v3<-as.numeric(1:length(y))
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)
cie_test()
}
\keyword{change-in-estimate}

View File

@ -21,15 +21,7 @@ rep_glm(meas, vars, string, ci = FALSE, data)
For bivariate analyses. The confint() function is rather slow, causing the whole function to hang when including many predictors and calculating the ORs with CI.
}
\examples{
l<-5
y<-factor(rep(c("a","b"),l))
x<-rnorm(length(y), mean=50, sd=10)
v1<-factor(rep(c("r","s"),length(y)/2))
v2<-sample(1:100, length(y), replace=FALSE)
v3<-as.numeric(1:length(y))
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)
rep_glm()
}
\keyword{logistic}
\keyword{regression}