fix #400

r-geoflow · Nov 30, 2024 · e4b54be · e4b54be
1 parent 81bc97e
commit e4b54be
Show file tree

Hide file tree

Showing 4 changed files with 7 additions and 0 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -33,6 +33,7 @@ Imports:
   R6, 
   methods,
   dotenv,
+  benchmarkme,
   httr,
   jsonlite,
   XML,

diff --git a/NAMESPACE b/NAMESPACE
@@ -112,6 +112,8 @@ import(sf)
 import(uuid)
 import(xml2)
 importFrom(R6,R6Class)
+importFrom(benchmarkme,get_cpu)
+importFrom(benchmarkme,get_ram)
 importFrom(curl,curl_fetch_memory)
 importFrom(png,readPNG)
 importFrom(terra,rast)

diff --git a/R/geoflow.R b/R/geoflow.R
@@ -13,6 +13,8 @@
 #' @importFrom utils head
 #' @importFrom utils tail
 #' @importFrom utils download.file
+#' @importFrom benchmarkme get_ram
+#' @importFrom benchmarkme get_cpu
 #' @importFrom zip zipr
 #' @importFrom png readPNG
 #' @importFrom curl curl_fetch_memory

diff --git a/R/initWorkflow.R b/R/initWorkflow.R
@@ -39,6 +39,8 @@ initWorkflow <- function(file, dir = ".", jobDirPath = NULL, handleMetadata = TR
   cat("Session info\n")
   config$log_separator("=")
   print(sessionInfo())
+  print(paste("* RAM:", round(benchmarkme::get_ram()/1e9,1),"GB"))
+  print(paste("* CPU:", benchmarkme::get_cpu()$no_of_cores,"cores"))
   config$log_separator("=")
   cat("Workflow initialization\n")
   config$log_separator("=")
-Original file line number
+Diff line change
@@ Expand Up / @@ -33,6 +33,7 @@ Imports: @@
       R6,
       methods,
       dotenv,
+      benchmarkme,
       httr,
       jsonlite,
       XML,
@@ Expand Down @@