次のコード:
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")
このグラフを生成します:
データセット top.links.added.overall$Amount の形式は次のとおりです。
ファイルデータセットは次のとおりです。
Amount,Name
1000,Google
500,Cnn
100,Yahoo
コードを削除すると:
row.names(x) <- c("Yahoo" ,"Cnn", "Google")
1,2,3 の行名を取得します
「y」軸の名前を設定する必要はありませんか? グラフのコードを修正して、数値が最も低い会社 (この場合は yahoo) が、現在発生しているトップではなく 'y' 軸の先頭から始まるようにするにはどうすればよいでしょうか?