Standardize map()
when .f
is an index rather than a function
#273
Triggered via pull request
June 14, 2023 01:32
rossellhayes
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
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(
^
|