Преобразовать Sys.time () в числовое и добавить в строку

Question

Я использовал as.numeric для преобразования Sys.time() в числовое значение и добавления к другой строке, просто чтобы создать имя файла с таким, как показано ниже

as.numeric(Sys.time())
[1] 1547099793

paste0('filename',as.numeric(Sys.time()),".csv")
[1] "filename1547100543.00219.csv"" #It adds decimals

Как получить результат как 'filename1547100543.csv' и присвоить переменную для создания файла с именем? что-то вроде ниже

newfile=paste0('filename',as.numeric(Sys.time()),".csv")
fwrite(dt,paste(path,newfile))

Answer 1

Попробуйте использовать round по системному времени, чтобы получить целое число:

paste0('filename',round(as.numeric(Sys.time())),".csv")

[1] "filename1547100986.csv"

Альтернатива : В соответствии с предложением @Ronak, используйте вместо этого функцию as.integer, чтобы вам не приходилось округлять ее до нулевого десятичного знака.

paste0('filename',as.integer(Sys.time()),".csv")
[1] "filename1547100986.csv"