将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"