今天來看ggplot該怎麼寫
網路上也有很多教學大家可以參考
報告的期限是1/12還沒動工的要開始啦
有問題可以來TA課或是mail給董承

GGPLOT

反正就是一個好看 畫起來超級猛的套件

#install.packages("ggplot2")  #還沒安裝過的要先裝
library(ggplot2) #裝完了要記得打開

先講基本語法 一開始可以先打打看ggplot()

ggplot()

如果什麼都沒有表示你做對了
ggplot是一種圖層是的繪圖
簡單來講就是一個部分一個部分慢慢疊上去 彼此用+連接
剛剛我們畫的ggplot( )就是先放一張白紙 接著可以放一些要畫的東西 例如 geom_point 這是畫散布圖
geom_bar 這是長條圖
geom_histogram 這是直方圖
geom_line 這是折線圖
geom_boxplot 這是boxplot
大概就上面這些了吧

#第一步先把資料讀進來
hotel<-read.csv("~/Desktop/HotelPrices.csv")

散布圖

先給一個例子

ggplot()+geom_point(data=hotel,aes(x=Two.Star,y=Three.Star))+geom_smooth()

來拆解一下

ggplot( ) <-這是畫布
geom_point( ) <- 這是你希望他做什麼動作
geom_point(data=你的資料名稱,aes(x=橫軸放的東西,y=縱軸放的東西))
如果希望按照是在哪一個州可以加color=Continent

ggplot()+geom_point(data=hotel,aes(x=Two.Star,y=Three.Star,color=Continent))

只要把geom_point 改成geom_line 就是折線圖了

直方圖 Bar plot

這就比較複雜了
建議大家可以把想要呈現得圖形先畫在紙上
會比較好打code
如果大家要比較星等的話
可以用

ggplot()+geom_bar(data = hotel,aes(x=Continent,y=Four.Star),stat = "identity")

#一樣幫董承徵友^^

如果要看平均的話
可以在y的地方加上mean
也可以看中位數 加上median

ggplot()+geom_bar(data = hotel,aes(x=Continent,y=mean(Four.Star)),stat = "identity")

大概就這樣
還有一次助教課大家有任何問題
都可以來問
或者星期三的Office Hour (這個來以前要先mail)