Title: | Automatic Marking of R Assignments |
---|---|
Description: | Automatic marking of R assignments for students and teachers based on 'testthat' test suites. |
Authors: | Mans Magnusson, Oscar Pettersson |
Maintainer: | Mans Magnusson <[email protected]> |
License: | BSD_2_clause + file LICENSE |
Version: | 0.8.8 |
Built: | 2024-10-24 03:58:39 UTC |
Source: | https://github.com/mansmeg/markmyassignment |
Mark assignment in global environment.
mark_my_assignment( tasks = NULL, mark_file = NULL, force_get_tests = FALSE, quiet = FALSE, ... )
mark_my_assignment( tasks = NULL, mark_file = NULL, force_get_tests = FALSE, quiet = FALSE, ... )
tasks |
Which task should be corrected (if more than one). Default is all.
To see the different task, see |
mark_file |
Argument is deprecated, use mark_my_file instead. |
force_get_tests |
Argument is deprecated, use |
quiet |
Should test be run without output? |
... |
further arguments sent to |
assignment_path <- file.path(system.file(package = "markmyassignment"), "extdata", "example_assignment01.yml") set_assignment(assignment_path) source(file.path(system.file(package = "markmyassignment"), "extdata", "example_lab_file.R")) mark_my_assignment()
assignment_path <- file.path(system.file(package = "markmyassignment"), "extdata", "example_assignment01.yml") set_assignment(assignment_path) source(file.path(system.file(package = "markmyassignment"), "extdata", "example_lab_file.R")) mark_my_assignment()
Mark a specific assignment file
mark_my_file( tasks = NULL, mark_file = file.choose(), assignment_path = NULL, force_get_tests = FALSE, quiet = FALSE, ... )
mark_my_file( tasks = NULL, mark_file = file.choose(), assignment_path = NULL, force_get_tests = FALSE, quiet = FALSE, ... )
tasks |
Which task should be corrected (if more than one). Default is all.
To see the different task, see |
mark_file |
Path to the file to mark. |
assignment_path |
Assignment file to set before marking the assignment (url or local path). |
force_get_tests |
Argument is deprecated, use |
quiet |
Should test be run without output? |
... |
further arguments sent to |
## Not run: assignment_path <- file.path(system.file(package = "markmyassignment"), "extdata", "example_assignment01.yml") file_path <- file.path(system.file(package = "markmyassignment"), "extdata", "example_lab_file.R") mark_my_file(mark_file = file_path, assignment_path = assignment_path) ## End(Not run)
## Not run: assignment_path <- file.path(system.file(package = "markmyassignment"), "extdata", "example_assignment01.yml") file_path <- file.path(system.file(package = "markmyassignment"), "extdata", "example_lab_file.R") mark_my_file(mark_file = file_path, assignment_path = assignment_path) ## End(Not run)
Automatic marking of R assignments for students and teachers based on testthat test suites.
Sets the assignment to mark and downloads necessary files.
set_assignment(path, auth = NULL) remove_assignment() is_assignment_set() show_assignment()
set_assignment(path, auth = NULL) remove_assignment() is_assignment_set() show_assignment()
path |
Path to the yml file |
auth |
Authorization object generated by |
assignment_path <- file.path(system.file(package = "markmyassignment"), "/extdata/example_assignment01.yml") set_assignment(assignment_path)
assignment_path <- file.path(system.file(package = "markmyassignment"), "/extdata/example_assignment01.yml") set_assignment(assignment_path)
Get the name of the tasks in the assignment.
show_tasks()
show_tasks()
# We first set the assignment assignment_path <- file.path(system.file(package = "markmyassignment"), "extdata/example_assignment01.yml") set_assignment(assignment_path) show_tasks()
# We first set the assignment assignment_path <- file.path(system.file(package = "markmyassignment"), "extdata/example_assignment01.yml") set_assignment(assignment_path) show_tasks()