2017-12-11 6 views
0

Period変数に任意の分数を追加したいと思います。分要素が59を超えるたびにhour要素を更新したいと思います。次の操作では、この構文を使用した最初の例ではうまく機能しますが、後者の場合は、それはしていません:分の合計が59Mを超えた場合、lubridateオブジェクトの時間要素を更新するにはどうすればよいですか?

library(lubridate) 
hm_example <- hm("17:49") 

hm_example + minutes(10) 
# [1] "17H 59M 0S" 

hm_example + minutes(100) 
# [1] "17H 149M 0S" 

後者の場合、私は19H 29M 0Sとして結果をしたいと思います。私はパッケージのドキュメントを見てきましたが、私はこれのための代替案を見つけることができませんでした。それを修正するために、潤滑剤からのネイティブオプションがありますか?

私はバージョン1.7.1のlubridateパッケージを使用しています。

答えて

2

少しトリックで、引数はroll = TRUEで可能です。

temp <- hm_example + minutes(100) 

hms(temp, roll = TRUE) 
#[1] "19H 29M 0S" 
+0

本当に「as.character」は必要ありません。 – LyzandeR

+0

あなたは 'hms'を使用している時、あなたは正しいです。 'hm'は' as.character'がなければ動作しません。それはあなたに 'NA'を与えます。 –

関連する問題