10月28日台北天氣晴

既然都把圖畫出來了,那該怎麼畫出輔助線呢?
如下 :
(plot)

ggplot(A,aes(x = A$AVG , y = A$OBP )) + geom_point(aes(color = A$Team),size = 4)+
  labs(x = "平均打擊率",y = "平均上壘率",title = "2012 MLB")+
  xlim(c(0.233,0.275))+
  ylim(c(0.294,0.338))+
  geom_smooth(method = lm)

這時候我們就在把我們要的輔助線疊加上去!

geom_hline(yintercept=max(as.numeric(A$OBP)),linetype="dashed",colour="#0000ff",size = 1)+
  geom_vline(xintercept=max(as.numeric(A$AVG)),linetype="dashed",colour="#0000ff",size = 1)

geom_hline水平線 : Y 軸取上壘率的最大值 線的格式為 : dashed 顏色為#0000ff
geom_vline垂直線 : X軸取打擊率的最大值 線的格式為 : dashed 顏色為#0000ff

這樣是不是更清楚些了呢~

當然大家也可以發揮自己的想像力或是需求加上所需的線~

明天要上班了,再見拉~

End.