This is one approach to adjusting the label and quantity sizes and providing a "margin".

Check out the documentation under plot.euler for other formatting options.

As eulerr is based on grid you can provide margins in effect by adjusting the size of the viewport used for plotting. The answer shows a plot reduced to 80% of the original height and width.

Although I noticed that the relative positions of the venn diagram elements changes as you rerun the code I never found that the circles straying outside the canvas margin.

set.seed() did not seem to change anything.

library(eulerr)
library(grid)

my_dt <- data.frame(
  value = c(1:8), 
  A = c(TRUE,  TRUE, FALSE, TRUE,  TRUE, FALSE, FALSE, TRUE),
  B = c(TRUE,  FALSE,  TRUE, TRUE, FALSE, FALSE, TRUE,  TRUE),
  C = c(FALSE, FALSE, FALSE, FALSE, TRUE,  TRUE,  TRUE, FALSE)
)

p <- plot(euler(my_dt[, c("A", "B", "C")]), 
     quantities = list(cex = 2),
     labels = list(cex = 2))

# edit the viewport dimensions

pwidth <- unit(0.8, "npc")
pheight <- unit(0.8, "npc")


p

^{Created on 2023-06-30 with reprex v2.0.2}

Sorry about this. That post is old and the arguments have changed.

Try this instead

fit2 <- euler(c(A = 16971, B = 218, C = 215, 
                "A&B" = 112, "A&C" = 112, "B&C"= 51,"A&B&C" = 23))
plot(fit2,
     fills = c("dodgerblue4", "darkgoldenrod1", "cornsilk4"),
     edges = FALSE,
     fontsize = 8,
     quantities = list(fontsize = 8))

You're looking for the gridExtra package. grid.arrange() is probably all you need:

library(eulerr)
library(data.table)
library(gridExtra) # for arranging the plots

x <- data.table("A" = rep(c(TRUE,FALSE), times = 20),
                "B" = rep(c(TRUE,FALSE), each = 10),
                "C" = rep(c(TRUE,TRUE,FALSE,TRUE), times = 5))

fit.ellipses <- eulerr::euler(combinations = x, shape = "ellipse")

# here is the basic plot, this part works
plot(fit.ellipses)


# Using grid.arrange() from gridExtra:
grid.arrange(
  plot(fit.ellipses),
  plot(fit.ellipses)
)

# you can also use ncol/nrow to define the plot layout
grid.arrange(
  plot(fit.ellipses),
  plot(fit.ellipses),
  plot(fit.ellipses),
  nrow=1
)

output of the second plot: