DSP Project first push, date: 29/01/2026

r_scripts/data_summary.R

@@ -0,0 +1,18 @@
+# r_scripts/data_summary.R
+# This script is a simple version for testing the PHP runner.
+
+args <- commandArgs(trailingOnly = TRUE)
+data_file_path <- args[1]
+params_json <- args[2]
+
+# Just print the received arguments to confirm they are passed correctly.
+cat(jsonlite::toJSON(
+  list(
+    message = "R script ran successfully!",
+    data_file = data_file_path,
+    params_received = params_json
+  ),
+  pretty = TRUE,
+  auto_unbox = TRUE
+))
+