首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >R中具有散点图的数据点的多种颜色

R中具有散点图的数据点的多种颜色
EN

Stack Overflow用户
提问于 2020-05-02 01:21:55
回答 1查看 39关注 0票数 0

所以我的任务基本上是得到下面的图表。数据来自数据帧,其中某些值已标记为NA。因此,我的代码如下:

代码语言:javascript
运行
复制
> plot(temp,ozone,
+      xlab = "temperature",
+      ylab = "ozone",
+      col = ifelse(which(ozone>100), "red", "orange",),
+      pch = 17)

然而,我现在收到一个错误:

代码语言:javascript
运行
复制
"Error in ifelse(which(ozone > 100), "red", "orange", ) : 
  unused argument (alist())

如果有任何关于哪里出了问题的反馈/建议,我将不胜感激。我之前也尝试过这样的东西:

代码语言:javascript
运行
复制
highlevels <- which(ozone>100)
lowlevels <- which(ozone<100)
col = c("red","orange")[highlevels,lowlevels]

然而,很明显,这并不是很有效。

EN

回答 1

Stack Overflow用户

回答已采纳

发布于 2020-05-02 01:30:51

去掉which并将其包装在另一个ifelse中是一种选择:

代码语言:javascript
运行
复制
plot(temp, ozone,
     xlab = "temperature",
     ylab = "ozone",
     col = ifelse(ifelse(!is.na(ozone), ozone, 0) > 100, "red", "orange"),
     pch = 17)

另外,如果您正在使用这些库,像tidyr::replace_nadplyr::coalesce这样的函数可以为您提供帮助。

另一种选择是将所有变量子集为非缺失变量。

还有一个是设置

代码语言:javascript
运行
复制
col =  c("red", "orange")[(ozone > 100) + 1]

但这有点棘手。

票数 3
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/61547386

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档