1 files changed, 57 insertions, 0 deletions
diff --git a/luasnip_snippets/r.json b/luasnip_snippets/r.json
new file mode 100644
index 0000000..9514078
--- /dev/null
+++ b/luasnip_snippets/r.json
@@ -0,0 +1,57 @@
+{
+  "#!": {
+    "prefix": "#!",
+    "description": "#!/usr/bin/env Rscript",
+    "body": [
+      "#!/usr/bin/env Rscript",
+      "$0"
+    ],
+    "luasnip": {
+      "priority": -20
+    }
+  },
+  "df": {
+    "prefix": "df",
+    "description": "Data frame",
+    "body": "${1:name}[${2:rows}, ${0:cols}]"
+  },
+  "fis": {
+    "prefix": "fis",
+    "description": "Fisher test",
+    "body": "fisher.test(${1:x}, ${0:y})"
+  },
+  "chi": {
+    "prefix": "chi",
+    "description": "Chi Squared test",
+    "body": "chisq.test(${1:x}, ${0:y})"
+  },
+  "tt": {
+    "prefix": "tt",
+    "description": "t-test",
+    "body": "t.test(${1:x}, ${0:y})"
+  },
+  "wil": {
+    "prefix": "wil",
+    "description": "Wilcox test",
+    "body": "wilcox.test(${1:x}, ${0:y})"
+  },
+  "cor": {
+    "prefix": "cor",
+    "description": "Correlation test",
+    "body": "cor.test(${1:x}, ${0:y})"
+  },
+  "fte": {
+    "prefix": "fte",
+    "description": "FTE test",
+    "body": "var.test(${1:x}, ${0:y})"
+  },
+  "kvt": {
+    "prefix": "kvt",
+    "description": "KV test",
+    "body": "kv.test(${1:x}, ${0:y})"
+  },
+  "vec": {
+    "prefix": "vec",
+    "body": "${1:var} <- c(\"${0:\\${VISUAL:/ /\",\"/g\\}}\")"
+  }
+}