From b4c2974a0e3a301573c0f4c7fcaba03d77922a5b Mon Sep 17 00:00:00 2001
From: "Alec L. Robitaille" <robit.alec@gmail.com>
Date: Thu, 3 Oct 2024 14:42:05 -0300
Subject: [PATCH] test returns data.table

---
 tests/testthat/test-centroid-group.R | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/tests/testthat/test-centroid-group.R b/tests/testthat/test-centroid-group.R
index d4c213de..5784de0c 100644
--- a/tests/testthat/test-centroid-group.R
+++ b/tests/testthat/test-centroid-group.R
@@ -67,3 +67,7 @@ test_that('two columns added to the result DT', {
   expect_equal(ncol(copyDT) + 2,
                ncol(centroid_group(DT, coords = coords)))
 })
+
+test_that('returns a data.table', {
+  expect_s3_class(centroid_group(DT, coords = coords), 'data.table')
+})