For how to use please see here https://github.com/WinVector/rquery/blob/master/extras/query_growth/query_growth.md.
make_relop_list(name_source = wrapr::mk_tmp_name_source("rqrol"))
name_source | a wrapr::mk_tmp_name_source() |
---|
a relop_list relop stage collector
collector <- make_relop_list() ops <- mk_td("d", c("x", "y")) %.>% extend(., z %:=% x + y) %.>% collector get_relop_list_stages(collector)#> [[1]] #> [1] "mk_td(\"d\", c( \"x\", \"y\")) %.>% extend(., z %:=% x + y)" #>