如何根据两个过滤器的条件为散点图上的点着色？
How can I color points on a scatterplot based on condition of two filters?
我有一个散点图，我想给点上色，使所有满足这两个条件的点都变成红色。条件是 abs(x) > .15 和 abs(y)>1.4
colour <- ifelse(abs(x)>.15, "red", "black")
colour <- ifelse(abs(y)>1.4, "red", "black")
# colour <- ifelse((abs(y)>1.4&&abs(x)>.15), "red", "black") #all black
plot(y, x, main="scatter - meth vs exp - diff", xlab="delta beta (.15)", ylab="log2(exp)", col=colour)
abline(h=c(-1.4, 1.4), v=c(-.15, .15), col="gray", lty=3)
我在这里错过了什么？感谢任何建议。
这是否产生了预期的结果？
x <- rnorm(10)
y <- rnorm(10)
colour <- ifelse(abs(x)>.15 & abs(y)>1.4, "red", "black")
# colour <- ifelse((abs(y)>1.4&&abs(x)>.15), "red", "black") #all black
plot(y, x, main="scatter - meth vs exp - diff", xlab="delta beta (.15)", ylab="log2(exp)", col=colour)
abline(h=c(-1.4, 1.4), v=c(-.15, .15), col="gray", lty=3)
只需使用 & 将两个条件结合起来。
我有一个散点图，我想给点上色，使所有满足这两个条件的点都变成红色。条件是 abs(x) > .15 和 abs(y)>1.4
colour <- ifelse(abs(x)>.15, "red", "black")
colour <- ifelse(abs(y)>1.4, "red", "black")
# colour <- ifelse((abs(y)>1.4&&abs(x)>.15), "red", "black") #all black
plot(y, x, main="scatter - meth vs exp - diff", xlab="delta beta (.15)", ylab="log2(exp)", col=colour)
abline(h=c(-1.4, 1.4), v=c(-.15, .15), col="gray", lty=3)
我在这里错过了什么？感谢任何建议。
这是否产生了预期的结果？
x <- rnorm(10)
y <- rnorm(10)
colour <- ifelse(abs(x)>.15 & abs(y)>1.4, "red", "black")
# colour <- ifelse((abs(y)>1.4&&abs(x)>.15), "red", "black") #all black
plot(y, x, main="scatter - meth vs exp - diff", xlab="delta beta (.15)", ylab="log2(exp)", col=colour)
abline(h=c(-1.4, 1.4), v=c(-.15, .15), col="gray", lty=3)
只需使用 & 将两个条件结合起来。