Question

我正在调试使用Rhpc包的并行代码。 Rhpc存储了将数据集群到externlaptr个对象中。我想测试一下没有损坏，因此以某种方式将它的值输出到文件中 write。

代码如下所示：

library(Rhpc)
Rhpc_initialize()
cl <- Rhpc_getHandle(1)
print(cl)

print有效，但有没有办法将其转换为要character输出write()个对象？ as.character，as(cl, "character")，as(cl, "integer") 等给出错误cannot coerce type 'externalptr' to vector of type 'character'

Answer 1

尝试capture.output：

make_nil()
# <pointer: (nil)>

capture.output(make_nil())
# [1] "<pointer: (nil)>"

capture.output(make_nil()) == "<pointer: (nil)>"
# [1] TRUE

从技术上讲，你并没有将externalptr本身强制转移到character，而这只是用于表示其地址;但如果您使用它的目的是检查它是否有效，那么您应该没问题。

#include <Rcpp.h>

// [[Rcpp::export]]
Rcpp::XPtr<int> make_nil() {
    int* p = 0;
    return Rcpp::XPtr<int>(p);
}

R：将'externalptr'强制转换为字符

1 个答案: