You'd put something like this into .Rprofile:
reprex <- purrr::partial(reprex::reprex, venue = "r")
You then use it as usual with copying something like this:
library(ggplot2)
ggplot(mtcars, aes(x = as.factor(cyl), y = mpg)) +
geom_boxplot()
When you run reprex() it'll produce following output:
> reprex()
Rendering reprex...
Rendered reprex is on the clipboard.
[1] "library(ggplot2)"
[2] "ggplot(mtcars, aes(x = as.factor(cyl), y = mpg)) +"
[3] " geom_boxplot()"
[4] ""
[5] "#' "
This, of course, means that pictures will need to be attached somehow to reports, but that is left as an exercise to the reader 