# NOT RUN {
if (interactive()) {
# Create an SVG with a single
# ellipse element
svg <-
SVG(width = 60, height = 60) %>%
svg_ellipse(
x = 30, y = 30,
width = 50, height = 30,
fill = "purple"
)
}
# }
Run the code above in your browser using DataLab