Skip to content

Standardize map() when .f is an index rather than a function #273

Standardize map() when .f is an index rather than a function

Standardize map() when .f is an index rather than a function #273

Triggered via pull request June 14, 2023 01:32
@rossellhayesrossellhayes
synchronize #359
Status Success
Total duration 6m 28s
Artifacts

auto-pkg-maintenance.yaml

on: pull_request_target
auto-pkg-maintenance  /  auto-pkg-maintenance
6m 17s
auto-pkg-maintenance / auto-pkg-maintenance
Fit to window
Zoom out
Zoom in

Annotations

11 warnings and 10 notices
lintr - style - line_length_linter: R/grade_result.R#L87
R/grade_result.R:87:121: style: [line_length_linter] Lines should not be more than 120 characters. stop("At least one condition object (e.g., `pass_if()`, `fail_if()`, `condition()`) must be provided to `grade_result()`", call. = FALSE) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~
lintr - style - line_length_linter: R/grade_this.R#L276
R/grade_this.R:276:121: style: [line_length_linter] Lines should not be more than 120 characters. .solution = "The last value returned from evaluating the `.solution_code` for the exercise (evaluated in `.envir_prep`).", ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~
lintr - style - line_length_linter: R/grade_this.R#L277
R/grade_this.R:277:121: style: [line_length_linter] Lines should not be more than 120 characters. .solution_all = "A list containing all solutions when multiple solutions are provided in the `*-solution` chunk for the exercise. Solutions are separated by header comments, e.g. `# base_r ----`.", ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
lintr - style - line_length_linter: R/grade_this.R#L279
R/grade_this.R:279:121: style: [line_length_linter] Lines should not be more than 120 characters. .solution_code_all = "A list containing the code of all solutions when multiple solutions are provided in the `*-solution` chunk for the exercise. Solutions are separated by header comments, e.g. `# base_r ----`.", ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
lintr - style - line_length_linter: R/grade_this.R#L280
R/grade_this.R:280:121: style: [line_length_linter] Lines should not be more than 120 characters. .check_code = "A string containing the code provided within the `*-check` or `*-code-check` chunk for the exercise.", ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
lintr - style - line_length_linter: R/grade_this.R#L281
R/grade_this.R:281:121: style: [line_length_linter] Lines should not be more than 120 characters. .envir_prep = "A copy of the R environment after running the exercise setup code and before the execution of the student's submitted code.", ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~
lintr - style - line_length_linter: R/grade_this.R#L285
R/grade_this.R:285:121: style: [line_length_linter] Lines should not be more than 120 characters. .stage = "The current checking stage in the learnr exercise evaluation lifecycle: 'code_check', 'error_check', or 'check'", ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~
lintr - style - line_length_linter: R/grade_this.R#L401
R/grade_this.R:401:121: style: [line_length_linter] Lines should not be more than 120 characters. #' submission <- gradethis::mock_this_exercise("# user submits\nx + 2", "x + 3", setup_exercise = "x <- 1", .label = "example") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~
lintr - style - object_length_linter: R/graded.R#L633
R/graded.R:633:1: style: [object_length_linter] Variable and function names should not be longer than 42 characters. assert_gradethis_condition_is_true_or_false <- function(cond, from = NULL) { ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
lintr - style - line_length_linter: R/gradethis_exercise_checker.R#L238
R/gradethis_exercise_checker.R:238:121: style: [line_length_linter] Lines should not be more than 120 characters. # evaluate the function with the check envir passed in. (Passing an environment allows for `.solution` to be calculated on demand) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~
auto-pkg-maintenance / auto-pkg-maintenance
Node.js 12 actions are deprecated. Please update the following actions to use Node.js 16: actions/checkout@v2. For more information see: https://github.blog/changelog/2022-09-22-github-actions-all-actions-will-begin-running-on-node16-instead-of-node12/.
lintr - style - cyclocomp_linter: R/detect_mistakes_helpers.R#L342
R/detect_mistakes_helpers.R:342:1: style: [cyclocomp_linter] Functions should have cyclomatic complexity of less than 15, this has 18. detect_wrong_arguments <- function( ^
lintr - warning - undesirable_operator_linter: R/evaluate_condition.R#L49
R/evaluate_condition.R:49:15: warning: [undesirable_operator_linter] Operator `<<-` is undesirable. It assigns outside the current environment in a way that can be hard to reason about. Prefer fully-encapsulated functions wherever possible, or, if necessary, assign to a specific environment with assign(). Recall that you can create an environment at the desired scope with new.env(). err_msg <<- conditionMessage(e) ^~~
lintr - warning - nonportable_path_linter: R/glue.R#L18
R/glue.R:18:21: warning: [nonportable_path_linter] Use file.path() to construct portable file paths. is_bool <- grepl("^\\.is_", param_names) ^~~~~~~
lintr - warning - nonportable_path_linter: R/glue.R#L19
R/glue.R:19:21: warning: [nonportable_path_linter] Use file.path() to construct portable file paths. is_numb <- grepl("^\\.num_", param_names) ^~~~~~~~
lintr - style - cyclocomp_linter: R/grade_code.R#L81
R/grade_code.R:81:1: style: [cyclocomp_linter] Functions should have cyclomatic complexity of less than 15, this has 16. grade_code <- function( ^
lintr - style - cyclocomp_linter: R/graded.R#L483
R/graded.R:483:1: style: [cyclocomp_linter] Functions should have cyclomatic complexity of less than 15, this has 21. fail_if_code_feedback <- function( ^
lintr - warning - nonportable_path_linter: R/gradethis_demo.R#L26
R/gradethis_demo.R:26:52: warning: [nonportable_path_linter] Use file.path() to construct portable file paths. gradethis_demo_path <- system.file("tutorials", "grading-demo/grading-demo.Rmd", ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
lintr - style - cyclocomp_linter: R/gradethis_exercise_checker.R#L96
R/gradethis_exercise_checker.R:96:1: style: [cyclocomp_linter] Functions should have cyclomatic complexity of less than 15, this has 22. check_exercise <- function( ^
lintr - warning - undesirable_operator_linter: R/gradethis_exercise_checker.R#L212
R/gradethis_exercise_checker.R:212:21: warning: [undesirable_operator_linter] Operator `<<-` is undesirable. It assigns outside the current environment in a way that can be hard to reason about. Prefer fully-encapsulated functions wherever possible, or, if necessary, assign to a specific environment with assign(). Recall that you can create an environment at the desired scope with new.env(). to_check_fn <<- getOption("exercise.parse.error", grade_parse_error) ^~~
lintr - style - cyclocomp_linter: R/gradethis_setup.R#L96
R/gradethis_setup.R:96:1: style: [cyclocomp_linter] Functions should have cyclomatic complexity of less than 15, this has 18. gradethis_setup <- function( ^