การสร้างกราฟใน R เบื่องต้น

การดึงข้อมูล sample_price.csv เข้ามาในโปรแกรม R

df = read.csv("sample_houseprice2.csv")
head(df)

##   Id MSSubClass MSZoning LotFrontage LotArea Street YearBuilt SalePrice
## 1 12         60       RL          85   11924   Pave      2005    345000
## 2 14         20       RL          91   10652   Pave      2006    279500
## 3 21         60       RL         101   14215   Pave      2005    325300
## 4 26         20       RL         110   14230   Pave      2007    256300
## 5 28         20       RL          98   11478   Pave      2007    306000
## 6 33         20       RL          85   11049   Pave      2007    179900

attach(df)

การสร้าง scatter plot เบื้องต้น

plot(LotFrontage,SalePrice)

การเปลี่ยนลักษณะของจุดบนกราฟ

โดยใช้คำสั่ง pch = 0 ถึง pch = 25

plot(LotFrontage,SalePrice,pch=18)

เปลี่ยนขนาดตัวอักษรตรงชื่อของแกน x และ y

plot(LotFrontage,SalePrice,pch=18,cex.lab = 1.5)

เปลี่ยนขนาดตัวเลขบนแกน x และ y

โดยใช้คำสั่ง cex.axis

plot(LotFrontage,SalePrice,pch=18,cex.lab = 1.5,cex.axis=1.2)

ปรับขนาดของจุด

โดยใช้คำสั่ง cex

plot(LotFrontage,SalePrice,pch=18,cex.lab = 1.5,cex.axis=1.2,cex=1.5)

เปลี่ยนชื่อของแกน x โดย xlab เปลี่ยนชื่อของแกน y โดย ylab

plot(LotFrontage,SalePrice,pch=18,cex.lab = 1.5,cex.axis=1.2,cex=1.5,xlab = "ระยะด้านหน้า",ylab = "ราคาขาย")

เปลี่ยนสีของ”จุด”บนกราฟ

โดยใช้คำสั่ง col = ” ”

plot(LotFrontage,SalePrice,pch=18,cex.lab = 1.5,cex.axis=1.2,cex=1.5,xlab = "ระยะด้านหน้า",ylab = "ราคาขาย",col=c("brown2","blue2"))

การสร้างกราฟ 2 คอลัมน์ 1 แถวในหน้าเดียวกัน

mfrow = c(num of row , num of col)

par(mfrow = c(1,2))

การสร้าง boxplotแนวตั้ง

boxplot(LotFrontage,SalePrice,col="brown2",pch=20)

boxplot(LotArea,SalePrice,col="blue2",pch=20)

การสร้าง boxplotแนวนอน โดยกำหนด horizontal= TRUE

boxplot(LotFrontage,SalePrice,col="brown2",pch=20,horizontal= TRUE)

boxplot(LotArea,SalePrice,col="blue2",pch=20,horizontal= TRUE)

การสร้างกราฟฮิสโตแกรม

โดยใช้คำสั่ง hist

hist(SalePrice,col="deeppink")

การสร้างกราฟ Density

โดยใช้คำสั่ง density

plot(density(SalePrice),col="deeppink")

การสร้าง Bar graph เบื้องต้น

เริ่มจากการสร้างตารางแจกจงความถี่

names(data)

## NULL

table(MSZoning,MSSubClass)

##         MSSubClass
## MSZoning 20 60 80 120 160 180
##       FV 12 17  0   3   8   0
##       RL 95 52  2  28   0   0
##       RM  0  0  0   2   0   3

สร้างกราฟแท่ง

โดยใช้คำสั่ง barplot

barplot(table(MSZoning,MSSubClass),col = c("seagreen","salmon"))

ปรับให้เป็นกราฟแท่งปกติ

โดยใช้คำสั่ง beside = TRUE

barplot(table(MSZoning,MSSubClass),col = c("seagreen","salmon","darkorchid"),beside = TRUE)

เพิ่มคำอธิบายกราฟ

โดยใช้คำสั่ง legend.tex

barplot(table(MSZoning,MSSubClass),col = c("seagreen","salmon","darkorchid"),beside = TRUE,legend.text = TRUE)

เพิ่มคำอธิบายแกน

โดยใช้คำสั่ง xlab = ” ”

barplot(table(MSZoning,MSSubClass), col=c("seagreen","salmon","darkorchid"), beside=TRUE,legend.text=TRUE,xlab = "The building class")

การสร้างกราฟแท่งแนวนอน โดยกำหนด horizontal= TRUE

barplot(table(MSZoning,MSSubClass), col=c("seagreen","salmon","darkorchid"), beside=TRUE,legend.text=TRUE,xlab = "The building class",horiz= T)

การสร้างข้อมูล

data = data.frame(MSZoning = c("FV", "RL", "RM"), value = c(40, 177,80))
data

##   MSZoning value
## 1       FV    40
## 2       RL   177
## 3       RM    80

การสร้างกราฟวงกลม

โดยใช้คำสั่ง pie

pie(data$value, labels = data$MSZoning, radius = 1, col = c("seagreen","salmon","darkorchid"))

การตั้งชื่อกราฟ

pie(data$value, labels = data$MSZoning,radius = 1, col = c("seagreen","salmon","darkorchid"),main = "Value_MSZoning" )

การสร้างแผนภาพจุด

value = c(40, 177,80)
MSZoning = c("FV", "RL", "RM")
dotchart(value, labels = MSZoning, main = "Value_MSZoning" )