intial supported queries

Author: BlueDrink9

packages/common/src/scopeSupportFacets/r.ts

@@ -5,4 +5,7 @@ import { ScopeSupportFacetLevel } from "./scopeSupportFacets.types";
 const { supported, unsupported, notApplicable } = ScopeSupportFacetLevel;
 
 export const rScopeSupport: LanguageScopeSupportFacetMap = {
+  "comment.line": supported,
+  ifStatement: supported,
+  "argument.actual": supported,
 };

queries/r.scm

@@ -1 +1,26 @@
 ;; https://github.com/r-lib/tree-sitter-r/blob/main/src/grammar.json
+;; https://github.com/r-lib/tree-sitter-r/blob/main/src/node-types.json
+
+[
+  (for_statement)
+  (if_statement)
+  (repeat_statement)
+  (function_definition)
+] @statement
+
+(comment) @comment
+(if_statement) @ifStatement
+(argument) @argumentOrParameter
+(call) @functionCall
+(identifier) @identifier
+
+;; ;; https://github.com/r-lib/tree-sitter-r/blob/main/queries/highlights.scm
+;; ;; Plus magrittr operators
+;; [ "?" ":=" "=" "<-" "<<-" "->" "->>"
+;;   "~" "|>" "||" "|" "&&" "&"
+;;   "<" "<=" ">" ">=" "==" "!="
+;;   "+" "-" "*" "/" "::" ":::"
+;;   "**" "^" "$" "@" ":" "%in%"
+;;   "%>%" "%<>%" "%T>%" "%$%"
+;;   "special"
+;; ] @operator