tweak to 'append_data'

kingaa · Dec 30, 2024 · e2a0fd5 · e2a0fd5
1 parent f777c46
commit e2a0fd5
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: pomp
 Type: Package
 Title: Statistical Inference for Partially Observed Markov Processes
-Version: 6.0.4.0
-Date: 2024-12-29
+Version: 6.0.4.1
+Date: 2024-12-30
 Authors@R: c(person(given=c("Aaron","A."),family="King",role=c("aut","cre"),email="[email protected]",comment=c(ORCID="0000-0001-6159-3207")),
 	  person(given=c("Edward","L."),family="Ionides",role="aut",comment=c(ORCID="0000-0002-4190-0174"))	,
 	  person(given="Carles",family="Bretó",role="aut",comment=c(ORCID="0000-0003-4695-4902")),

diff --git a/R/bake.R b/R/bake.R
@@ -363,9 +363,9 @@ append_data <- function (
       )
     }
     fwrite(data,file=file)
+    invisible(fread(file=file))
   },
   error=function (e) {
     pStop(who="append_data",conditionMessage(e))
   })
-  invisible(data)
 }