ff个日期向量的重复函数失败

Question

嗨，我正在尝试使用ffbase包的重复函数和以下代码从包含日期的ff向量中删除重复项：

v1 <- c("24-Mar-94", "24-Mar-94", "27-Mar-94", "28-Jun-1986", "29-Jul-1988", "28-Jun-1986", "15-Jan-1999", "13-Jan-1999")
v1.d <- as.Date(v1, format="%d-%b-%y")
v1.ff <- as.ff(v1.d)
v2 <- v1.ff[!duplicated(v1.ff)]

但是我收到以下错误：

Error in UseMethod("as.hi") : 
  no applicable method for 'as.hi' applied to an object of class "Date"

有什么办法可以解决此问题而不必先将v2向量强制转换为ram对象？

Answer 1

尝试这个：

library(ff)
v1 <- c("24-Mar-94", "24-Mar-94", "27-Mar-94", "28-Jun-1986", "29-Jul-1988", "28-Jun-1986", "15-Jan-1999", "13-Jan-1999")
v1.d <- as.Date(v1, format="%d-%b-%y")
v1.ff <- as.ff(v1.d)
v2 <- v1.ff[ !duplicated(v1.ff[,])  ]

输出：

> v1.d
[1] "1994-03-24" "1994-03-24" "1994-03-27" "2019-06-28" "2019-07-29" "2019-06-28" "2019-01-15" "2019-01-13"
> v2
[1] "1994-03-24" "1994-03-27" "2019-06-28" "2019-07-29" "2019-01-15" "2019-01-13"

而且它已被重复数据删除。

ff对象需要特别地切片/子集，以便在其上适当使用功能。 一种方法是上面使用[,]或[] （因为它是向量，所以使用此方法），以便创建具有所有元素的向量，然后在其上使用duplicated 。

Answer 2

使用sapply仅首先获取唯一日期，然后强制转换为ffbase对象

library(ffbase)
v1 <- c("24-Mar-94", "24-Mar-94", "27-Mar-94", "28-Jun-1986", "29-Jul-1988", "28-Jun-1986", "15-Jan-1999", "13-Jan-1999")
v1<-sapply(v1,unique)
v1.d <- as.Date(v1, format="%d-%b-%y")
v1.ff <- as.ff(v1.d)