我想让我的R6类的对象在R中使用for循环进行迭代,如下所示:
for (element in object) {
print(element)
}其中object是我的类的一个实例。在python中,我会在我的类上实现__iter__函数。与__len__相同,以便len(object)正常工作。在R中有没有类似的方法来实现这些?
发布于 2017-06-03 02:29:43
您可以:
# create your refclass
bar <- setRefClass("foo", fields = list(name="character",len = "numeric"))
# set generics for `[` and `length`
setMethod("[", c("foo","numeric"), function(x, i,drop) { sprintf("%s:%s",x$name,i) })
setMethod("length", c("foo"), function(x ) { x$len })然后像这样迭代:
one <- bar$new(name="hi",len = 5)
for(i in seq_along(one)) cat(one[i],"\n")
#> "hi:1"
#> "hi:2"
#> "hi:3"
#> "hi:4"
#> "hi:5"如果你想要一个更有状态的,你可以使用iterators包并实现一个迭代器函数nextElem方法:
setMethod("nextElem", c("foo"), function(obj) { ... })https://stackoverflow.com/questions/44333130
复制相似问题