我想说的是,您需要一个解析树(和源)-您还怎么知道什么构成“行”和有效语句?
实际的简化可能是“语句分析器”而不是“线路分析器”。在R中,分析树很容易使用:
body(theFunction),因此在每个语句周围插入测量代码应该相当容易。通过更多的工作,您可以将其插入到属于同一行的一组语句周围。
在R中,从文件加载的函数主体通常还具有一个属性
srcref,该属性列出了每个“行”(实际上是每个语句)的源:
这是一个示例函数(输入“ example.R”):
f <- function(x, y=3){ a <- 0; a <- 1 # Two statements on one line a <- (x + 1) * # One statement on two lines (y + 2) a <- "foo bar" # One string on two lines}
然后在R中:
source("example.R")dput(attr(body(theFunction), "srcref"))
哪个打印此行/列信息:
list(structure(c(2L, 1L, 2L, 1L, 1L, 1L, 2L, 2L), srcfile = <environment>, class = "srcref"), structure(c(3L, 2L, 3L, 7L, 9L, 14L, 3L, 3L), srcfile = <environment>, class = "srcref"), structure(c(3L, 10L, 3L, 15L, 17L, 22L, 3L, 3L), srcfile = <environment>, class = "srcref"), structure(c(4L, 2L, 5L, 15L, 9L, 15L, 4L, 5L), srcfile = <environment>, class = "srcref"), structure(c(7L, 2L, 8L, 6L, 9L, 20L, 7L, 8L), srcfile = <environment>, class = "srcref"))
如您所见(每个结构的最后两个数字是开始/结束行),表达式
a <- 0和
a <- 1映射到同一行…
祝好运!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)