diff --git a/invivos/app.R b/invivos/app.R
index c4da854..46d7037 100755
--- a/invivos/app.R
+++ b/invivos/app.R
@@ -336,7 +336,7 @@ server <- function(input, output) {
         )
         dtemplate<-template
       }
-      write.xlsx(dtemplate,file)
+      write.xlsx(list("Measures"=dtemplate, "Groups"=NULL,"Sex"=NULL), "test.xlsx")
     }
   )