(
code: str, *,
prefix: Prefix, version: str, args: Sequence[str] = (), cwd: str,
cli_opts: Sequence[str],
)
| 26 | |
| 27 | |
| 28 | def _execute_r( |
| 29 | code: str, *, |
| 30 | prefix: Prefix, version: str, args: Sequence[str] = (), cwd: str, |
| 31 | cli_opts: Sequence[str], |
| 32 | ) -> str: |
| 33 | with in_env(prefix, version), _r_code_in_tempfile(code) as f: |
| 34 | _, out, _ = cmd_output( |
| 35 | _rscript_exec(), *cli_opts, f, *args, cwd=cwd, |
| 36 | ) |
| 37 | return out.rstrip('\n') |
| 38 | |
| 39 | |
| 40 | def _execute_r_in_renv( |
no test coverage detected