がどのように/ジッタgeom_textラベルの図では

Question

のための重複を削除するには、それは彼らが重ならないように、州の略称はビットをラベルジッタ可能ですか？ check_overlap = TRUEを使用すると、重複している観測値が削除されますが、私はそれを望んでいません。私それはラベルが突き出ると（私が起こることを望んでいません）私は含まれ45度線を越えて移動していることからも、geom_label_repelを望んでいない

ここに参照のための私のコードの適切な部分があります：

ggplot(df, aes(x = huff_margin_dem, y = margin16dem_state, label = abbrev)) + 
    geom_abline(intercept = 0) + 
    geom_text(fontface = "bold") 

Answer 1

position=position_jitter()を試しましたか？ widthとheightを選択して調整することができます。

ggplot(df, aes(x = huff_margin_dem, y = margin16dem_state, label = abbrev)) + 
    geom_abline(intercept = 0) + 
    geom_text(fontface = "bold",position=position_jitter(width=1,height=1)) 

EDIT 例では、特定のラベルを操作するだけ

+geom_text(fontface = "bold", 
position=position_jitter(width=ifelse(df$abbrev=='KS',1,0), 
     height=ifelse(df$abbrev=='KS',1,0))) 

または複数のラベル

df$jit<-with(df, ifelse(abbrev == "KS" | abbrev == "LA", 1, 2)) 

+geom_text(fontface = "bold", 
    position=position_jitter(width=df$jit,height=df$jit))