2

次のコード:

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' 軸の先頭から始まるようにするにはどうすればよいでしょうか?

4

1 に答える 1