Setting graphical parameters with par() does not work?

[cbrnr]

I was trying to create a plot after setting a parameter with par(), but the changes do not seem to persist.

In the following example, the second plot should be red, but it's still black. Is this a bug?

---
title: "test"
format: html
---

First a plot with default parameters:

```{r}
plot(1:10)
```

Now let's change the color:

```{r}
par(col="red")
```

And we plot again:

```{r}
plot(1:10)
```

[cscheid]

This is a knitr feature. You need

knitr::opts_knit$set(global.device = TRUE)

[cbrnr]

Thanks @cscheid!

[loreabad6]

Hi! I tested this solution either by adding a chunk with knitr::opts_knit$set(global.device = TRUE) or by adding it to the YAML as:

knitr:
  opts_knit:
    global.device: true

In both cases I have a weird behavior when rendering, where the initial plot is rendered after every code chunk. I can't attach the html file but here is a screenshot:

I can't test this right now on the latest Quarto version, testing now on 1.4.555 and 1.3.xx.

I assume this is a bug, but I wait for confirmation if someone can test in 1.5 to report it. Thanks!

[mcanouil]

Could you open a new discussion and could you share a small self-contained "working" (reproducible) example to work with, i.e., a complete Quarto document or a Git repository? The goal is to make it as easy as possible for us to recreate your problem so that we can fix it: please help us help you! Thanks.

---

You can share a self-contained "working" (reproducible) Quarto document using the following syntax, i.e., using more backticks than you have in your document (usually four ````).
See https://quarto.org/bug-reports.html#small-is-beautiful-aim-for-a-single-document-with-10-lines.

If you have multiple files (and if it is absolutely required to have multiple files), please share as a Git repository.

R	Python
````qmd --- title: "Reproducible Quarto Document" format: html engine: knitr --- This is a reproducible Quarto document. {{< lipsum 1 >}} ```{r} x <- c(1, 2, 3, 4, 5) y <- c(1, 4, 9, 16, 25) plot(x, y) ``` {#fig-placeholder} {{< lipsum 1 >}} The end after @fig-placeholder. ````	````qmd --- title: "Reproducible Quarto Document" format: html engine: jupyter --- This is a reproducible Quarto document. {{< lipsum 1 >}} ```{python} import matplotlib.pyplot as plt x = [1, 2, 3, 4, 5] y = [1, 4, 9, 16, 25] plt.plot(x, y) plt.show() ``` {#fig-placeholder} {{< lipsum 1 >}} The end after @fig-placeholder. ````

Additionally and if not already given, please share the output of quarto check within a code blocks (i.e., using three backticks ```txt), see https://quarto.org/bug-reports.html#check.

[loreabad6]

thanks @mcanouil

Should I go for a discussion or directly for an issue?

[mcanouil]

It does not really matter if you provide all the information requested in the template, especially in the issue template.

If you are not completely sure, a discussion might be better. (we can still open an issue from the discussion if needed)

[cderv]

Issue opened at

• Setting knitr::opts_knit$set(global.device = TRUE) duplicates plots when rendering #10302