連続した数値データを時刻形式に変換するR

Question

列tのデータフレームは、周波数10Hzのデータセットの最初の点からの累積時間差（秒）で構成されています。どのように私は分：秒形式でR時間に変換することができますので、ggplotsに表示されます。 x軸に5分ごとに目盛りを表示し、00:00、05:00、10:00などに対応する時刻を表示します。

例：

# t columns is in seconds, thus 2000 seconds makes 33.33 minutes 
# Last tick value on the x axis I will show is 30:00 
d1 = 10 + runif(n = 5000) 
d2 = 20 + runif(n = 5000) 
d3 = 30 + runif(n = 5000) 
d4 = 40 + runif(n = 5001) 
d = c(d1,d2,d3,d4) 
t = seq(0, 2000, by = 0.1) 
DF = data.frame(t = t, d = d) 
ggplot(data = DF, aes(x = t, y = d)) + geom_line() 

は、あなたが数時間前から（コメントを含む）この質問/答えをチェックアウトする場合があります第二部については

Answer 1

私はそれが良いだろうと思いますdifftimeでダミー日付付きのPOSIXctクラスに値を変換します。

DF$min_sec <- as.POSIXct("2016-01-01") + as.difftime(DF$t, unit="secs") 

ggplot(DF, aes(x = min_sec, y = d)) + geom_point() + 
    scale_x_datetime(date_breaks = "5 min", date_labels = "%M:%S", minor_breaks=NULL) 

Answer 2

DF = data.frame(t = seq(0, 2000, by = 0.1), data = runif(n = 20001)) 

DF$t <- lubridate::ms(DF$t) 

、ありがとうございました。彼はまったく同じ質問をしました。

R: Aggregating time series data returns NA

私はこのような5分ごとに自分のデータを集計：その後、彼はこのようにそれをプロットしたと述べた

library(xts) 
    mydata <- read.csv("data.csv") 
    times  <- mydata$Time 
    X   <- as.POSIXct(times) 
    X   <- as.xts(X) 
    period.apply(mydata$T1, INDEX = endpoints(X, "minutes", 5), function(x) mean(x, na.rm=T)) 

：

DataTable <- table(cut(data, breaks="5 mins"))