c++ - 如何获取R的二级函数的C/C++源代码？

Question

我想知道在 R 中获取任何辅助函数(以区别于原始/内部函数)的 C/C++ 源代码的正确方法是什么。相关问题是here , here , here和 here :

我的不同，所以我在问题中使用了“secondary”。例如，read.table() 函数，在 R 控制台中，我得到:

>?read.table

read.table                package:utils                R Documentation

Data Input

Description:

     Reads a file in table format and creates a data frame from it,
     with cases corresponding to lines and variables to fields in the
     file.

Usage:
     read.table(file, header = FALSE, sep = "", quote = "\"'",
        ......

或者

> getAnywhere(read.table)
A single object matching ‘read.table’ was found
It was found in the following places
  package:utils
  namespace:utils
with value

function (file, header = FALSE, sep = "", quote = "\"'", dec = ".", 

     ......

    attr(data, "row.names") <- row.names
    data
}
<bytecode: 0x560ff88edd40>
<environment: namespace:utils>

搜索我得到的网站:

https://svn.r-project.org/R/trunk/src/library/utils/src/utils.c

https://svn.r-project.org/R/trunk/src/library/utils/src/utils.h

如何获取read.table函数的C/C++源代码而不是R代码，是否合理？

Answer 1

可搜索的 R 源代码位于 https://github.com/wch/r-source对此非常有用:

• 首先我们可以查找read.table definition

• actual data reading由 scan 完成最终使用的函数

  .Internal(scan(file, what, nmax, sep, dec, quote, skip, nlines,
  [...]
  

• 现在扫描是mapped至 do_scan

所以你在这里:read.table 的底层 C 实现可以在 src/main/scan.c 中找到，从函数 do_scan 开始。