# data
names <- c ("A", "B", "C", "D", "E", "F")
x <- c(1, 5, 10, 15, 18, 20)
y <- c(3, 10, 18, 10, 15, 12)
# plot
# generate Blank plot
plot(1:20,1: 20,type="n")
# add text labels
text(x, y, names, cex=2, pos=3, col="BLUE")
#Different colors
plot(1:20,1: 20,type="n")
mycols <- c("blue", "red", "green4", "purple", "tan", "pink")
text(x, y, names, cex=1, pos=3, col=mycols)
names <- c ("A", "B", "C", "D", "E", "F")
x <- c(1, 5, 10, 15, 18, 20)
y <- c(3, 10, 18, 10, 15, 12)
# plot
# generate Blank plot
plot(1:20,1: 20,type="n")
# add text labels
text(x, y, names, cex=2, pos=3, col="BLUE")
#Different colors
plot(1:20,1: 20,type="n")
mycols <- c("blue", "red", "green4", "purple", "tan", "pink")
text(x, y, names, cex=1, pos=3, col=mycols)
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.