RosettaCodeData/Task/File-size/R/file-size.r

3 lines
93 B
R

sizeinwd <- file.info('input.txt')[["size"]]
sizeinroot <- file.info('/input.txt')[["size"]]