How to draw a venn diagram of two sets, with the intersection colored with blue, rest of the area white and borders with black

to draw a venn diagram with colored intersection, legends with border

# Draw a Venn diagram
x <- list(A = 1:3, B = 3:5, C = 5:7)
venn(x, col="black", snames = "AB, BC, CD")