R 如何创建一个以1分钟为间隔的28小时时钟表?
我不太熟悉使用循环。我正在尝试创建如下表: 00:00 00:01 00:02 ... 27:58 27:59 28:00 它适用于运行到第二天的数据,但仍被视为原始日期的一部分 我试过这个:R 如何创建一个以1分钟为间隔的28小时时钟表?,r,time,sequence,hour,minute,R,Time,Sequence,Hour,Minute,我不太熟悉使用循环。我正在尝试创建如下表: 00:00 00:01 00:02 ... 27:58 27:59 28:00 它适用于运行到第二天的数据,但仍被视为原始日期的一部分 我试过这个: hh<-c(seq('00','28',1)) mm<-c(seq('01','60',1)) for (i in (1:29)) { int<-paste(hh[i],":",mm) } View(int) hh您可以在outer的帮助下执行此操作: t
hh<-c(seq('00','28',1))
mm<-c(seq('01','60',1))
for (i in (1:29)) {
int<-paste(hh[i],":",mm)
}
View(int)
hh您可以在outer
的帮助下执行此操作:
times <- c(t(outer(sprintf('%02d', 0:27),sprintf('%02d', 0:59),paste,sep = ":")))
#add the last time manually
times <- c(times, '28:00')
head(times, 8)
#[1] "00:00" "00:01" "00:02" "00:03" "00:04" "00:05" "00:06" "00:07"
tail(times, 8)
#[1] "27:53" "27:54" "27:55" "27:56" "27:57" "27:58" "27:59" "28:00"
时代这对我来说也很有效:
hh<-c(seq('00','28',1))
mm<-c(seq('00','59',1))
library(stringr)
hh<-str_pad(hh, 2,pad="0")
mm<-str_pad(mm, 2,pad="0")
times<-c(sapply(hh, paste, sep=":",mm))
View(times)
hh还将gsub(“”,'0',times)
或类似的内容,因为对于数字,用前导零填充字段宽度。对于角色来说,这个零在某些平台上起作用,而在其他平台上则被忽略。
我似乎有所进展。我试过:``` int