remove trail whit space

Author: Mukulyadav2004

R/fwrite.R

@@ -27,7 +27,7 @@ fwrite = function(x, file="", append=FALSE, quote="auto",
   buffMB = as.integer(buffMB)
   nThread = as.integer(nThread)
   compressLevel = as.integer(compressLevel)
-           
+
   # write.csv default is 'double' so fwrite follows suit. write.table's default is 'escape'
   # validate arguments
   if (is.matrix(x)) { # coerce to data.table if input object is matrix
@@ -42,14 +42,14 @@ fwrite = function(x, file="", append=FALSE, quote="auto",
   }
   # Handle select argument using .shallow()
   if (!null(select)) {
-    cols = colnamesInt(x, select)         
+    cols = colnamesInt(x, select) 
     if (is.data.table(x)) {
       x = .shallow(x, cols)
     } else {
       x = x[select]
     }
   }
-           
+
   stopifnot(
     is.list(x),
     identical(quote,"auto") || isTRUEorFALSE(quote),