1つのプロットポイントでggrepelを使う/ラベルとポイントの間に行を追加する

Question

私は2つの変数XとYとID変数を持つデータセットを持っています。これは、このようなプロットを生成

ggplot(data = X_Y) + 
    geom_point(mapping = aes(x = X, y = Y))+ 
    geom_text_repel(mapping = aes(x = X, y = Y, label = ID))+ 
    xlim(0,100)+ 
    ylim(0,100) 

：私はこのコードを使用して完全なプロットを作成しました

私は今一度に単一のデータポイントを示す別のプロット数を作成したい

彼らのレーベルと一緒に。

今、私は反発せずにgeom_label、これを取得するためにラベルを微調整するだけで使用することができます。

このプロットはOKですがどのようなポイントにラベルを結ぶ線を保つためにどのような方法があった場合、私は思っていました最初の提案からggrepelはありません...

EDIT

、私が選択した1例のみで撃退使用をしようとしたとき、私は、次のプロットを得る：

を

はそれを考え出した決議

ggplot(data = X_Y) + 
    geom_point(aes(x = X[4], y = Y[4]))+ 
    geom_label_repel(aes(x = X[4], y = Y[4]), 
        label = "You are here", 
        min.segment.length = unit(0, 'lines'), 
        nudge_y = 6)+ 
    labs(x = "X",y = "Y",title = "mytitle")+ 
    scale_x_continuous(limits = c(0, 100)) + 
    scale_y_continuous(limits = c(0, 100)) 

！私はXとYの変数だけで、興味のある行に制限するために、ggplot（）で自分のデータを指定する必要があります。このよう

：

ggplot(data = X_Y[4,c(3,4)) + 
    geom_point(aes(x = X, y = Y))+ 
    geom_label_repel(aes(x = X, y = Y), 
        label = "You are here", 
        min.segment.length = unit(0, 'lines'), 
        nudge_y = 6)+ 
    labs(x = "X",y = "Y",title = "mytitle")+ 
    scale_x_continuous(limits = c(0, 100)) + 
    scale_y_continuous(limits = c(0, 100)) 

Answer 1

もちろん、まだ1つもポイントで、geom_label_repelを使用することができます。セグメントが描画されていることを確認するには、min.segment.length argを調整します。このargはunit(0, 'lines')に設定すると、すべてのセグメントが描かれている保証し、セグメントを描画するためにラベルをポイントからの最小距離を設定します：repsonseため

library(ggplot2) 
library(ggrepel) 

ggplot(data.frame(x = 2, y = 3)) + 
    geom_point(aes(x, y)) + 
    geom_label_repel(aes(x, y), 
        label = 'You are here', 
        min.segment.length = unit(0, 'lines'), 
        nudge_y = .2) + 
    scale_x_continuous(limits = c(0, 3)) + 
    scale_y_continuous(limits = c(0, 4))