install.packages("ineq")
library(ineq)
ineq(x, type="Theil")
用R作图,比用EXCEL要灵活的多。散点图,直接用plot()即可
拟合曲线用 fit<- lm()
lines(fit)
添加文字用 text()
install.packages("ineq")
library(ineq)
ineq(x, type="Theil")
用R作图,比用EXCEL要灵活的多。散点图,直接用plot()即可
拟合曲线用 fit<- lm()
lines(fit)
添加文字用 text()