合并同一图表上的信息

Question

我有一些看起来像这样的数据：

  Expression1    Expression2  CellType  Patient   
     9.34          8.23         3.2      A
     8.2           3.2         10.9      B      
     2.12          5.3         12.9      B    
     2.10          1.3          2.9      B    
     2.12          1.5          2.9      A    
     2.11          9.5          6.9      A    

     

...... .... ...... ....

我想分别在y轴和x轴上生成带有Expression1和Expression2的图（带有ggplot），并根据CellType列以单色渐变着色点，同时区分患者A和B在同一个地块上。

有人能帮帮我吗？

ggplot(myDF, aes(Expression1, Expression2)) +  geom_point(aes(colour = CellType)) + scale_colour_gradient2(low="black",mid="white" , high="red", + ggtitle("First_attempt")

我不知道如何为患者添加渐变

提前谢谢

Answer 1

以下似乎工作正常：

dt <- data.table::fread('Expression1    Expression2  CellType  Patient   
     9.34          8.23         3.2      A
           8.2           3.2         10.9      B      
           2.12          5.3         12.9      B    
           2.10          1.3          2.9      B    
           2.12          1.5          2.9      A    
           2.11          9.5          6.9      A ')

library(ggplot2)
ggplot(dt) + geom_point(aes(x = Expression2, y = Expression1, 
                            color = CellType, shape = Patient))

<强>输出