#從EXCEL讀取資料
A <- read.csv(file=’a.csv’)
A #A是R裡面的資料集
B=A[,3:4]
plot(B,main=’散佈圖+回歸線’,xlab=’身高’,ylab=’體重’,col=’blue’,cex=1,pch=20) #col顏色#cex大小#pch形狀
attach(B)
abline(lm(Y~X),col=2,lwd=6)
windows() #開啟一個新的視窗
hist(Y,breaks=50,col=10) #hist直方圖
220915 計量經濟學_作業