축 변경 틱 서식을 지정하고 플롯 할 줄을 추가합니다.

Question

나는 범주 형 x 축을가집니다. 나는 축을 따라 상자에 레이블을, 그 위에 중심에 반대 진드기를 갖고 싶습니다. 나는 또한 플롯에서 x 축을 따라 각 카테고리를 분리하는 수직선을 갖고 싶습니다. 여기

df <- read.table(tc <- textConnection(" 
    x  y 
Cat1 2.3 
Cat2 2.7 
Cat3 1.0 
Cat1 0.9 
Cat2 9.3 
Cat3 3.3"), header = TRUE); close(tc) 

이 결과 플롯이다 :

ggplot(df,aes(x,y))+ 
    geom_point()+ 
    theme_bw(base_size=16)+ 
    opts(panel.grid.major=theme_blank()) 

그리고 여기에 내가 같이 할 음모를 싶은 것이 약이다 여기

는 예를 들어 데이터 집합은 다음과 같습니다

도움을 주셔서 감사합니다.

Answer 1

그냥 당신이 실제로 CAT1/CAT2 및 CAT2/Cat3 특징 사이 틱하지 않은 가정, 당신의 음모를 꾸미고 코드

# YOUR CODE 
pl0 = ggplot(df,aes(x,y))+ 
    geom_point()+ 
    theme_bw(base_size=16)+ 
    opts(panel.grid.major=theme_blank()) 

# MY ADDITION 
pl1 = pl0 + opts(axis.ticks = theme_blank()) + 
    geom_vline(xintercept = 1.5) + 
    geom_vline(xintercept = 2.5)