예제 #1
0
파일: cxxUtils.cpp 프로젝트: cran/cxxPack
    template<> SEXP wrap<RcppDatetime>(const RcppDatetime& date) {
	Rcpp::NumericVector value(1);
	Rcpp::CharacterVector classname(2);
	value[0] = date.getFractionalTimestamp();
	Rcpp::RObject robj((SEXP)value);
	classname[0] = Rcpp::datetimeClass[0];
	classname[1] = Rcpp::datetimeClass[1];
	robj.attr("class") = classname;
	return value;
    }
예제 #2
0
    template <> SEXP wrap(const RcppDatetime &datetime) {
    return internal::new_posixt_object( datetime.getFractionalTimestamp() ) ;
	}