adapt tests

Author: lorenzwalthert

tests/testthat/strict/non_strict-in.R

@@ -140,3 +140,4 @@ lm(a~b+c,data=NA)
 lm(a~.-1,data=NA)
 a~b:c
 a~b :c
+a   ~   b  : c

tests/testthat/strict/non_strict-in_tree

@@ -135,7 +135,8 @@ test <- function() {
 
 
 # formula
-lm(a~b + c, data = NA)
-lm(a~. - 1, data = NA)
-a~b:c
-a~b:c
+lm(a ~ b + c, data = NA)
+lm(a ~ . - 1, data = NA)
+a ~ b:c
+a ~ b:c
+a   ~   b:c

tests/testthat/strict/non_strict-out.R

@@ -139,4 +139,5 @@ test <- function() {
 lm(a~b+c,data=NA)
 lm(a~.-1,data=NA)
 a~b:c
+a   ~   b  : c
 a~b :c

tests/testthat/strict/strict-in.R

@@ -140,7 +140,8 @@ test <- function() {
 
 
 # formula
-lm(a~b + c, data = NA)
-lm(a~. - 1, data = NA)
-a~b:c
-a~b:c
+lm(a ~ b + c, data = NA)
+lm(a ~ . - 1, data = NA)
+a ~ b:c
+a ~ b:c
+a ~ b:c