Phép trừ lubridate chỉ trả về giá trị số

Question

Tôi có một biến được gọi là Started là ngày mà đối tượng con người đăng ký vào nghiên cứu và một biến khác gọi là dos1 là ngày mà chủ đề cuối cùng được phẫu thuật. Tôi muốn làm việc trong bao nhiêu tháng kể từ lần phẫu thuật cuối cùng của họ đến ngày ghi danh. Tôi cố gắng:

as.period(syrrupan$Started-syrrupan$dos1,units=c("month")) 

tôi mong đợi này để cung cấp cho tôi một cái gì đó như:

14, 18, 1, 26 

Với mỗi số là số tháng.

Thay vào đó tôi nhận được:

1 year, -4 months, -5 days and -1 hours 1 year, -5 months, -23 days and -1 hours 1 year, -7 months, 2 days and -1 hours 1 year, -8 months, -28 days and 1 hour 1 year, -7 months, -23 days and 1 hour. 

Làm thế nào tôi có thể nhận được chỉ là những giá trị số của tháng?

Answer 1

Bạn có thể thử sử dụng difftime thay vào đó, ví dụ:

difftime(syrrupan$Started,syrrupan$dos1,units="days") 

Lưu ý rằng điều này sẽ cung cấp cho bạn một đối tượng của lớp difftime, nếu bạn muốn có một vector số, quấn một as.numeric xung quanh nó. Cũng lưu ý rằng bạn không thể chọn tháng làm tùy chọn cho các đơn vị, nhưng bạn thực sự nên gắn bó với một đơn vị thời gian có độ dài cố định.

Answer 2

Đó chắc chắn là lỗi trong lubridate. Tôi đã thực hiện một báo cáo lỗi và sẽ sửa chữa nó cho phiên bản 0.1:

http://github.com/hadley/lubridate/issues#issue/75

Cảm ơn vì đã mang nó đến sự chú ý của tôi.