Update test_kit.R

2005m · Oct 26, 2022 · 2de3b68 · 2de3b68
1 parent 3dce4dc
commit 2de3b68
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/test_kit.R b/tests/test_kit.R
@@ -1784,12 +1784,12 @@ check("0028.004", plast(y, z, x), base_plast(y, z, x))
 check("0028.005", pfirst(x1, y1, z1), base_pfirst(x1, y1, z1))
 check("0028.006", plast(x1, y1, z1), base_plast(x1, y1, z1))
 check("0028.007", pfirst(y1, z1, x1), base_pfirst(y1, z1, x1))
-check("0024.008", plast(y1, z1, x1), base_plast(y1, z1, x1))
+check("0028.008", plast(y1, z1, x1), base_plast(y1, z1, x1))
 
 check("0028.009", pfirst(list(x1, y1, z1)), base_pfirst(list(x1, y1, z1)))
 check("0028.010", plast(list(x1, y1, z1)), base_plast(list(x1, y1, z1)))
 check("0028.011", pfirst(data.frame(y1, z1, x1)), base_pfirst(data.frame(y1, z1, x1)))
-check("0024.012", plast(data.frame(y1, z1, x1)), base_plast(data.frame(y1, z1, x1)))
+check("0028.012", plast(data.frame(y1, z1, x1)), base_plast(data.frame(y1, z1, x1)))
 
 check("0028.013", pfirst(list(1, NULL), list(NULL, 2)), list(1, 2))
 check("0028.014", plast(list(1, NULL), list(NULL, 2)), list(1, 2))