mirror of
https://github.com/amix/vimrc
synced 2025-06-16 01:25:00 +08:00
Updated plugins, also experimenting with a new font
The font is IBM Plex Mono: https://ibm.github.io/type/
This commit is contained in:
@ -1,4 +1,4 @@
|
||||
priority -50
|
||||
priority -20
|
||||
|
||||
global !p
|
||||
import os
|
||||
@ -38,63 +38,63 @@ library("${3:${2/^(\w+)_.*$/(?1:$1)/ga}}")
|
||||
endsnippet
|
||||
|
||||
snippet lib "Import a library"
|
||||
library(${0:package})
|
||||
library('${0:${VISUAL:package}}')
|
||||
endsnippet
|
||||
|
||||
snippet req "Require a file"
|
||||
require(${0:package})
|
||||
require('${0:${VISUAL:package}}')
|
||||
endsnippet
|
||||
|
||||
snippet source "Source a file"
|
||||
source('${0:file}')
|
||||
source('${0:${VISUAL:file}}')
|
||||
endsnippet
|
||||
|
||||
snippet if "If statement"
|
||||
if ($1) {
|
||||
$0
|
||||
${0:${VISUAL}}
|
||||
}
|
||||
endsnippet
|
||||
|
||||
snippet eif "Else-If statement"
|
||||
else if ($1) {
|
||||
$0
|
||||
${0:${VISUAL}}
|
||||
}
|
||||
endsnippet
|
||||
|
||||
snippet el "Else statement"
|
||||
else {
|
||||
$0
|
||||
${0:${VISUAL}}
|
||||
}
|
||||
endsnippet
|
||||
|
||||
snippet ife "if .. else"
|
||||
if ($1) {
|
||||
$2
|
||||
${2:${VISUAL}}
|
||||
} else {
|
||||
$3
|
||||
$0
|
||||
}
|
||||
endsnippet
|
||||
|
||||
snippet wh "while loop"
|
||||
while($1) {
|
||||
$2
|
||||
${0:${VISUAL}}
|
||||
}
|
||||
endsnippet
|
||||
|
||||
snippet for "for loop"
|
||||
for (${1:item} in ${2:list}) {
|
||||
$3
|
||||
${0:${VISUAL}}
|
||||
}
|
||||
endsnippet
|
||||
|
||||
snippet fun "Function definition"
|
||||
${1:name} <- function ($2) {
|
||||
$0
|
||||
${0:${VISUAL}}
|
||||
}
|
||||
endsnippet
|
||||
|
||||
snippet ret "Return call"
|
||||
return($0)
|
||||
return(${0:${VISUAL}})
|
||||
endsnippet
|
||||
|
||||
snippet df "Data frame"
|
||||
@ -102,51 +102,51 @@ ${1:name}[${2:rows}, ${0:cols}]
|
||||
endsnippet
|
||||
|
||||
snippet c "c function"
|
||||
c(${0:items})
|
||||
c(${0:${VISUAL:items}})
|
||||
endsnippet
|
||||
|
||||
snippet li "list function"
|
||||
list(${0:items})
|
||||
list(${0:${VISUAL:items}})
|
||||
endsnippet
|
||||
|
||||
snippet mat "matrix function"
|
||||
matrix(${1:data}, nrow = ${2:rows}, ncol = ${0:cols})
|
||||
matrix(${1:${VISUAL:data}}, nrow = ${2:rows}, ncol = ${0:cols})
|
||||
endsnippet
|
||||
|
||||
snippet apply "apply function"
|
||||
apply(${1:array}, ${2:margin}, ${0:function})
|
||||
apply(${1:${VISUAL:array}}, ${2:margin}, ${0:function})
|
||||
endsnippet
|
||||
|
||||
snippet lapply "lapply function"
|
||||
lapply(${1:list}, ${0:function})
|
||||
lapply(${1:${VISUAL:list}}, ${0:function})
|
||||
endsnippet
|
||||
|
||||
snippet sapply "sapply function"
|
||||
sapply(${1:list}, ${0:function})
|
||||
sapply(${1:${VISUAL:list}}, ${0:function})
|
||||
endsnippet
|
||||
|
||||
snippet vapply "vapply function"
|
||||
vapply(${1:list}, ${2:function}, ${0:type})
|
||||
vapply(${1:${VISUAL:list}}, ${2:function}, ${0:type})
|
||||
endsnippet
|
||||
|
||||
snippet mapply "mapply function"
|
||||
mapply(${1:function}, ${0:...})
|
||||
mapply(${1:${VISUAL:function}}, ${0:...})
|
||||
endsnippet
|
||||
|
||||
snippet tapply "tapply function"
|
||||
tapply(${1:vector}, ${2:index}, ${0:function})
|
||||
tapply(${1:${VISUAL:vector}}, ${2:index}, ${0:function})
|
||||
endsnippet
|
||||
|
||||
snippet rapply "rapply function"
|
||||
rapply(${1:list}, ${0:function})
|
||||
rapply(${1:${VISUAL:list}}, ${0:function})
|
||||
endsnippet
|
||||
|
||||
snippet pl "Plot function"
|
||||
plot(${1:x}, ${0:y})
|
||||
plot(${1:${VISUAL:x}}, ${0:y})
|
||||
endsnippet
|
||||
|
||||
snippet ggp "ggplot2 plot"
|
||||
ggplot(${1:data}, aes(${0:aesthetics}))
|
||||
ggplot(${1:${VISUAL:data}}, aes(${0:aesthetics}))
|
||||
endsnippet
|
||||
|
||||
snippet fis "Fisher test"
|
||||
@ -176,3 +176,15 @@ endsnippet
|
||||
snippet kvt "KV test"
|
||||
kv.test(${1:x}, ${0:y})
|
||||
endsnippet
|
||||
|
||||
#################################
|
||||
# easily create string vector #
|
||||
#################################
|
||||
# Given individual words separated by spaces
|
||||
# Select words (e.g. shift-v for whole line (such as the line above)
|
||||
# then press <Tab> then type "vec", press <Tab> again to get this:
|
||||
# var <- c("#","Given","individual","words","separated","by","spaces")
|
||||
# var <- c("#","type","out","individual","words","separated","by","spaces")
|
||||
snippet vec
|
||||
${1:var} <- c("${0:${VISUAL:/ /","/g}}")
|
||||
endsnippet
|
||||
|
Reference in New Issue
Block a user