Use sources_non_forked folder for pathogen path, with sources_non_forked_fallback folder as fallback.

sources_non_forked/vim-snippets/snippets/r.snippets

@@ -1,139 +0,0 @@
-snippet #!
-	#!/usr/bin/env Rscript
-
-# includes
-snippet lib
-	library(${0:package})
-snippet req
-	require(${0:package})
-snippet source
-	source('${0:file}')
-
-# conditionals
-snippet if
-	if ($1) {
-		${0}
-	}
-snippet el
-	else {
-		${0}
-	}
-snippet ei
-	else if ($1) {
-		${0}
-	}
-
-# loops
-snippet wh
-	while(${1:true}) {
-		${0}
-	}
-snippet wht
-	while(true) {
-		${0}
-	}
-snippet for
-	for (${1:item} in ${2:list}) {
-		${3}
-	}
-snippet foreach
-	foreach (${1:item} = ${2:list}) {
-		${3}
-	}
-
-# functions
-snippet fun
-	${1:name} <- function (${2:variables}) {
-		${0}
-	}
-snippet ret
-	return(${0})
-
-# dataframes, lists, etc
-snippet df
-	${1:name}[${2:rows}, ${0:cols}]
-snippet c
-	c(${0:items})
-snippet li
-	list(${0:items})
-snippet mat
-	matrix(${1:data}, nrow = ${2:rows}, ncol = ${0:cols})
-
-# apply functions
-snippet apply
-	apply(${1:array}, ${2:margin}, ${0:function})
-snippet lapply
-	lapply(${1:list}, ${0:function})
-snippet sapply
-	lapply(${1:list}, ${0:function})
-snippet vapply
-	vapply(${1:list}, ${2:function}, ${0:type})
-snippet mapply
-	mapply(${1:function}, ${0:...})
-snippet tapply
-	tapply(${1:vector}, ${2:index}, ${0:function})
-snippet rapply
-	rapply(${1:list}, ${0:function})
-
-# plyr functions
-snippet dd
-	ddply(${1:frame}, ${2:variables}, ${0:function})
-snippet dl
-	dlply(${1:frame}, ${2:variables}, ${0:function})
-snippet da
-	daply(${1:frame}, ${2:variables}, ${0:function})
-snippet d_
-	d_ply(${1:frame}, ${2:variables}, ${0:function})
-
-snippet ad
-	adply(${1:array}, ${2:margin}, ${0:function})
-snippet al
-	alply(${1:array}, ${2:margin}, ${0:function})
-snippet aa
-	aaply(${1:array}, ${2:margin}, ${0:function})
-snippet a_
-	a_ply(${1:array}, ${2:margin}, ${0:function})
-
-snippet ld
-	ldply(${1:list}, ${0:function})
-snippet ll
-	llply(${1:list}, ${0:function})
-snippet la
-	laply(${1:list}, ${0:function})
-snippet l_
-	l_ply(${1:list}, ${0:function})
-
-snippet	md
-	mdply(${1:matrix}, ${0:function})
-snippet	ml
-	mlply(${1:matrix}, ${0:function})
-snippet	ma
-	maply(${1:matrix}, ${0:function})
-snippet	m_
-	m_ply(${1:matrix}, ${0:function})
-
-# plot functions
-snippet pl
-	plot(${1:x}, ${0:y})
-snippet ggp
-	ggplot(${1:data}, aes(${0:aesthetics}))
-snippet img
-	${1:(jpeg,bmp,png,tiff)}(filename = '${2:filename}', width = ${3}, height = ${4}, unit = '${5}')
-	${0:plot}
-	dev.off()
-
-# statistical test functions
-snippet fis
-	fisher.test(${1:x}, ${0:y})
-snippet chi
-	chisq.test(${1:x}, ${0:y})
-snippet tt
-	t.test(${1:x}, ${0:y})
-snippet wil
-	wilcox.test(${1:x}, ${0:y})
-snippet cor
-	cor.test(${1:x}, ${0:y})
-snippet fte
-	var.test(${1:x}, ${0:y})
-snippet kvt
-	kv.test(${1:x}, ${0:y})