《深入淺出數(shù)據(jù)分析》9-13章部分內(nèi)容&代碼
《深入淺出數(shù)據(jù)分析》PDF下載地址:
https://libgen.rs/book/index.php?md5=CD10327D10DED128EF54E7687550394B
需要梯子,進(jìn)去之后點(diǎn) “this mirror”
?
書中源數(shù)據(jù)下載地址:
鏈接:https://pan.baidu.com/s/1tBp4BRdsbDezJIUVFnteVA?pwd=7k7k?
提取碼:7k7k
?
R程序下載地址:
https://mirrors.bfsu.edu.cn/CRAN/
?

目錄
第九章?直方圖:數(shù)學(xué)的形狀
第十章?回歸:預(yù)測
第十一章?誤差:合理誤差
第十二章?相關(guān)數(shù)據(jù):你能關(guān)聯(lián)嗎?
第十三章?整理數(shù)據(jù):井然有序

更新時間:
2023/03/12
?
第九章 直方圖:數(shù)學(xué)的形狀
setwd("源數(shù)據(jù)路徑")??#設(shè)置/更改數(shù)據(jù)加載路徑
提示:R中路徑索引只能使用/不能使用\,用\提示錯誤,需要將\更改為/
?
employees <-read.csv("hfda_ch09_employees.csv",header=TRUE) ?#讀取數(shù)據(jù)文件并賦值給對象 employees
?
“<-” ?#賦值符
?
employees ??#顯示表的全部數(shù)據(jù)
?
hist(employees$received,breaks=50)??#繪制直方圖,breaks=區(qū)間數(shù)

sd(employees$received)? #查看標(biāo)準(zhǔn)偏差
summary(employees$received)? #匯總統(tǒng)計值
提示:1st Qu.? #上分位數(shù)????? 3rd Qu.? #下分位數(shù)

X11()??#創(chuàng)建新的繪圖(不執(zhí)行該代碼,下次繪圖將覆蓋上次繪圖結(jié)果)
?
#繪制加薪數(shù)據(jù)的子圖
hist(employees$received[employees$year == 2007],breaks = 50)
hist(employees$received[employees$year == 2008],breaks = 50)
hist(employees$received[employees$gender == "F"],breaks = 50)
hist(employees$received[employees$gender == "M"],breaks = 50)
hist(employees$received[employees$negotiated == FALSE],breaks = 50)
hist(employees$received[employees$negotiated == TRUE],breaks = 50)