code_feedback() should ignore argument names of anonymous functions

[rossellhayes]

code_feedback() alerts the user to differences in the argument names of anonymous functions. Is it possible to ignore this?

library(gradethis)

.user_code     <- "map(data, function(x) is.na(x))"
.solution_code <- "map(data, function(y) is.na(y))"

code_feedback()
#> In `function(x)`, I expected argument `y` where you wrote argument `x`.

^{Created on 2022-02-16 by the reprex package (v2.0.1)}

[gadenbuie]

Even worse

.user_code     <- "map(data, function(x) is.na(x))"
.solution_code <- "map(data, ~ is.na(.x))"

code_feedback()
#> In `map(data, function(x) is.na(x))`, I expected you to call ``~`()` where you called `function() NULL`.