From cf82f6d132364852552b3b20dd2559cf3593e15d Mon Sep 17 00:00:00 2001
From: Rasmus Hammar <Rasmus.Hammar@gmx.com>
Date: Tue, 3 Oct 2023 20:36:54 +0200
Subject: [PATCH] Cleanup

---
 R/Fic.R | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/R/Fic.R b/R/Fic.R
index 5e12908..766072d 100644
--- a/R/Fic.R
+++ b/R/Fic.R
@@ -741,8 +741,8 @@ ras.Fic_workflow <- function(source = c("Waters","Sciex"),
     df_protCell,
     df_protHom
     ) %>% ras.Fic_collect_variables()
-  # Calculations ----
 
+  # Calculations ----
   df_calc <- df_calc %>%
     ras.Fic_Fu.hom(Buffer = {{name_buffer}},
                    Homogenate = {{name_DiluteHom}},
@@ -776,9 +776,11 @@ ras.Fic_workflow <- function(source = c("Waters","Sciex"),
   df_calc <- df_calc %>%
     ras.Fic_Fic(Fu.cell = "fucell",
                 Kp = "Kp")
+
   # Write df_calc to file ----
   f <- paste0(Sys.Date()," Fic calculations.xlsx")
   readr::write_excel_csv(df_calc,
                          f)
+
   return(df_calc)
 }