ch_chengji<-function(x){if(x>95){return("這個(gè)學(xué)生語文成績不錯(cuò)啊，成績評為:A++")}else if(...

qplot(carat,price,data=diamonds)qplot(carat,price,data=diamonds,alpha=I(...