# R program to add points to a plot
# Creating coordinate vectors
x <- c(1.3, 3.5, 1.4, -3.1, 5.7, 2.4, 3.3, 2.5, 2.3, 1.9, 1.8, 2.3)
y <- c(2.5, 5.8, 2.1, -3, 12, 5, 6.2, 4.8, 4.2, 3.5, 3.7, 5.2)
plot(x, y, cex = 1, pch = 3, xlab ="x", ylab ="y", col ="black")
# Creating coordinates to be added
x2 <- c(4.2, 1.2, -2.4, -0.3, -1.3, 2.5)
y2 <- c(2.4, 4.3, 1.4, 2.3, -2, 4.5)
# Calling points() function
points(x2, y2, cex = 2, pch = 6, col ="blue")
# Adding points of different shape and size
x3 <- c(4, 0)
y3 <- c(7, -2)
points(x3, y3, cex = 4, pch = 14, col ="green")