Implement as.data.frame generic to allow View to work (#134)

mini-pw · Sep 19, 2024 · 180ba93 · 180ba93
1 parent 7e91bf3
commit 180ba93
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -1,5 +1,6 @@
 # Generated by roxygen2: do not edit by hand
 
+S3method(as.data.frame,Plate)
 S3method(predict,Model)
 S3method(summary,Plate)
 export(PlateBuilder)

diff --git a/R/classes-plate.R b/R/classes-plate.R
@@ -440,3 +440,8 @@ Plate <- R6::R6Class(
 summary.Plate <- function(object, ...) {
   object$summary(...)
 }
+
+#' @export
+as.data.frame.Plate <- function(x, row.names, optional, ...) {
+  x$get_data("ALL", "ALL")
+}