001、 start <-Sys.time()## 记录时间Sys.sleep(70)## 程序运行end<-Sys.time()## 记录时间difftime(end, start, units="sec")## 以秒表示difftime(end, start, units="min")## 以分钟表示 difftime(end, start, units = "hour")## 以小时表示 002、 start <-proc.time()## 记录系统时间Sys...
1、 start <-Sys.time()## 记录Sys.sleep(20)## 停止20send<-Sys.time()## 记录elapse<- end -start## 计算print(elapse)## 打印 2、 start <-Sys.time() Sys.sleep(70) end<-Sys.time() elapse<- end -start print(elapse)## 自动转换时间输出格式 3、写入文件 start <-Sys.time() Sys.s...