diff --git a/fireInIceR/src/data_utils.R b/fireInIceR/src/data_utils.R
index 1e861cc47c0a865f3cc378c0fafcd96c900b1c39..5361f0e1ecfb78d46dcb2477043ccc594e565de8 100644
--- a/fireInIceR/src/data_utils.R
+++ b/fireInIceR/src/data_utils.R
@@ -1,6 +1,6 @@
 clean_input_data <- function(data_file) {
   data <- read_xlsx(data_file, na = c("<MDL", '--'))
-  names(data)<-make.names(names(data),unique = TRUE)
+  names(data) <- make.names(names(data),unique = TRUE)
   
   data <- data |>
     replace_na(list(Levoglucosan.in.picogram.per.milliliter..unfiltered. = 0,