fix typos

MalteKurz · MalteKurz · commit 9ec108b224ed · 2021-05-25T15:01:41.000+02:00
diff --git a/R/double_ml.R b/R/double_ml.R
@@ -737,12 +737,12 @@ DoubleML = R6Class("DoubleML",
     #' a `matrix()` with adjusted p_values.
     p_adjust = function(method = "romano-wolf", return_matrix = TRUE) {
       if (all(is.na(self$coef))) {
-        stop("apply fit() before p_adust().")
+        stop("apply fit() before p_adjust().")
       }
 
       if (tolower(method) %in% c("rw", "romano-wolf")) {
         if (is.null(self$boot_t_stat) | all(is.na(self$coef))) {
-          stop("apply fit() & bootstrap() before p_adust().")
+          stop("apply fit() & bootstrap() before p_adjust().")
         }
         k = self$data$n_treat
         pinit = p_val_corrected = vector(mode = "numeric", length = k)

Original file line number	Diff line number	Diff line change
`@@ -737,12 +737,12 @@ DoubleML = R6Class("DoubleML",`
`737`	`737`	#' a `matrix()` with adjusted p_values.
`738`	`738`	`p_adjust = function(method = "romano-wolf", return_matrix = TRUE) {`
`739`	`739`	`if (all(is.na(self$coef))) {`
`740`		`- stop("apply fit() before p_adust().")`
	`740`	`+ stop("apply fit() before p_adjust().")`
`741`	`741`	`}`
`742`	`742`
`743`	`743`	`if (tolower(method) %in% c("rw", "romano-wolf")) {`
`744`	`744`	`if (is.null(self$boot_t_stat) \| all(is.na(self$coef))) {`
`745`		`- stop("apply fit() & bootstrap() before p_adust().")`
	`745`	`+ stop("apply fit() & bootstrap() before p_adjust().")`
`746`	`746`	`}`
`747`	`747`	`k = self$data$n_treat`
`748`	`748`	`pinit = p_val_corrected = vector(mode = "numeric", length = k)`