我是一名有用的助手,可以为您进行文本翻译。以下是您需要翻译的内容:
这可以给我提供“以天为单位的时间差”。
这是我第一个问题的核心:如何将这个差异转换成年份和月份(四舍五入到月)?(例如4.7、4.11等)
我已经阅读了 difftime 和 format 的 man 文档,但是仍然没有搞明白。
非常感谢您的帮助。
此外,我想要融合我的最终对象。如果我尝试使用 melt 命令对上面的数据框进行融合,则会出现以下情况:
我收到了一个我之前从未见过的奇怪警告。
所以,我的第二个问题是; 我如何创建一个时间差异,可以与我的
我正在处理一些时间数据,但在将时间差转换为年份和月份时遇到了问题。
我的数据大致如下:
dfn <- data.frame(
Today = Sys.time(),
DOB = seq(as.POSIXct('2007-03-27 00:00:01'), len= 26, by="3 day"),
Patient = factor(1:26, labels = LETTERS))
首先,我要从今天的日期 (Today
) 中减去出生日期 (DOB
) 的数据。
dfn$ageToday <- dfn$Today - dfn$DOB
这可以给我提供“以天为单位的时间差”。
dfn$ageToday
Time differences in days
[1] 1875.866 1872.866 1869.866 1866.866 1863.866
[6] 1860.866 1857.866 1854.866 1851.866 1848.866
[11] 1845.866 1842.866 1839.866 1836.866 1833.866
[16] 1830.866 1827.866 1824.866 1821.866 1818.866
[21] 1815.866 1812.866 1809.866 1806.866 1803.866
[26] 1800.866
attr(,"tzone")
[1] ""
这是我第一个问题的核心:如何将这个差异转换成年份和月份(四舍五入到月)?(例如4.7、4.11等)
我已经阅读了 difftime 和 format 的 man 文档,但是仍然没有搞明白。
非常感谢您的帮助。
此外,我想要融合我的最终对象。如果我尝试使用 melt 命令对上面的数据框进行融合,则会出现以下情况:
require(plyr)
require(reshape)
mdfn <- melt(dfn, id=c('Patient'))
我收到了一个我之前从未见过的奇怪警告。
Error in as.POSIXct.default(value) :
do not know how to convert 'value' to class "POSIXct"
所以,我的第二个问题是; 我如何创建一个时间差异,可以与我的
POSIXct
变量一起melt
? 如果不使用dfn$ageToday
来melt
,那么一切都很顺利。
谢谢,Eric