我想使用函数模板to_string
将int
转换为string
,在C ++中没有问题,但如果我在R中执行它会给我以下错误:
main.cpp: In function 'std::string to_string(T)':
main.cpp:38:11: error: 't' was not declared in this scope
ss << t;
^
main.cpp: In function 'SEXPREC* sourceCpp_1_to_string(SEXP)':
main.cpp:134:36: error: 'T' was not declared in this scope
Rcpp::traits::input_parameter< T >::type tSEXP(tSEXPSEXP);
^
main.cpp:134:38: error: template argument 1 is invalid
Rcpp::traits::input_parameter< T >::type tSEXP(tSEXPSEXP);
^
main.cpp:134:46: error: expected initializer before 'tSEXP'
Rcpp::traits::input_parameter< T >::type tSEXP(tSEXPSEXP);
^
main.cpp:135:44: error: 'tSEXP' was not declared in this scope
rcpp_result_gen = Rcpp::wrap(to_string(tSEXP));
^
make: *** [main.o] Error 1
我很困惑,还有其他选择吗?
//[[Rcpp::export]]
template <typename T>
std::string to_string(T t)
{
std::ostringstream ss;
ss << t;
return ss.str();
}
答案 0 :(得分:3)
R从根本上不了解模板。实际上,R和C ++之间的接口是 C ABI ,因此所有C限制都适用。
因此,您不仅无法导出函数模板,还无法有意义地调用未导出的模板,因为您从R获取的类型是动态运行时类型,而不是静态类型。您需要执行运行时类型调度。
答案 1 :(得分:2)
对于你的尝试失败的原因,我对康拉德的回答没有任何补充;但是根据过去的经验,我建议(编辑:请参阅下面的更新)推迟转换为Rcpp::as
而不是std::ostringstream
,因为前者依赖于C级{{ 1}}(IIRC),因此应该产生与R Rf_coerceVector
更一致的结果(例如,浮点,as.character
和Date
值)。在任何一种情况下,RCPP_RETURN_VECTOR
macro都是你的朋友,消除了一堆样板:
POSIXt
更新:正如Dirk在场外向我指出的那样,在这种特殊情况下,我不需要模板函数+ #include <Rcpp.h>
using namespace Rcpp;
template <int RTYPE>
CharacterVector as_character(const Vector<RTYPE>& x) {
return as<CharacterVector>(x);
}
// [[Rcpp::export]]
SEXP to_string(SEXP t)
{
RCPP_RETURN_VECTOR(as_character, t);
}
/*** R
to_string(1)
# [1] "1"
to_string(1.5)
# [1] "1.5"
to_string(1.5 + 2i)
# [1] "1.5+2i"
to_string(TRUE)
# [1] "TRUE"
to_string("abc")
# [1] "abc"
to_string(Sys.Date())
# [1] "2017-07-18"
to_string(Sys.time())
# [1] "2017-07-18 06:48:58"
*/
成语,因为我的模板函数{{1}只是调用RCPP_RETURN_VECTOR
构造函数。以下是相同的,但更简单:
as_character