R中的散点图

Question

我正在尝试构建一个散点图，但我得到了9个子图（imgur.com/XtsArW6）。输入数据采用CSV格式[1]。我希望标题位于X轴，值将位于Y轴。我如何构建单个散点图，其中列名称将在X轴中，并且值将在Y轴中？

[1] input.csv

中的数据

Roundrobin,Roundrobin1,Roundrobin2
159,203,186
169,213,145
142,235,124

[2]我的R脚本

my_data <- read.csv("input.csv", header=TRUE, sep=",")

plot(my_data)
box()

[3] dput(my_data)的输出。

structure(list(Roundrobin = c(159L, 169L, 142L), Roundrobin1 = c(203L, 213L, 235L), Roundrobin2 = c(186L, 145L, 124L)), .Names = c("Roundrobin", "Roundrobin1 "Roundrobin2"), class = "data.frame", row.names = c(NA, -3L)) 

Answer 1

（您的dput中有错误，也建议编辑）

library(reshape)
library(ggplot)
my_data$ID <- seq.int(nrow(my_data)
melted <- melt(my_data,id=c("ID"))
ggplot(melted)+geom_point(aes(x=ID,y=value,color=factor(variable)))

一个稍微有点花哨的版本，包括字幕

ggplot(melted)+
geom_point(aes(x=ID,y=value,color=factor(variable))) +
xlab("X Axis Label")+
ylab("Y Axis Label") + 
scale_color_manual(name="Round robins",labels=c("1","2","3"),values=c("red","green","blue"))

没有ggplot的版本

my_data$ID <- seq.int(nrow(my_data)
melted <- melt(my_data,id=c("ID"))
plot(melted$ID,melted$value,col=factor(melted$variable))