4

でプロットを描きましたR。

plot(NA,xlim=c(0,1),ylim=c(0,1), xlab=expression(delta),ylab="K", xaxs="i",yaxs="i",main = "Zones of extreme equality and inequality in BO1") # Empty plot
cols <- c("red","black")
legend("topright",legend=c("Gini < 0.05","Gini > 0.6"), density=c(NA,NA), angle=c(NA,NA), col=cols)

凡例のボックスは着色されていません。ここで何が問題なのですか?

4

3 に答える 3

12

使ってみてくださいpch:

legend("topright",
       legend=c("Gini < 0.05","Gini > 0.6"), 
       pch=15,
       col=cols)
于 2013-05-18T13:08:45.363 に答える
5

塗りつぶしに色を入れることもできます：

legend("topright",legend=c("Gini < 0.05","Gini > 0.6"), fill=cols)
于 2015-08-01T22:17:12.510 に答える
2

多分あなたはこのようにそれを試してみてください：

legend("topright",legend=c("Gini < 0.05","Gini > 0.6"), pch=15, col=cols)
于 2013-05-18T13:09:46.820 に答える