fix tests

Author: gravesti

R/generics.R

@@ -47,7 +47,7 @@ summary.TE_data_prep_sep <- function(object, ...) {
 
   n_files <- length(object$data)
   cat("Expanded data saved in ", n_files, " csv file", if (n_files > 1) "s" else "", ":\n", sep = "")
-  print(data.table(data = object$data), topn = 3, nrows = 5, col.names = "none", ...)
+  print(data.table(data = object$data), topn = 3, nrows = 5, col.names = "none", class = FALSE, ...)
   cat("\n\n")
   NextMethod()
 }

tests/testthat/_snaps/generics.md

@@ -123,22 +123,24 @@
     Output
       Expanded Trial Emulation data
       
-              id trial_period followup_time outcome weight treatment X1
-         1:    1            0             0       0  1.000         1  1
-         2:    1            0             1       0  1.011         1  1
-         3:    1            0             2       0  0.994         1  1
-        ---                                                            
-      9474: 1000            0             7       0  0.821         1  0
-      9475: 1000            0             8       0  0.761         1  0
-      9476: 1000            0             9       1  0.698         1  0
-            assigned_treatment dose
-         1:                  1    1
-         2:                  1    2
-         3:                  1    3
-        ---                        
-      9474:                  1    8
-      9475:                  1    9
-      9476:                  1   10
+               id trial_period followup_time outcome weight treatment    X1
+            <int>        <int>         <int>   <num>  <num>     <num> <num>
+         1:     1            0             0       0  1.000         1     1
+         2:     1            0             1       0  1.011         1     1
+         3:     1            0             2       0  0.994         1     1
+        ---                                                                
+      9474:  1000            0             7       0  0.821         1     0
+      9475:  1000            0             8       0  0.761         1     0
+      9476:  1000            0             9       1  0.698         1     0
+            assigned_treatment  dose
+                         <num> <num>
+         1:                  1     1
+         2:                  1     2
+         3:                  1     3
+        ---                         
+      9474:                  1     8
+      9475:                  1     9
+      9476:                  1    10
       
       Number of observations in expanded data: 9476 
       First trial period: 0