add file.size()

yihui · Aug 2, 2024 · 8b33c3d · 8b33c3d
1 parent 3c27d8e
commit 8b33c3d
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -369,3 +369,6 @@ if (!exists('trimws', baseenv(), inherits = TRUE)) trimws = function(x, which =
   r = c(both = '^\\s+|\\s+$', right = '\\s+$', left = '^\\s+')[which]
   gsub(r, '', x)
 }
+if (!exists('file.size', baseenv(), inherits = TRUE)) file.size = function(...) {
+  file.info(...)$size
+}