/ / RとRの1つの列の時間/分

R - rの1列の時間と分

私は単純なデータフレームを持っています。 そこから時間(24時間表示の時間と分)を記録する別の列を追加します。私はその後、変数に対してこの列をグラフにします。日付はすべて同じなので、私は時間にしか興味がありません。これはこれまで私が試したことです。

a <- c(1:6)
b <- c("05/12/2012 05:00","05/12/2012 06:55","05/12/2012 07:10",
"05/12/2012 10:23", "05/12/2012 11:43","05/12/2012 13:04")
c <-c("0","0","0","1","1","1")
df1 <- data.frame(a,b,c,stringsAsFactors = FALSE)

a <- df1$a
b <- strptime(df1$b, "%d/%m/%Y %H:%M")
c <- as.numeric(df1$c)
hour <- as.numeric(format(b, "%H"))
min <- as.numeric(format(b, "%M"))
date <- format(b, "%x")
time <- hour + min

df2 <- data.frame(a, b, c, hour, min, date, time)

私はアドバイスを受けた ここに 数を分割して同様の単位に変換して追加することで分と時間を手動で変換します。しかし、私は午前5時には単に5としてインポートされるように苦労しています。

どのように私がこれを適切に行うかを誰かに助言できるなら、私はそれを非常に感謝します。

回答:

回答№1は4

日付と時間のための多数の変換ツール、および使用するパッケージ全体があります。私は仕事が好きです POSIXlt この場合は、必要な情報をリストから抽出するだけで抽出できます。

例えば:

a <- c(1:6)
b <- c("05/12/2012 05:00","05/12/2012 06:55","05/12/2012 07:10",
"05/12/2012 10:23", "05/12/2012 11:43","05/12/2012 13:04")
c <-c("0","0","0","1","1","1")
df1 <- data.frame(a,b,c,stringsAsFactors = FALSE)

df2 <- within(df1,{
posb <- as.POSIXlt(b,format="%d/%m/%Y %H:%M")
hours <- posb$hour
mins <- posb$min
dates <- format(posb, "%x")
time <- format(posb, "%H:%M")
posb <- NULL  # cleanup
})

それは与える:

> df2
a                b c  time     dates mins hours
1 1 05/12/2012 05:00 0 05:00 12/5/2012    0     5
2 2 05/12/2012 06:55 0 06:55 12/5/2012   55     6
3 3 05/12/2012 07:10 0 07:10 12/5/2012   10     7
4 4 05/12/2012 10:23 1 10:23 12/5/2012   23    10
5 5 05/12/2012 11:43 1 11:43 12/5/2012   43    11
6 6 05/12/2012 13:04 1 13:04 12/5/2012    4    13

詳細については、以下を参照してください。

  • ?POSIXlt POSIXtクラスの詳細はこちら
  • ?format 書式設定オプションの詳細については
  • ?strptime 書式設定オプションと文字への変換の詳細については
  • その lubridate パッケージ 代替機能のための
  • その timeDate パッケージ さらに多くの代替機能
  • ...