diff --git a/R/families.R b/R/families.R
index d1c453d6..706cbaad 100644
--- a/R/families.R
+++ b/R/families.R
@@ -349,7 +349,7 @@ family_to_mgcvfam = function(family){
   } else if(family$family == 'student'){
     gaussian()
   } else if(family$family == 'lognormal'){
-    mgcv::Tweedie(p = 1.5, link = 'identity')
+    gaussian()
   } else if(family$family == 'tweedie'){
     mgcv::Tweedie(p = 1.5, link = 'log')
   } else {
diff --git a/R/gp.R b/R/gp.R
index 7cfebf79..e28e3f73 100644
--- a/R/gp.R
+++ b/R/gp.R
@@ -603,7 +603,8 @@ prep_gp_covariate = function(data,
 #' Clean GP names so no illegal characters are used in Stan code
 #' @noRd
 clean_gpnames = function(gp_names){
-  gp_names_clean <- gsub('(', '_', gp_names, fixed = TRUE)
+  gp_names_clean <- gsub(' ', '_', gp_names, fixed = TRUE)
+  gp_names_clean <- gsub('(', '_', gp_names_clean, fixed = TRUE)
   gp_names_clean <- gsub(')', '_', gp_names_clean, fixed = TRUE)
   gp_names_clean <- gsub(':', 'by', gp_names_clean, fixed = TRUE)
   gp_names_clean <- gsub('.', '_', gp_names_clean, fixed = TRUE)
diff --git a/src/RcppExports.o b/src/RcppExports.o
index 849c29a4..3738bd53 100644
Binary files a/src/RcppExports.o and b/src/RcppExports.o differ
diff --git a/src/mvgam.dll b/src/mvgam.dll
index 662ebc28..2161ca82 100644
Binary files a/src/mvgam.dll and b/src/mvgam.dll differ
diff --git a/src/trend_funs.o b/src/trend_funs.o
index faf098a5..371ea49f 100644
Binary files a/src/trend_funs.o and b/src/trend_funs.o differ
diff --git a/tests/testthat/Rplots.pdf b/tests/testthat/Rplots.pdf
index 192c4208..fa7aa8e7 100644
Binary files a/tests/testthat/Rplots.pdf and b/tests/testthat/Rplots.pdf differ