testData/parser/r/StatementAsDefaultValue.r (
3
lines of code) (
raw
):
`[.data.frame` <- function(x, i, j, drop = if(missing(i)) TRUE else length(cols) == 1) {}