R的兄弟姐妹们，帮我看看这个复杂无比的图

纵轴是系统性过敏得分，横轴不清楚，下面的图标题是血清组胺聚集。
感觉这么复杂的图，恐怕只有R能做的出来，高人们，朋友们，帮我看看。
使者敬上。

A piece by piece solution:

1. # Start a new plot, set axis limits and labels, and a few other options
   
2. plot(NA, NA, type = "n", xlim = c(0, 6), ylim = c(0, 4),
   
3.      main = "Systemic anaphylactic scores",
   
4.      xlab = "Serum histamine concentrations",
   
5.      ylab = "Systemic anaphylactic\nscores",
   
6.      xaxs = "i", yaxs = "i", axes = F,
   
7.      mar = c(5, 5, 4, 2) + 0.1,
   
8.      mgp = c(2, 1, 0))
   
9. # x axis
   
10. # Following @nuomin's suggestion, in my opinion 0.5, 1.5, 2.5, ...
    
11. # works better than 1, 2, 3, ...
    
12. axis(side = 1, at = c(0:5 + 0.5),
    
13.      labels = c("A (+)", "B", "C", "D", "E", "F (-)"),
    
14.      pos = 0)
    
15. # y axis
    
16. axis(side = 2, at = c(0:4), las = 1)
    
17. # connect both axes
    
18. abline(h = 0)
    
19. # Sample code to add data from the first group "A (+)"
    
20. points(c(0:3/10 + 0.35), rep(2, times = 4), pch = 25, bg = "black")
    
21. points(0.5, 2.25, pch = 25, bg = "black")
    
22. lines(c(0.1, 0.9), c(2.05, 2.05))
    
23. text(0.5, 3.75, "a")
    
24. # Other data may be added in a similar manner

复制代码

Result (with sample data only):

横轴是123456，这样的话可以在0.8，0.9，1.1，1.2处画四个倒三角。纯猜测

zhangyangsmith 发表于 2014-3-27 18:01
A piece by piece solution:

Result (with sample data only):

非常感谢，发现晚了，请原谅。

太复杂