Question

我正在尝试使用R在地图中添加标签。我需要在标签上加上一个条件。尝试了多种选择但无济于事。

png(filename="D:\\dm analysis3.png", width=959, height=593)
plot(zip,col=ifelse(zip@data$Seg=="Super Top",'Dark Green',
                      ifelse(zip@data$Seg=="Top Performer",'Light Green',
                    ifelse(zip@data$Seg=="Average Performer",'Yellow',
                           ifelse(zip@data$Seg=="Poor Performer",'Red',
                                  ifelse(zip@data$Seg=="Zero returns",'Dark Red',
                                         'Grey'))))),
     border=ifelse(zip@data$Seg=="Super Top",'Dark Green',
                   ifelse(zip@data$Seg=="Top Performer",'Light Green',
                          ifelse(zip@data$Seg=="Average Performer",'Yellow',
                                 ifelse(zip@data$Seg=="Poor Performer",'Red',
                                        ifelse(zip@data$Seg=="Zero returns",'Dark Red',
                                               'Grey'))))),
     bty="n")

with(subset(zip@data,zip@data$flag=="Y"),
     text(zip@data,labels=as.character(zip@data$code)))

map('state', plot = TRUE, fill = FALSE,add=TRUE)
dev.off()

任何人都可以告诉我如何打印标签，我无法这样做

Answer 1

在调用plot命令之前，您必须准备颜色向量。在plot命令中，预先评估给col选项的参数，没有这样的推理和＃34;好的，现在我正在绘制第n个点，根据zip＆＃34;中的当前索引，让我们现在计算出第n种颜色是什么颜色。

编辑：我可以看到我可能已经过于及时地回答了问题。你到底是什么问题？它涉及您为col选项提供的内容吗？ border选项？或者稍后给text命令的内容？

添加标签到地图

1 个答案: