R基本图形：在分组数据定制轴标签

Question

df <- data.frame(g1=c('A', 'A', 'B', 'B'), 
       g2=c('a', 'b', 'a', 'b'), 
       v1=1:4, 
       v2=4:1) 

我试图让这样的事情，其中​​的两个“团”变量g1和g2被标记为如下所示的自定义的方式 - 注意到两者之间的小空间组。我意识到如果x轴从0到10，那么我们在2,4,7和9（或多或少）有a，b，a和b，在3和8有A和B.但是，这怎么能指定 - 在致电axis()或text()？我想做到这一点的基础R.

Answer 1

一种方法是

df <- data.frame(g1=c('A', 'A', 'B', 'B'), 
       g2=c('a', 'b', 'a', 'b'), 
       v1=1:4, 
       v2=4:1) 
plot(df$v1, df$v1, xaxt = 'n', pch = 15) 
points(df$v2, df$v1, pch = 13) 
axis(1, at = df$v1, labels = df$g2) 
axis(1, at = c(1.5, 3.5), labels = unique(df$g1), line = 1, tick = F)