r - 如何将情节和传说结合起来？

我正在尝试将图例附加到 R 中的情节。
我尝试了以下代码(取自 http://www.harding.edu/fmccown/r/ )

# Define cars vector with 5 values
cars <- c(1, 3, 6, 4, 9)

# Define some colors ideal for black & white print
colors <- c("white","grey70","grey90","grey50","black")

# Calculate the percentage for each day, rounded to one
# decimal place
car_labels <- round(cars/sum(cars) * 100, 1)

# Concatenate a '%' char after each value
car_labels <- paste(car_labels, "%", sep="")

# Create a pie chart with defined heading and custom colors
# and labels
pie(cars, main="Cars", col=colors, labels=car_labels,
   cex=0.8)

# Create a legend at the right
legend(1.5, 0.5, c("Mon","Tue","Wed","Thu","Fri"), cex=0.8,
   fill=colors)

然而，这并不能很好地工作。在 pie(cars, main="Cars", col=colors, labels=car_labels,cex=0.8) 线之后，情节显示没有图例:-) .......我看到的每个例子网上好像有 图例 函数后面的绘图函数所以看起来很奇怪………………

当我尝试执行图例功能时，我得到

最佳答案

你离开了坐标系。试试这个

# Create a legend at the right
legend("topleft", c("Mon","Tue","Wed","Thu","Fri"), cex=0.8, fill=colors)

产生下面的图表:

请参阅 legend 的帮助页面以了解不同的放置选项。

关于r - 如何将情节和传说结合起来？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/9366229/