Restore pre-v6 R partial credit behavior (#936)

* fix grading image builds due to mamba changes

* restore partial credit behavior for R assignments

* remove pritn

Author: chrispyles

CHANGELOG.md

@@ -1,5 +1,9 @@
 # Changelog
 
+**v6.1.4 (unreleased):**
+
+* Fixed R assignment grading to assign partial credit for all test cases (restoring an unintended change to pre-v6 behavior) per [#935](https://github.com/ucbds-infra/otter-grader/issues/935)
+
 **v6.1.3:**
 
 * Updated grading image build scripts to fix breakages caused by changes to Mamba

otter/test_files/__init__.py

@@ -180,6 +180,7 @@ def from_ottr_json(cls, ottr_output: dict[str, Any]) -> "GradingResults":
                 name=os.path.splitext(os.path.basename(tfr["filename"]))[0],
                 path=tfr["filename"],
                 test_cases=test_cases,
+                all_or_nothing=False,
             )
             test_file.test_case_results = test_case_results
 

test/test_run/test_integration.py

@@ -540,6 +540,31 @@ def perform_test(rmd, expected_results, error=None, **kwargs):
             error=error_message,
         )
 
+        # test that partial credit is awarded
+        pc_rmd = re.sub(r"^x <- 2$", "x <- 50", orig_rmd, flags=re.MULTILINE)
+        expected_results = copy.deepcopy(expected_rmd_results)
+        expected_results["tests"][1]["score"] = 2
+        expected_results["tests"][1]["output"] = dedent(
+            """\
+                q1 results:
+                    q1 - 1 result:
+
+                    q1 - 2 result:
+
+                    q1 - 3 result:
+                        `x` not equal to 2.
+                        1/1 mismatches
+                        [1] 50 - 2 == 48
+
+                    q1d result:
+                        as.character(x) not equal to "2".
+                        1/1 mismatches
+                        x[1]: "50"
+                        y[1]: "2"
+            """.rstrip()
+        )
+        perform_test(pc_rmd, expected_results)
+
     finally:
         delete_paths([rmd_path])
         with open(rmd_path, "w+") as f: