Description Usage Arguments Author(s) Examples
This function takes a results of test_files() function and writes in working directory an rmarkdown containing all mistaken tasks made by students.
1 | mistaken_tasks(results, keyword_prefix = "### ", write_file = TRUE)
|
results |
data frame with test_files() results |
keyword_prefix |
a common part of all keywords. By default is "### ". |
write_file |
logical. If TRUE, writes the created rmarkdown to the working directory. |
George Moroz <agricolamz@gmail.com>
1 2 3 4 5 6 7 8 9 | my_files <- c(
system.file("extdata", "test_1.Rmd", package = "AssignmentCheck"),
system.file("extdata", "test_2.Rmd", package = "AssignmentCheck"),
system.file("extdata", "test_3.Rmd", package = "AssignmentCheck"),
system.file("extdata", "test_4.Rmd", package = "AssignmentCheck")
)
fit <- lm(mpg~cyl, mtcars)
result <- test_files(expectations = list(2+2, fit$coefficients), files = my_files)
mistaken_tasks(results = result, write_file = FALSE)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.