geom_histogramのx軸とy軸を指定してポイントにラベルを付ける

Question

ポイント（x = 0、y = 1500）を次のヒストグラムのテキストラベルの隣に表示するにはどうすればよいですか？

あなたはポイントデータにダミー data.frameを作成する必要が

ggplot(ds_visits, aes(x = patientsInService)) + 
    geom_histogram(stat = "count", col = "black", fill = "white") + 
    theme_bw() + 
    labs(x = "Patients in service", y = "Cases") + 
    scale_x_discrete(limits = seq(0, 5, 1)) 

Answer 1

：

pointData <- data.frame(X = 0, Y = 1500) 

プロットは、2つの追加の宝石（geom_pointとgeom_text）とと：geom_textで

ggplot(ds_visits, aes(patientsInService)) + 
geom_histogram(stat = "count", col = "black", fill = "white") + 
geom_point(data = pointData, aes(X , Y)) + 
geom_text(data = pointData, aes(X + 1 , Y + 10, label = "My Text")) 

私は変更していますテキストをポイントと重ならないように少し調整します。