Use native pipe

hughjonesd · Jul 1, 2024 · cbb3a7f · cbb3a7f
1 parent 3dc1141
commit cbb3a7f
Show file tree

Hide file tree

Showing 2 changed files with 104 additions and 104 deletions.
diff --git a/docs/huxreg.Rmd b/docs/huxreg.Rmd
@@ -96,11 +96,11 @@ huxtable commands.
 ```{r}
 suppressPackageStartupMessages(library(dplyr))
 
-diamond_regs %>% 
+diamond_regs |> 
       map_background_color(-1, -1, by_regex(
         "\\*" = "yellow"
-      )) %>% 
-      set_italic(final(1), 1) %>% 
+      )) |> 
+      set_italic(final(1), 1) |> 
       set_caption("Linear regressions of diamond prices")
 
 ```
@@ -141,8 +141,8 @@ from your models by `broom::glance`:
 ```{r}
 gl <- as_hux(broom::glance(lm1))
 
-gl %>% 
-      restack_down(cols = 3, on_remainder = "fill") %>% 
+gl |> 
+      restack_down(cols = 3, on_remainder = "fill") |> 
       set_bold(odds, everywhere)
 ```