/usr/lib/R/site-library/dplyr/include/dplyr/DataFrameColumnSubsetVisitor.h is in r-cran-dplyr 0.7.4-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 | #ifndef dplyr_DataFrameColumnSubsetVisitors_H
#define dplyr_DataFrameColumnSubsetVisitors_H
#include <dplyr/SubsetVectorVisitor.h>
namespace dplyr {
class DataFrameColumnSubsetVisitor : public SubsetVectorVisitor {
public:
DataFrameColumnSubsetVisitor(const DataFrame& data_) : data(data_), visitors(data) {}
inline SEXP subset(const Rcpp::IntegerVector& index) const {
return visitors.subset(index, get_class(data));
}
inline SEXP subset(const std::vector<int>& index) const {
return visitors.subset(index, get_class(data));
}
inline SEXP subset(const SlicingIndex& index) const {
return visitors.subset(index, get_class(data));
}
inline SEXP subset(const ChunkIndexMap& index) const {
return visitors.subset(index, get_class(data));
}
inline SEXP subset(EmptySubset index) const {
return visitors.subset(index, get_class(data));
}
inline int size() const {
return visitors.nrows();
}
inline std::string get_r_type() const {
return "data.frame";
}
inline bool is_compatible(SubsetVectorVisitor* other, std::stringstream&, const SymbolString&) const {
return is_same_typeid(other);
}
private:
DataFrame data;
DataFrameSubsetVisitors visitors;
};
}
#endif
|