tests: format all in files with air for comparion

Author: lorenzwalthert

tests/testthat/alignment/cols-with-one-row-in.R

@@ -1,16 +1,27 @@
 c(
-  "x",       "z",
-  "cgjhg", "thi", "z"
+  "x",
+  "z",
+  "cgjhg",
+  "thi",
+  "z"
 )
 
-
 c(
-  "x",       "z",
-  "cgjhg",  "thi", "z"
+  "x",
+  "z",
+  "cgjhg",
+  "thi",
+  "z"
 )
 
-
 c(
-  "x", "y", "z",  "m", "n",  "o", "p",
-  "c", "d"
+  "x",
+  "y",
+  "z",
+  "m",
+  "n",
+  "o",
+  "p",
+  "c",
+  "d"
 )

tests/testthat/alignment/fun-decs-in.R

@@ -1,38 +1,27 @@
 # aligned
-function(x   = NULL,
-         tt  = NULL,
-         ayz = NULL) {}
-
+function(x = NULL, tt = NULL, ayz = NULL) {
+}
 
 # aligned
-k <- function(x   = NULL,
-              aq  = NULL,
-              ayz = NULL) {}
-
+k <- function(x = NULL, aq = NULL, ayz = NULL) {
+}
 
 # aligned, eq right
-function(x   =  2,
-         tt  =  1,
-         ayz = 99) {}
+function(x = 2, tt = 1, ayz = 99) {
+}
 
 # aligned, eq left
-function(x =    2,
-         tt =   1,
-         ayz = 99) {}
-
+function(x = 2, tt = 1, ayz = 99) {
+}
 
 # not aligned
-k <- function(x =   fish,
-              aq =     21,
-              ayz = t(322)) {}
+k <- function(x = fish, aq = 21, ayz = t(322)) {
+}
 
 # aligned
-k <- function(x = flus(we),
-              aq =  x - 22, k = 22,
-              ayz = m(jk5), xfea =  3) {}
-
+k <- function(x = flus(we), aq = x - 22, k = 22, ayz = m(jk5), xfea = 3) {
+}
 
 # aligned
-k <- function(x = flus(we),
-              aq =  x - 22,    k = 22,
-              ayz = m(jk5), xfea =  3) {}
+k <- function(x = flus(we), aq = x - 22, k = 22, ayz = m(jk5), xfea = 3) {
+}