Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- snippet lib
- library(${1:package})
- snippet req
- require(${1:package})
- snippet src
- source("${1:file.R}")
- snippet ret
- return(${1:code})
- snippet mat
- matrix(${1:data}, nrow = ${2:rows}, ncol = ${3:cols})
- snippet sg
- setGeneric("${1:generic}", function(${2:x, ...}) {
- standardGeneric("${1:generic}")
- })
- snippet sm
- setMethod("${1:generic}", ${2:class}, function(${2:x, ...}) {
- ${0}
- })
- snippet sc
- setClass("${1:Class}", slots = c(${2:name = "type"}))
- snippet if
- if (${1:condition}) {
- ${0}
- }
- snippet el
- else {
- ${0}
- }
- snippet ei
- else if (${1:condition}) {
- ${0}
- }
- snippet fun
- ${1:name} <- function(${2:variables}) {
- ${0}
- }
- snippet for
- for (${1:variable} in ${2:vector}) {
- ${0}
- }
- snippet while
- while (${1:condition}) {
- ${0}
- }
- snippet switch
- switch (${1:object},
- ${2:case} = ${3:action}
- )
- snippet apply
- apply(${1:array}, ${2:margin}, ${3:...})
- snippet lapply
- lapply(${1:list}, ${2:function})
- snippet sapply
- sapply(${1:list}, ${2:function})
- snippet mapply
- mapply(${1:function}, ${2:...})
- snippet tapply
- tapply(${1:vector}, ${2:index}, ${3:function})
- snippet vapply
- vapply(${1:list}, ${2:function}, FUN.VALUE = ${3:type}, ${4:...})
- snippet rapply
- rapply(${1:list}, ${2:function})
- snippet ts
- `r paste("#", date(), "------------------------------\n")`
- snippet shinyapp
- library(shiny)
- ui <- fluidPage(
- ${0}
- )
- server <- function(input, output, session) {
- }
- shinyApp(ui, server)
- snippet shinymod
- ${1:name}_UI <- function(id) {
- ns <- NS(id)
- tagList(
- ${0}
- )
- }
- ${1:name} <- function(input, output, session) {
- }
- snippet hp
- help(package = "${1:package-name}")
- snippet bv
- browseVignettes(package = "${1:package-name}")
- snippet dv
- devtools::install(build_vignettes = TRUE)
- snippet up
- remotes::update_packages(build_vignettes = TRUE, dependencies = TRUE)
- snippet ig
- remotes::install_github("${1:username}/${2:repo}", build_vignettes = TRUE, dependencies = TRUE)
- snippet pp
- "`r gsub('"', "", gsub("\\\\", "/", readClipboard()))`"
- snippet ip
- install.packages("${1:pkg-name}", dependencies = TRUE)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement