Fix fixed_design_lf() example

Author: jdblischak

R/fixed_design_lf.R

@@ -46,7 +46,7 @@
 #' x %>% summary()
 #'
 #' # Example 2: given sample size and compute power
-#' x <- fixed_design_fh(
+#' x <- fixed_design_lf(
 #'   alpha = .025,
 #'   enroll_rate = define_enroll_rate(duration = 18, rate = 20),
 #'   fail_rate = define_fail_rate(