From e542450760d68890d21b0b3f104518a30a16bab8 Mon Sep 17 00:00:00 2001
From: Mitsuo Shiota <48662507+mitsuoxv@users.noreply.github.com>
Date: Thu, 9 Nov 2023 12:06:09 +0900
Subject: [PATCH] better to follow the good practice in 26.3.3 Common use cases
 (#1493)

---
 iteration.qmd | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/iteration.qmd b/iteration.qmd
index 63e3282..1fc133a 100644
--- a/iteration.qmd
+++ b/iteration.qmd
@@ -310,7 +310,8 @@ summarize_means <- function(df, summary_vars = where(is.numeric)) {
   df |> 
     summarize(
       across({{ summary_vars }}, \(x) mean(x, na.rm = TRUE)),
-      n = n()
+      n = n(),
+      .groups = "drop"
     )
 }
 diamonds |>