2020-07-08 14:48:06 +02:00
|
|
|
# ==================================================================== #
|
2023-07-08 17:30:05 +02:00
|
|
|
# TITLE: #
|
2022-10-05 09:12:22 +02:00
|
|
|
# AMR: An R Package for Working with Antimicrobial Resistance Data #
|
2020-07-08 14:48:06 +02:00
|
|
|
# #
|
2023-07-08 17:30:05 +02:00
|
|
|
# SOURCE CODE: #
|
2020-07-08 14:48:06 +02:00
|
|
|
# https://github.com/msberends/AMR #
|
|
|
|
# #
|
2023-07-08 17:30:05 +02:00
|
|
|
# PLEASE CITE THIS SOFTWARE AS: #
|
2022-10-05 09:12:22 +02:00
|
|
|
# Berends MS, Luz CF, Friedrich AW, Sinha BNM, Albers CJ, Glasner C #
|
|
|
|
# (2022). AMR: An R Package for Working with Antimicrobial Resistance #
|
|
|
|
# Data. Journal of Statistical Software, 104(3), 1-31. #
|
2023-05-27 10:39:22 +02:00
|
|
|
# https://doi.org/10.18637/jss.v104.i03 #
|
2022-10-05 09:12:22 +02:00
|
|
|
# #
|
2022-12-27 15:16:15 +01:00
|
|
|
# Developed at the University of Groningen and the University Medical #
|
|
|
|
# Center Groningen in The Netherlands, in collaboration with many #
|
|
|
|
# colleagues from around the world, see our website. #
|
2020-07-08 14:48:06 +02:00
|
|
|
# #
|
|
|
|
# This R package is free software; you can freely use and distribute #
|
|
|
|
# it for both personal and commercial purposes under the terms of the #
|
|
|
|
# GNU General Public License version 2.0 (GNU GPL-2), as published by #
|
2020-10-08 11:16:03 +02:00
|
|
|
# the Free Software Foundation.
|
2020-07-08 14:48:06 +02:00
|
|
|
# We created this package for both routine data analysis and academic #
|
|
|
|
# research and it was publicly released in the hope that it will be #
|
|
|
|
# useful, but it comes WITHOUT ANY WARRANTY OR LIABILITY. #
|
2020-10-08 11:16:03 +02:00
|
|
|
# #
|
|
|
|
# Visit our website for the full manual and a complete tutorial about #
|
2021-02-02 23:57:35 +01:00
|
|
|
# how to conduct AMR data analysis: https://msberends.github.io/AMR/ #
|
2020-07-08 14:48:06 +02:00
|
|
|
# ==================================================================== #
|
|
|
|
|
|
|
|
on:
|
|
|
|
push:
|
2022-08-26 23:25:37 +02:00
|
|
|
branches: '**'
|
2020-07-08 14:48:06 +02:00
|
|
|
pull_request:
|
2022-08-26 23:25:37 +02:00
|
|
|
branches: '**'
|
2020-07-08 14:48:06 +02:00
|
|
|
|
2020-07-08 20:43:25 +02:00
|
|
|
name: lintr
|
2020-07-08 14:48:06 +02:00
|
|
|
|
|
|
|
jobs:
|
2020-07-08 20:43:25 +02:00
|
|
|
lintr:
|
2022-08-28 19:17:12 +02:00
|
|
|
runs-on: ubuntu-latest
|
2020-07-08 14:48:06 +02:00
|
|
|
env:
|
|
|
|
GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }}
|
|
|
|
steps:
|
2022-08-26 23:25:37 +02:00
|
|
|
- uses: actions/checkout@v3
|
2020-07-08 14:48:06 +02:00
|
|
|
|
2022-08-28 19:17:12 +02:00
|
|
|
- uses: r-lib/actions/setup-pandoc@v2
|
2020-07-08 14:48:06 +02:00
|
|
|
|
2022-08-28 19:17:12 +02:00
|
|
|
- uses: r-lib/actions/setup-r@v2
|
2020-07-08 14:48:06 +02:00
|
|
|
with:
|
2022-08-28 19:17:12 +02:00
|
|
|
r-version: release
|
|
|
|
# use RStudio Package Manager to quickly install packages
|
|
|
|
use-public-rspm: true
|
2020-07-08 14:48:06 +02:00
|
|
|
|
2022-08-28 19:17:12 +02:00
|
|
|
- uses: r-lib/actions/setup-r-dependencies@v2
|
|
|
|
with:
|
|
|
|
extra-packages: any::lintr
|
2020-07-08 14:48:06 +02:00
|
|
|
|
|
|
|
- name: Lint
|
2022-10-05 09:12:22 +02:00
|
|
|
run: |
|
|
|
|
# old: lintr::lint_package(linters = lintr::with_defaults(line_length_linter = NULL, trailing_whitespace_linter = NULL, object_name_linter = NULL, cyclocomp_linter = NULL, object_length_linter = lintr::object_length_linter(length = 50L)), exclusions = list("R/aa_helper_pm_functions.R"))
|
|
|
|
# now get ALL linters, not just default ones
|
|
|
|
linters <- ls(envir = asNamespace("lintr"), pattern = "_linter$")
|
|
|
|
# lose deprecated
|
|
|
|
linters <- linters[!grepl("^(closed_curly|open_curly|paren_brace|semicolon_terminator)_linter$", linters)]
|
|
|
|
# and the ones we find unnnecessary
|
|
|
|
linters <- linters[!grepl("^(extraction_operator|implicit_integer|line_length|object_name|nonportable_path|is)_linter$", linters)]
|
|
|
|
# put the functions in a list
|
|
|
|
linters <- lapply(linters, function(l) eval(parse(text = paste0("lintr::", l, "()")), envir = asNamespace("lintr")))
|
|
|
|
# run them all!
|
|
|
|
lintr::lint_package(linters = linters, exclusions = list("R/aa_helper_pm_functions.R"))
|
2020-07-08 14:48:06 +02:00
|
|
|
shell: Rscript {0}
|