From 73aa183a03d4c840e67f5ecbecd2ceb51807f605 Mon Sep 17 00:00:00 2001
From: muschellij2 <muschellij2@gmail.com>
Date: Thu, 2 Jan 2020 19:15:39 -0500
Subject: [PATCH] added check for 1 img

---
 R/image_func.R | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/R/image_func.R b/R/image_func.R
index 37bd231..1582617 100644
--- a/R/image_func.R
+++ b/R/image_func.R
@@ -222,6 +222,9 @@ stat_img = function(
         res_list[[icol]] = x
         rm(list = "x");
       }
+      if (num_imgs == 1 && length(res_list) == 1) {
+        res_list = res_list[[1]]
+      }      
       res_img = res_list
       rm(list = "res_list");
     }