Использование разреза по вектору объектов класса Date

Так как аргумент по умолчанию right в cut по умолчанию установлено TRUE Я бы ожидал получить точно такие же результаты двумя следующими cut Комментарии. Почему это не так?

> breaks <- as.Date(c("2016-02-05", "2016-02-12", "2016-02-19"))
> d <- as.Date("2016-02-12")
> cut(d, breaks, right=TRUE)
[1] 2016-02-05
Levels: 2016-02-05 2016-02-12
> cut(d, breaks)
[1] 2016-02-12
Levels: 2016-02-05 2016-02-12

Однако, когда я впервые конвертирую Date объекты в числовые значения я получаю те же результаты:

> breaks <- as.numeric(as.Date(c("2016-02-05", "2016-02-12", "2016-02-19")))
> d <- as.numeric(as.Date("2016-02-12"))
> cut(d, breaks, right=TRUE)
[1] (16836,16843]
Levels: (16836,16843] (16843,16850]
> cut(d, breaks)
[1] (16836,16843]
Levels: (16836,16843] (16843,16850]

Разве это не противоречит здравому смыслу?

0 ответов

Другие вопросы по тегам