Update create_virtualenv.R

Signed-off-by: Jessica Ikechukwu <Jessica.Ikechukwu@uwe.ac.uk>

Author: JessUWE

R/create_virtualenv.R

@@ -15,19 +15,20 @@ install_acro <- function(envname = "r-acro", python = NULL, ...) {
     python <- Sys.which("python3")
     if (python == "") {
       python <- Sys.which("python")
-    }
-    if (python == "") {
-      stop("Python not found in PATH. Please ensure Python is installed and accessible.")
+      if (python == "") {
+        stop("Python not found in PATH. Please ensure Python is installed and accessible.")
+      }
     }
   }
-
+  
   # create Python virtual environment
   reticulate::virtualenv_create(
     envname = envname,
     python = python,
     force = TRUE,
     packages = NULL
   )
+  
   # install Python acro
   reticulate::py_install(acro_package, envname = envname)
 }
@@ -43,11 +44,12 @@ create_virtualenv <- function(...) {
   if (python_path == "") {
     python_path <- Sys.which("python")
   }
-
+  
   # ensure a virtual environment exists
   if (!reticulate::virtualenv_exists(acro_venv)) {
     install_acro(envname = acro_venv, python = python_path)
   }
+  
   # activate virtual environment
   reticulate::use_virtualenv(acro_venv, required = TRUE)
 }