From 5e0a0b797c622a8cc9a53f14dec26b4e68a81a36 Mon Sep 17 00:00:00 2001
From: Bryce Mecum <petridish@gmail.com>
Date: Fri, 7 Oct 2022 18:04:58 -0800
Subject: [PATCH] Remove now-unneeded ungroup() call

No longer needed thanks to https://github.com/apache/arrow/pull/14160/ and @eitsupi's work
---
 r/tests/testthat/test-dplyr-arrange.R | 1 -
 1 file changed, 1 deletion(-)

diff --git a/r/tests/testthat/test-dplyr-arrange.R b/r/tests/testthat/test-dplyr-arrange.R
index e4452991dc760..3444e3ace5f22 100644
--- a/r/tests/testthat/test-dplyr-arrange.R
+++ b/r/tests/testthat/test-dplyr-arrange.R
@@ -118,7 +118,6 @@ test_that("arrange() on integer, double, and character columns", {
     .input %>%
       group_by(grp) %>%
       arrange(.by_group = TRUE) %>%
-      ungroup() %>%
       pull(grp) %>%
       as.vector(),
     tbl