Lô bằng màu có điều kiện dựa trên các giá trị trong R

Question

Tôi muốn vẽ đồ thị với các màu khác nhau dựa trên giá trị. Tôi đã viết mã bên dưới,

np_graph <- data.frame(C1 = -5:5, C2 = -5:5) 
x=np_graph2$C1 
y=np_graph2$C2 
plot(x,y,xlab="PC1",ylab="PC2") 

Bây giờ, nếu giá trị X là> 0 thì giá trị đó phải bằng màu xanh lá cây (trong biểu đồ). nếu giá trị của Y là> 0 thì giá trị đó phải bằng màu đỏ (trong biểu đồ).

Ai đó có thể giúp tôi trong vấn đề này không?

Answer 1

Đối số col sẽ đặt màu, bạn có thể sử dụng điều này cùng với tuyên bố ifelse. Xem ?plot để biết thêm chi tiết.

# using base plot 
plot(x,y,xlab="PC1",ylab="PC2", col = ifelse(x < 0,'red','green'), pch = 19) 

Để làm điều tương tự trong ggplot2.

#using ggplot2 
library(ggplot2) 
ggplot(np_graph) + geom_point(aes(x = C1, y = C2, colour = C1 >0)) + 
    scale_colour_manual(name = 'PC1 > 0', values = setNames(c('red','green'),c(T, F))) + 
    xlab('PC1') + ylab('PC2')