R 更改'中值的顺序；y'；点图坐标轴

以下代码：

avector <- as.vector(top.links.added.overall$Amount)
x <- as.vector(top.links.added.overall[order(avector),])
row.names(x) <- c("Yahoo" ,"Cnn", "Google")
x$color[x$Amount == 100] <- "red"
x$color[x$Amount == 500] <- "blue"
x$color[x$Amount == 1000] <- "darkgreen"
dotchart(x$Amount,
         labels = row.names(x),
         cex=.7,
         groups = x$Amount,
         gcolor = "black",
         color = x$color,
         pch=19,
         main = "Gas Mileage for Car Models\ngrouped by cylinder",
         xlab = "Miles Per Gallon")

当我删除代码时：

---

row.names（x）我不认为我可以用提供的R数据对象来测试它，但也许可以这样做：

x <- as.vector(top.links.added.overall[order(-avector),])
row.names(x) <- rev( c("Yahoo" ,"Cnn", "Google") )

---

在您的实际数据中，是只有三个点，还是每组有一个以上的点？@David Robinson只有三个点Hanks，我尝试了您的代码，但结果相同。我已经附加了数据集，所以也许您可以重新创建？注释“代码按

排序为.numeric（groups）

”您能详细说明一下吗，您的意思是排序已经隐含在“groups”上吗？这是我在无法从帮助页面推断正确行为并需要查看源代码后推断出来的。

x <- as.vector(top.links.added.overall[order(-avector),])
row.names(x) <- rev( c("Yahoo" ,"Cnn", "Google") )

dotchart(x$Amount,
     labels = row.names(x),
     cex=.7,
     groups = -x$Amount,    # the code sorts by `as.numeric(groups)`
     gcolor = "black",
     color = x$color,
     pch=19,
     main = "Gas Mileage for Car Models\ngrouped by cylinder",
     xlab = "Miles Per Gallon")