kkholst / targeted

Compare 8cfbfa2 ... +0 ... e6ca493

Showing 1 of 1 files from the diff.

@@ -82,10 +82,13 @@
Loading
82 82
##' ## a <- riskreg(y ~ a, target=~z, nuisance=~x,  propensity=~x, data=d, type="rr")
83 83
##' a <- riskreg(y ~ a | z, nuisance=~x,  propensity=~x, data=d, type="rr")
84 84
##' a
85 +
##' predict(a, d[1:5,])
85 86
##'
86 87
##' riskreg(y ~ a, nuisance=~x,  data=d, type="rr", mle=TRUE)
87 88
##'
88 89
##'
90 +
##'
91 +
##'
89 92
riskreg <- function(formula,
90 93
             nuisance=~1,
91 94
             propensity=~1,
@@ -356,6 +359,9 @@
Loading
356 359
  if (missing(X))
357 360
    X <- with(object, update(des.nuisance, newdata)$x)
358 361
  p <- coef(object)
362 +
  if (tolower(object$estimator)!="mle") {
363 +
    p <- coef(object$mle)
364 +
  }
359 365
  ##nx <- NCOL(object$nuisance$x)
360 366
  ##nz <- NCOL(object$target$x)
361 367
  pz <- p[seq_len(ncol(Z))]

Everything is accounted for!

No changes detected that need to be reviewed.
What changes does Codecov check for?
Lines, not adjusted in diff, that have changed coverage data.
Files that introduced coverage data that had none before.
Files that have missing coverage data that once were tracked.
Files Coverage
R -0.05% 49.05%
inst/include 35.71%
src 43.47%
Project Totals (40 files) 47.39%
Loading