R語(yǔ)言因子分析、相關(guān)性分析大學(xué)生兼職現(xiàn)狀調(diào)查問(wèn)卷數(shù)據(jù)可視化報(bào)告
全文鏈接:http://tecdat.cn/?p=31765
原文出處:拓端數(shù)據(jù)部落公眾號(hào)
隨著大學(xué)的普及教育,大學(xué)生就業(yè)形勢(shì)變得更加困難,很多學(xué)生都意識(shí)到這個(gè)問(wèn)題。所以走出象牙塔,去接觸社會(huì),來(lái)增長(zhǎng)社會(huì)經(jīng)驗(yàn)也會(huì)成為一個(gè)必然趨勢(shì)。而大學(xué)生兼職既可以接觸社會(huì)鍛煉自己,又可以使自己的經(jīng)濟(jì)條件得到一定的改善,因而成為很多大學(xué)生的不二之選,漸漸形成一種普遍現(xiàn)象。但是在兼職過(guò)程中大學(xué)生也會(huì)碰到各種各樣的挫折,甚至很多人逐漸把重心轉(zhuǎn)移到高收益上,遠(yuǎn)離了鍛煉自己的初衷,同時(shí)由于法律意識(shí)的缺失,大學(xué)生在兼職過(guò)程中有可能上當(dāng)受騙,甚至誤入歧途,怎樣解決這些存在的問(wèn)題成了兼職現(xiàn)象中不得忽視的一個(gè)重要問(wèn)題。而大學(xué)生從兼職中實(shí)際的得到了哪些收獲,更是最根本的問(wèn)題。
帶著這些問(wèn)題,我們幫助客戶進(jìn)行了本次調(diào)查,以了解大學(xué)生兼職的情況,從而為大學(xué)生兼職提供一些建議和幫助。
研究的方法:
1.問(wèn)卷調(diào)查法:?jiǎn)柧碚{(diào)查法是指利用印好的問(wèn)題表或卷子調(diào)查所要測(cè)定的問(wèn)題的方法。該方法具有統(tǒng)一、高效、便于操作等特點(diǎn)。為了全面、準(zhǔn)確地了解當(dāng)今大學(xué)生兼職的現(xiàn)狀、反映大學(xué)生兼職這一特殊現(xiàn)象所引起的一系列問(wèn)題,筆者采用自編問(wèn)卷的方式對(duì)大學(xué)生的兼職現(xiàn)狀進(jìn)行調(diào)查。
2.文獻(xiàn)研究法:許多學(xué)者教師和研究人員已從不同的方面對(duì)于大學(xué)生兼職問(wèn)題做過(guò)大量的研究,通過(guò)廣泛地查閱、分析、整理相關(guān)資料和文獻(xiàn),從中了解到那些問(wèn)題已經(jīng)解決,借鑒前人的研究成果,形成自己的獨(dú)特觀點(diǎn)。
對(duì)象:采取隨機(jī)抽取的方法對(duì)某大學(xué)大學(xué)生進(jìn)行隨機(jī)調(diào)查,調(diào)查地點(diǎn)是宿舍及飯?zhí)?,共發(fā)放問(wèn)卷450份,有效回收400份。
因子分析和關(guān)聯(lián)度
1. 數(shù)據(jù)預(yù)處理
查看原始數(shù)據(jù)

data=read.csv("問(wèn)卷匯總.csv")
head(data)
## ? 序號(hào) X1.您的性別是... X2.您的年級(jí)是.. X3.你認(rèn)為大學(xué)生有必要做兼職嗎.## 1 ? ?1 ? ? ? ? ? ? ? ?2 ? ? ? ? ? ? ? 4 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?1## 2 ? ?2 ? ? ? ? ? ? ? ?2 ? ? ? ? ? ? ? 4 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?2## 3 ? ?3 ? ? ? ? ? ? ? ?1 ? ? ? ? ? ? ? 3 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?1## 4 ? ?4 ? ? ? ? ? ? ? ?2 ? ? ? ? ? ? ? 4 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?1## 5 ? ?5 ? ? ? ? ? ? ? ?2 ? ? ? ? ? ? ? 4 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?1## 6 ? ?6 ? ? ? ? ? ? ? ?1 ? ? ? ? ? ? ? 4 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?1## ? X4.你是否做過(guò)兼職. X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎.## 1 ? ? ? ? ? ? ? ? ?1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?2## 2 ? ? ? ? ? ? ? ? ?2 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?2## 3 ? ? ? ? ? ? ? ? ?1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?4## 4 ? ? ? ? ? ? ? ? ?1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?2## 5 ? ? ? ? ? ? ? ? ?1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?2## 6 ? ? ? ? ? ? ? ? ?2 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?2## ? X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. X7.您的家長(zhǎng)是否同意您做兼職..
查看數(shù)據(jù)
str(data)
## 'data.frame': ? ?172 obs. of ?33 variables:## ?$ 序號(hào) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 2 3 4 5 6 7 8 9 10 ...## ?$ X1.您的性別是... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?2 2 1 2 2 1 2 2 2 2 ...## ?$ X2.您的年級(jí)是.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?4 4 3 4 4 4 4 4 4 3 ...## ?$ X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 2 1 1 1 1 1 1 2 1 ...## ?$ X4.你是否做過(guò)兼職. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 2 1 1 1 2 1 1 2 2 ...## ?$ X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?2 2 4 2 2 2 2 2 2 2 ...## ?$ X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?1 2 3 3 3 2 3 3 2 3 ...## ?$ X7.您的家長(zhǎng)是否同意您做兼職.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?1 2 1 2 2 3 1 1 3 2 ...## ?$ X8.你會(huì)選擇做哪類兼職工作. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 1 2 1 1 1 5 1 4 1 ...## ?$ X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?2 2 1 4 1 3 1 2 2 1 ...## ?$ 第10題.A.海報(bào)或廣告專門的中介機(jī)構(gòu)網(wǎng)站. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?0 1 1 0 1 0 0 1 0 0 ...## ?$ 第10題.B.自己尋找. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 0 1 0 1 0 1 1 1 1 ...## ?$ 第10題.C.學(xué)校勤工儉學(xué)中心.老師等介紹. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?0 0 0 0 0 1 0 0 0 0 ...## ?$ 第10題.D.經(jīng)熟人介紹或幫忙.包括家人.親朋.同學(xué).. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 1 1 1 1 1 0 1 0 0 ...## ?$ X11.若有兼職工作.您一般會(huì)選擇什么時(shí)間的去做... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 1 1 2 1 2 1 2 2 3 ...## ?$ X12.你所做兼職是否與你的專業(yè)相關(guān). ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?3 3 1 4 3 3 1 1 3 3 ...## ?$ X13.你的月支出大概是多少. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?5 3 4 1 5 6 6 4 3 5 ...## ?$ X14.你實(shí)際的兼職日收入是多少. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?2 1 2 2 3 2 3 2 1 2 ...## ?$ X15.您會(huì)將您的兼職收入主要用于何處. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?2 2 3 3 2 2 2 3 2 3 ...## ?$ 第16題.A.提高消費(fèi)水平. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 0 0 0 1 0 1 0 0 1 ...## ?$ 第16題.B.經(jīng)濟(jì)獨(dú)立.能夠自己支付的部分費(fèi)用.增加自身成就感. ? ? ? ? ? ? ? ? ? ? : int ?1 1 1 1 1 1 0 1 0 1 ...## ?$ 第16題.C.擴(kuò)大交際圈.接觸并認(rèn)識(shí)更多的人.讓自己更大膽地與他人交流. ? ? ? ? ? ? : int ?1 0 1 1 1 1 0 1 1 0 ...## ?$ 第16題.D.增加工作經(jīng)驗(yàn)和社會(huì)閱歷.為以后的工作奠定基礎(chǔ). ? ? ? ? ? ? ? ? ? ? ? ?: int ?1 1 1 0 1 0 0 1 0 0 ...## ?$ X17.參加了兼職你覺(jué)得自己的社會(huì)能力有提高嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?3 2 1 3 2 3 1 1 2 2 ...## ?$ 第18題.A.薪酬較低.或不按時(shí)發(fā)工資.且工作要求苛刻. ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?0 1 0 0 0 1 1 0 0 0 ...## ?$ 第18題.B.未享受到相關(guān)社會(huì)福利. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?0 0 1 1 0 0 0 0 0 1 ...## ?$ 第18題.C.自己的合法權(quán)益得不到保護(hù).沒(méi)有與雇主簽訂勞動(dòng)合同等. ? ? ? ? ? ? ? ? ?: int ?0 1 0 1 0 0 0 0 1 0 ...## ?$ 第18題.D.技術(shù).技能水平不足. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?0 0 0 1 1 0 0 1 1 1 ...## ?$ 第18題.E.對(duì)崗位信息缺乏了解. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 0 0 0 1 1 0 0 0 0 ...## ?$ 第18題.F.其他. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?0 0 0 0 0 0 0 0 0 0 ...## ?$ X19.你有過(guò)兼職受騙的經(jīng)歷嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?: int ?2 2 2 2 2 2 1 2 2 2 ...## ?$ X20..假如.被騙后.你會(huì)如何處理. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? : int ?1 2 2 1 1 1 3 2 1 3 ...## ?$ X21.您認(rèn)為是否需要成立專門的兼職指導(dǎo)機(jī)構(gòu).為有意兼職的學(xué)生提供幫助和安全保障..: int ?1 2 1 1 1 1 1 1 1 1 ...
刪除缺失
?data=data[complete.cases(data),]
2.繪制不同變量之間的關(guān)系
data=data[,c( ?
? ? ? ? ? ? ?"X1.您的性別是...", ? ? ? ? ? ? ?"X2.您的年級(jí)是..", ? ? ? ? ? ? ?"X3.你認(rèn)為大學(xué)生有必要做兼職嗎.", ? ? ? ? ? ? ?"X4.你是否做過(guò)兼職.", ? ? ? ? ? ? ?"X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎.", ? ? ? ? ? ? ?"X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊.", ? ? ? ? ? ? ?"X7.您的家長(zhǎng)是否同意您做兼職..", ? ? ? ? ? ? ?"X8.你會(huì)選擇做哪類兼職工作.", ? ? ? ? ? ? ?"X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么.", ? ? ? ? ? ? ?"第10題.A.海報(bào)或廣告專門的中介機(jī)構(gòu)網(wǎng)站.", ? ? ? ? ? ? ?"第10題.B.自己尋找.", ? ? ? ? ? ? ?"第10題.C.學(xué)校勤工儉學(xué)中心.老師等介紹.", ? ? ? ? ? ? ?"第10題.D.經(jīng)熟人介紹或幫忙.包括家人.親朋.同學(xué)..", ? ? ? ? ? ? ?"X11.若有兼職工作.您一般會(huì)選擇什么時(shí)間的去做..." , ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?"X12.你所做兼職是否與你的專業(yè)相關(guān)." ? ? ? ? ? ? ? ? ? ? ? ? ? ?, ? ? ? ? ? ? ? ?
? ? ? ? ? ?"X13.你的月支出大概是多少." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?, ? ? ? ? ? ?
? "X14.你實(shí)際的兼職日收入是多少." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? , ? ? ? ? ?
? "X15.您會(huì)將您的兼職收入主要用于何處." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?, ? ? ? ? ?
? "第16題.A.提高消費(fèi)水平." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?, ? ? ? ?
? "第16題.B.經(jīng)濟(jì)獨(dú)立.能夠自己支付的部分費(fèi)用.增加自身成就感." ? ? ? ? ? ? , ? ? ? ?
? "第16題.C.擴(kuò)大交際圈.接觸并認(rèn)識(shí)更多的人.讓自己更大膽地與他人交流." ? ? ?, ? ? ?
? "第16題.D.增加工作經(jīng)驗(yàn)和社會(huì)閱歷.為以后的工作奠定基礎(chǔ)." ? ? ? ? ? ? ? ? ?, ? ? ?
? "X17.參加了兼職你覺(jué)得自己的社會(huì)能力有提高嗎." ? ? ? ? ? ? ? ? ? ? ? ? ? ? , ? ?
? "第18題.A.薪酬較低.或不按時(shí)發(fā)工資.且工作要求苛刻." ? ? ? ? ? ? ? ? ? ? ? ? , ? ?
? "第18題.B.未享受到相關(guān)社會(huì)福利." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?, ?
? "第18題.C.自己的合法權(quán)益得不到保護(hù).沒(méi)有與雇主簽訂勞動(dòng)合同等." ? ? ? ? ? ? ? ?, ?
? "第18題.D.技術(shù).技能水平不足." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ,
? "第18題.E.對(duì)崗位信息缺乏了解." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? , ? "第18題.F.其他." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? , ? "X19.你有過(guò)兼職受騙的經(jīng)歷嗎." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?, ? "X20..假如.被騙后.你會(huì)如何處理." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? , ? "X21.您認(rèn)為是否需要成立專門的兼職指導(dǎo)機(jī)構(gòu).為有意兼職的學(xué)生提供幫助和安全保障.."
? ? ? ? ? ? ?)]
plot(data[,c(1:8)])

3.數(shù)據(jù)描述性信息,可以查看基本統(tǒng)計(jì)量
summary(data)
## ?X1.您的性別是... X2.您的年級(jí)是.. X3.你認(rèn)為大學(xué)生有必要做兼職嗎.## ?Min. ? :1.000 ? ?Min. ? :1.00 ? ?Min. ? :1.000 ? ? ? ? ? ? ? ? ## ?1st Qu.:1.000 ? ?1st Qu.:3.00 ? ?1st Qu.:1.000 ? ? ? ? ? ? ? ? ## ?Median :2.000 ? ?Median :4.00 ? ?Median :1.000 ? ? ? ? ? ? ? ? ## ?Mean ? :1.535 ? ?Mean ? :3.57 ? ?Mean ? :1.163 ? ? ? ? ? ? ? ? ## ?3rd Qu.:2.000 ? ?3rd Qu.:4.00 ? ?3rd Qu.:1.000 ? ? ? ? ? ? ? ? ## ?Max. ? :2.000 ? ?Max. ? :4.00 ? ?Max. ? :2.000 ? ? ? ? ? ? ? ? ## ?X4.你是否做過(guò)兼職. X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎.## ?Min. ? :1.000 ? ? ?Min. ? :1.000 ? ? ? ? ? ? ? ? ## ?1st Qu.:1.000 ? ? ?1st Qu.:2.000 ? ? ? ? ? ? ? ? ## ?Median :1.000 ? ? ?Median :2.000 ? ? ? ? ? ? ? ? ## ?Mean ? :1.186 ? ? ?Mean ? :2.128 ? ? ? ? ? ? ? ? ## ?3rd Qu.:1.000 ? ? ?3rd Qu.:2.000 ? ? ? ? ? ? ? ? ## ?Max. ? :2.000 ? ? ?Max. ? :4.000 ? ? ? ? ? ? ? ? ## ?X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. X7.您的家長(zhǎng)是否同意您做兼職..## ?Min. ? :1.000 ? ? ? ? ? ? ? ? ? ? ? Min. ? :1.000 ? ? ? ? ? ? ? ?## ?1st Qu.:2.000 ? ? ? ? ? ? ? ? ? ? ? 1st Qu.:1.000 ? ? ? ? ? ? ? ?## ?Median :3.000 ? ? ? ? ? ? ? ? ? ? ? Median :2.000 ? ? ? ? ? ? ? ?## ?Mean ? :2.634 ? ? ? ? ? ? ? ? ? ? ? Mean ? :2.087 ? ? ? ? ? ? ? ?## ?3rd Qu.:3.000 ? ? ? ? ? ? ? ? ? ? ? 3rd Qu.:3.000 ? ? ? ? ? ? ? ?## ?Max. ? :3.000 ? ? ? ? ? ? ? ? ? ? ? Max. ? :4.000 ? ? ? ? ? ? ? ?## ?X8.你會(huì)選擇做哪類兼職工作. X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么.## ?Min. ? :1.000 ? ? ? ? ? ? ?Min. ? :1.000 ? ? ? ? ? ? ? ? ? ? ? ? ?## ?1st Qu.:1.000 ? ? ? ? ? ? ?1st Qu.:1.000 ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Median :2.000 ? ? ? ? ? ? ?Median :2.000 ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Mean ? :2.517 ? ? ? ? ? ? ?Mean ? :2.174 ? ? ? ? ? ? ? ? ? ? ? ? ?## ?3rd Qu.:4.000 ? ? ? ? ? ? ?3rd Qu.:3.000 ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Max. ? :5.000 ? ? ? ? ? ? ?Max. ? :4.000 ? ? ? ? ? ? ? ? ? ? ? ? ?## ?第10題.A.海報(bào)或廣告專門的中介機(jī)構(gòu)網(wǎng)站. 第10題.B.自己尋找.## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? Min. ? :0.0000 ? ?## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ? 1st Qu.:0.0000 ? ?## ?Median :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? Median :1.0000 ? ?## ?Mean ? :0.3779 ? ? ? ? ? ? ? ? ? ? ? ? Mean ? :0.7384 ? ?## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ? ? ? ? ? 3rd Qu.:1.0000 ? ?## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? Max. ? :1.0000 ? ?## ?第10題.C.學(xué)校勤工儉學(xué)中心.老師等介紹.## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ## ?Median :0.0000 ? ? ? ? ? ? ? ? ? ? ? ## ?Mean ? :0.2384 ? ? ? ? ? ? ? ? ? ? ? ## ?3rd Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ## ?第10題.D.經(jīng)熟人介紹或幫忙.包括家人.親朋.同學(xué)..## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Median :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Mean ? :0.7442 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?X11.若有兼職工作.您一般會(huì)選擇什么時(shí)間的去做...## ?Min. ? :1.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?1st Qu.:1.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Median :2.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Mean ? :2.035 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?3rd Qu.:3.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Max. ? :3.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?X12.你所做兼職是否與你的專業(yè)相關(guān). X13.你的月支出大概是多少.## ?Min. ? :1.00 ? ? ? ? ? ? ? ? ? ? ?Min. ? :1.000 ? ? ? ? ? ?## ?1st Qu.:3.00 ? ? ? ? ? ? ? ? ? ? ?1st Qu.:3.000 ? ? ? ? ? ?## ?Median :3.00 ? ? ? ? ? ? ? ? ? ? ?Median :4.000 ? ? ? ? ? ?## ?Mean ? :3.07 ? ? ? ? ? ? ? ? ? ? ?Mean ? :4.087 ? ? ? ? ? ?## ?3rd Qu.:4.00 ? ? ? ? ? ? ? ? ? ? ?3rd Qu.:5.000 ? ? ? ? ? ?## ?Max. ? :4.00 ? ? ? ? ? ? ? ? ? ? ?Max. ? :7.000 ? ? ? ? ? ?## ?X14.你實(shí)際的兼職日收入是多少. X15.您會(huì)將您的兼職收入主要用于何處.## ?Min. ? :1.000 ? ? ? ? ? ? ? ? Min. ? :1.000 ? ? ? ? ? ? ? ? ? ? ?## ?1st Qu.:2.000 ? ? ? ? ? ? ? ? 1st Qu.:2.000 ? ? ? ? ? ? ? ? ? ? ?## ?Median :2.000 ? ? ? ? ? ? ? ? Median :2.000 ? ? ? ? ? ? ? ? ? ? ?## ?Mean ? :2.331 ? ? ? ? ? ? ? ? Mean ? :1.994 ? ? ? ? ? ? ? ? ? ? ?## ?3rd Qu.:3.000 ? ? ? ? ? ? ? ? 3rd Qu.:2.000 ? ? ? ? ? ? ? ? ? ? ?## ?Max. ? :5.000 ? ? ? ? ? ? ? ? Max. ? :3.000 ? ? ? ? ? ? ? ? ? ? ?## ?第16題.A.提高消費(fèi)水平.## ?Min. ? :0.0000 ? ? ? ?## ?1st Qu.:0.0000 ? ? ? ?## ?Median :0.0000 ? ? ? ?## ?Mean ? :0.3837 ? ? ? ?## ?3rd Qu.:1.0000 ? ? ? ?## ?Max. ? :1.0000 ? ? ? ?## ?第16題.B.經(jīng)濟(jì)獨(dú)立.能夠自己支付的部分費(fèi)用.增加自身成就感.## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Median :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Mean ? :0.7326 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?第16題.C.擴(kuò)大交際圈.接觸并認(rèn)識(shí)更多的人.讓自己更大膽地與他人交流.## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Median :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Mean ? :0.6279 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?第16題.D.增加工作經(jīng)驗(yàn)和社會(huì)閱歷.為以后的工作奠定基礎(chǔ).## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Median :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Mean ? :0.7093 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?X17.參加了兼職你覺(jué)得自己的社會(huì)能力有提高嗎.## ?Min. ? :1.00 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?1st Qu.:1.00 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Median :2.00 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Mean ? :1.93 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?3rd Qu.:2.00 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Max. ? :4.00 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?第18題.A.薪酬較低.或不按時(shí)發(fā)工資.且工作要求苛刻.## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Median :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Mean ? :0.4767 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?第18題.B.未享受到相關(guān)社會(huì)福利.## ?Min. ? :0.0000 ? ? ? ? ? ? ? ?## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ?## ?Median :0.0000 ? ? ? ? ? ? ? ?## ?Mean ? :0.3605 ? ? ? ? ? ? ? ?## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ?## ?Max. ? :1.0000 ? ? ? ? ? ? ? ?## ?第18題.C.自己的合法權(quán)益得不到保護(hù).沒(méi)有與雇主簽訂勞動(dòng)合同等.## ?Min. ? :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?1st Qu.:0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Median :0.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Mean ? :0.3837 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?3rd Qu.:1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?Max. ? :1.0000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## ?第18題.D.技術(shù).技能水平不足. 第18題.E.對(duì)崗位信息缺乏了解. 第18題.F.其他. ?## ?Min. ? :0.0000 ? ? ? ? ? ? ?Min. ? :0.0000 ? ? ? ? ? ? ? Min. ? :0.0000 ?## ?1st Qu.:0.0000 ? ? ? ? ? ? ?1st Qu.:0.0000 ? ? ? ? ? ? ? 1st Qu.:0.0000 ?## ?Median :0.0000 ? ? ? ? ? ? ?Median :0.0000 ? ? ? ? ? ? ? Median :0.0000 ?## ?Mean ? :0.4244 ? ? ? ? ? ? ?Mean ? :0.3605 ? ? ? ? ? ? ? Mean ? :0.1686 ?## ?3rd Qu.:1.0000 ? ? ? ? ? ? ?3rd Qu.:1.0000 ? ? ? ? ? ? ? 3rd Qu.:0.0000 ?## ?Max. ? :1.0000 ? ? ? ? ? ? ?Max. ? :1.0000 ? ? ? ? ? ? ? Max. ? :1.0000 ?## ?X19.你有過(guò)兼職受騙的經(jīng)歷嗎. X20..假如.被騙后.你會(huì)如何處理.## ?Min. ? :1.000 ? ? ? ? ? ? ? Min. ? :1.000 ? ? ? ? ? ? ? ? ## ?1st Qu.:2.000 ? ? ? ? ? ? ? 1st Qu.:1.000 ? ? ? ? ? ? ? ? ## ?Median :2.000 ? ? ? ? ? ? ? Median :2.000 ? ? ? ? ? ? ? ? ## ?Mean ? :1.994 ? ? ? ? ? ? ? Mean ? :1.779 ? ? ? ? ? ? ? ? ## ?3rd Qu.:2.000 ? ? ? ? ? ? ? 3rd Qu.:2.000 ? ? ? ? ? ? ? ? ## ?Max. ? :3.000 ? ? ? ? ? ? ? Max. ? :3.000 ? ? ? ? ? ? ? ? ## ?X21.您認(rèn)為是否需要成立專門的兼職指導(dǎo)機(jī)構(gòu).為有意兼職的學(xué)生提供幫助和安全保障..## ?Min. ? :1.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?1st Qu.:1.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Median :1.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Mean ? :1.076 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?3rd Qu.:1.000 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ?Max. ? :2.000
從每個(gè)變量的直方圖可以看到變量的大概分布情況。繪制各個(gè)變量的餅圖可以看到基本人口信息的各個(gè)取值的所占的百分比。
for(i in 2:5)hist( ,col=rainbow(12),main=paste(colnames(data)[i]))


for(i in 6:8)pie(table(data[,i]),col=rain


1.相關(guān)性分析
datacor=data#數(shù)據(jù)轉(zhuǎn)換格式for(i in 1:ncol(data))data
cor(datacor[,c( ?
? ? ? ? ? ? ?"X1.您的性別是...", ? ? ? ? ? ? ?"X2.您的年級(jí)是..", ? ? ? ? ? ? ?"X3.你認(rèn)為大學(xué)生有必要做兼職嗎.", ? ? ? ? ? ? ?"X4.你是否做過(guò)兼職.", ? ? ? ? ? ? ?"X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎.", ? ? ? ? ? ? ?"X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊.", ? ? ? ? ? ? ?"X7.您的家長(zhǎng)是否同意您做兼職..",
## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? X1.您的性別是...## X1.您的性別是... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 1.000000000## X2.您的年級(jí)是.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.042512825## X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.030839698## X4.你是否做過(guò)兼職. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.123297805## X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.005539643## X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.029378056## X7.您的家長(zhǎng)是否同意您做兼職.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.066805816## X8.你會(huì)選擇做哪類兼職工作. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.137004420## X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.022770679## 第10題.A.海報(bào)或廣告專門的中介機(jī)構(gòu)網(wǎng)站. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.042489939## 第10題.B.自己尋找. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.081411714## 第10題.C.學(xué)校勤工儉學(xué)中心.老師等介紹. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.080161171## 第10題.D.經(jīng)熟人介紹或幫忙.包括家人.親朋.同學(xué).. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.147865453## X11.若有兼職工作.您一般會(huì)選擇什么時(shí)間的去做... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.017180008## X12.你所做兼職是否與你的專業(yè)相關(guān). ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.005813594## X13.你的月支出大概是多少. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.122891632## X14.你實(shí)際的兼職日收入是多少. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.031984006## X15.您會(huì)將您的兼職收入主要用于何處. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.068084808## 第16題.A.提高消費(fèi)水平. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.031216500## 第16題.B.經(jīng)濟(jì)獨(dú)立.能夠自己支付的部分費(fèi)用.增加自身成就感. ? ? ? ? ? ? ? ? ? ? ? ? ? 0.015923196## 第16題.C.擴(kuò)大交際圈.接觸并認(rèn)識(shí)更多的人.讓自己更大膽地與他人交流. ? ? ? ? ? ? ? ? ?-0.090851946## 第16題.D.增加工作經(jīng)驗(yàn)和社會(huì)閱歷.為以后的工作奠定基礎(chǔ). ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.006566725## X17.參加了兼職你覺(jué)得自己的社會(huì)能力有提高嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.039602685## 第18題.A.薪酬較低.或不按時(shí)發(fā)工資.且工作要求苛刻. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.066757185## 第18題.B.未享受到相關(guān)社會(huì)福利. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.028229221## 第18題.C.自己的合法權(quán)益得不到保護(hù).沒(méi)有與雇主簽訂勞動(dòng)合同等. ? ? ? ? ? ? ? ? ? ? ? -0.055186313## 第18題.D.技術(shù).技能水平不足. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.024680535## 第18題.E.對(duì)崗位信息缺乏了解. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.052506352## 第18題.F.其他. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.015928568## X19.你有過(guò)兼職受騙的經(jīng)歷嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.013443674## X20..假如.被騙后.你會(huì)如何處理. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.005144417## X21.您認(rèn)為是否需要成立專門的兼職指導(dǎo)機(jī)構(gòu).為有意兼職的學(xué)生提供幫助和安全保障.. ? ? ?0.090247155## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? X2.您的年級(jí)是..## X1.您的性別是... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.04251282## X2.您的年級(jí)是.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?1.00000000## X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.02328564## X4.你是否做過(guò)兼職. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.05841762## X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.05933900## X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.01756077## X7.您的家長(zhǎng)是否同意您做兼職.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.04212928## X8.你會(huì)選擇做哪類兼職工作. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.14379820## X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.03209377## 第10題.A.海報(bào)或廣告專門的中介機(jī)構(gòu)網(wǎng)站. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.11800058## 第10題.B.自己尋找. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.01195255## 第10題.C.學(xué)校勤工儉學(xué)中心.老師等介紹. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.03160803## 第10題.D.經(jīng)熟人介紹或幫忙.包括家人.親朋.同學(xué).. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.02014014## X11.若有兼職工作.您一般會(huì)選擇什么時(shí)間的去做... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.07427207## X12.你所做兼職是否與你的專業(yè)相關(guān). ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.01138039## X13.你的月支出大概是多少. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.09757589## X14.你實(shí)際的兼職日收入是多少. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.09443707## X15.您會(huì)將您的兼職收入主要用于何處. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.06202746## 第16題.A.提高消費(fèi)水平. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.12845729## 第16題.B.經(jīng)濟(jì)獨(dú)立.能夠自己支付的部分費(fèi)用.增加自身成就感. ? ? ? ? ? ? ? ? ? ? ? ? ?-0.16314114## 第16題.C.擴(kuò)大交際圈.接觸并認(rèn)識(shí)更多的人.讓自己更大膽地與他人交流. ? ? ? ? ? ? ? ? ?-0.04307850## 第16題.D.增加工作經(jīng)驗(yàn)和社會(huì)閱歷.為以后的工作奠定基礎(chǔ). ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.11737488## X17.參加了兼職你覺(jué)得自己的社會(huì)能力有提高嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.03273904## 第18題.A.薪酬較低.或不按時(shí)發(fā)工資.且工作要求苛刻. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.09408986## 第18題.B.未享受到相關(guān)社會(huì)福利. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.13129786## 第18題.C.自己的合法權(quán)益得不到保護(hù).沒(méi)有與雇主簽訂勞動(dòng)合同等. ? ? ? ? ? ? ? ? ? ? ? ?0.07424595## 第18題.D.技術(shù).技能水平不足. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?0.07324299## 第18題.E.對(duì)崗位信息缺乏了解. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.06286382## 第18題.F.其他. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.05536032## X19.你有過(guò)兼職受騙的經(jīng)歷嗎. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.06075709## X20..假如.被騙后.你會(huì)如何處理. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.05179084## X21.您認(rèn)為是否需要成立專門的兼職指導(dǎo)機(jī)構(gòu).為有意兼職的學(xué)生提供幫助和安全保障.. ? ? ?0.04950582
數(shù)據(jù)歸一化
data=scale(datacor)
變量間的相關(guān)分析
查看性別和大學(xué)生有必要做兼職之間是否有相關(guān)關(guān)系
cor.test您的性別是..., ? ? ? ? 你認(rèn)為大學(xué)生有必要做兼職嗎.)
## ## ?Pearson's product-moment correlation## ## data: ?datacor$X1.您的性別是... and datacor$X3.你認(rèn)為大學(xué)生有必要做兼職嗎.## t = -0.40229, df = 170, p-value = 0.688## alternative hypothesis: true correlation is not equal to 0## 95 percent confidence interval:## ?-0.1796451 ?0.1193455## sample estimates:## ? ? ? ?cor ## -0.0308397
檢驗(yàn)的結(jié)果是,由于P =0.688> =0.05,因此在0.05的顯署性水平下,接受原假設(shè),認(rèn)為兩者之間具有相關(guān)關(guān)系。
查看性別和大學(xué)生有必要做兼職之間是否有相關(guān)關(guān)系
cor.test(X14.你實(shí)際的兼職日收入是多少., ? ? ? 2.您的年級(jí)是..)
## ## ?Pearson's product-moment correlation## ## data: ?datacor$X14.你實(shí)際的兼職日收入是多少. and datacor$X2.您的年級(jí)是..## t = 1.2368, df = 170, p-value = 0.2179## alternative hypothesis: true correlation is not equal to 0## 95 percent confidence interval:## ?-0.05598853 ?0.24067056## sample estimates:## ? ? ? ?cor ## 0.09443707
檢驗(yàn)的結(jié)果是,由于P =0.2179> =0.05,因此在0.05的顯署性水平下,接受原假設(shè),認(rèn)為兩者之間具有相關(guān)關(guān)系。
查看年級(jí)和大學(xué)生有必要做兼職之間是否有相關(guān)關(guān)系
## ## ?Pearson's product-moment correlation## ## data: ?datacor$X2.您的年級(jí)是.. and datacor$X3.你認(rèn)為大學(xué)生有必要做兼職嗎.## t = 0.30369, df = 170, p-value = 0.7617## alternative hypothesis: true correlation is not equal to 0## 95 percent confidence interval:## ?-0.1267906 ?0.1723196## sample estimates:## ? ? ? ?cor ## 0.02328564
檢驗(yàn)的結(jié)果是,由于P =0.7617> =0.05,因此在0.05的顯署性水平下,接受原假設(shè),認(rèn)為兩者之間具有相關(guān)關(guān)系。
2.因子分析
因子分析模型
旋轉(zhuǎn)前因子分析
5個(gè)因子
## Loading required package: rJava## Loading required package: xlsxjars
famod1=facal(data, factors =5,na.a

## Uniquenesses:## ? ? ? ? ? ? ? ? ? ? ? ?X1.您的性別是... ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.900 ## ? ? ? ? ? ? ? ? ? ? ? ? X2.您的年級(jí)是.. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.932 ## ? ? ? ? ?X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.868 ## ? ? ? ? ? ? ? ? ? ? ?X4.你是否做過(guò)兼職. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.469 ## ? ? ? ? ?X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.919 ## ? ? X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.005 ## ? ? ? ? ? X7.您的家長(zhǎng)是否同意您做兼職.. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.005 ## ? ? ? ? ? ? ?X8.你會(huì)選擇做哪類兼職工作. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.627 ## X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.903 ## ## Loadings:## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? Factor1 Factor2 Factor3 Factor4## X1.您的性別是... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?-0.202 ?-0.199 ## X2.您的年級(jí)是.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? -0.245 ## X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ? ? ? ? ? ? ? ? ? 0.130 ? 0.305 ? ? ? ? ## X4.你是否做過(guò)兼職. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.721 ? ? ? ? ## X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ? ? ? ? ? 0.192 ? ? ? ? ?-0.160 ? ? ? ? ## X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ? ? ?0.993 ? ? ? ? ? ? ? ? ? ? ? ? ## X7.您的家長(zhǎng)是否同意您做兼職.. ? ? ? ? ? ? ? ? ? ?0.942 ? 0.186 ?-0.163 ## X8.你會(huì)選擇做哪類兼職工作. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? 0.599 ## X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? Factor5## X1.您的性別是... ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## X2.您的年級(jí)是.. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?## X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ? ? ? ? ?-0.112 ## X4.你是否做過(guò)兼職. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ## X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ? ? ? ? ? ? ? ? ## X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ? ? ? ? ? ?## X7.您的家長(zhǎng)是否同意您做兼職.. ? ? ? ? ? ?0.213 ## X8.你會(huì)選擇做哪類兼職工作. ? ? ? ? ? ? ? ? ? ? ## X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. ?0.291 ## ## ? ? ? ? ? ? ? ?Factor1 Factor2 Factor3 Factor4 Factor5## SS loadings ? ? ?1.040 ? 0.938 ? 0.722 ? 0.500 ? 0.171## Proportion Var ? 0.116 ? 0.104 ? 0.080 ? 0.056 ? 0.019## Cumulative Var ? 0.116 ? 0.220 ? 0.300 ? 0.356 ? 0.375## ## Test of the hypothesis that 5 factors are sufficient.## The chi square statistic is 0.16 on 1 degree of freedom.## The p-value is 0.686
從 結(jié)果 來(lái)看,5個(gè)主因子所解釋的方差基本反映了10個(gè)指標(biāo)的信息,第一個(gè)因子在 當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊.的變量的載荷值較大,因子該因子反映的是兼職方面的能力,第二個(gè)因子在 .您的家長(zhǎng)是否同意您做兼職變量的載荷較大。第三個(gè)因子在每個(gè)變量的載荷相似是一個(gè)綜合因素,第四個(gè)因子在你會(huì)選擇做哪類兼職工作問(wèn)題上的載荷較大,而第5個(gè)因子在兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么.上的載荷較大,因此,各個(gè)因子分分別可以代表這些的值的含義,從因子分析的結(jié)果來(lái)看,每個(gè)因子的意義比較明顯。
plot(famod11)#繪制正交或斜交結(jié)果的圖形,查看每個(gè)樣本點(diǎn)再不同因子上的得分情況

fagram(famod11,simple=TRUE) ?#5個(gè)因子與變量之間的關(guān)系

$scores ?#因子得分
## ? ? ? ? ? ?ML2 ? ? ? ? ?ML1 ? ? ? ? ML3 ? ? ? ? ?ML4 ? ? ? ? ? ML5## 1 ? -3.0490655 -1.262501540 -0.58417383 -0.638971487 -0.1470792180## 2 ? -1.1945134 -0.407219501 ?1.53050633 -0.775454239 -0.5478973054## 3 ? ?0.7752151 -1.174287246 -0.56515289 ?0.194757467 -0.0233325030## 4 ? ?0.7696996 -0.175321580 -0.53169295 -0.649030083 ?0.2651034446## 5 ? ?0.7358433 -0.049096318 -0.47453116 -0.769184711 -0.4437886710## 6 ? -1.2114897 ?0.596534006 ?1.45720731 -0.624448954 ?0.5418134207## 7 ? ?0.6984950 -0.957581437 -0.42629731 ?0.678833324 -0.7255935212## 8 ? ?0.7996831 -1.215915018 -0.56416408 -0.667881871 -0.4843577109## 9 ? -1.3144948 ?0.879717981 ?1.69019496 ?0.203369517 -0.2747347224## 10 ? 0.7329114 -0.335048160 ?1.17288720 -0.677389500 -0.5378620998## 11 ? 0.6683811 ?0.038555664 -0.31728584 ?1.201085623 ?0.5316001573## 12 ?-3.1913211 ?0.018441194 -0.16244176 ?0.921761649 ?0.3640902428## 13 ? 0.6574275 ?0.065027716 -0.14243201 ?0.892851266 ?0.0268117499## 14 ? 0.5969834 ?2.214819639 -0.01412711 -0.186295749 ?0.3216652007## 15 ?-1.2562897 ?0.667520342 ?1.95971185 -0.654086524 -0.2226140727## 16 ?-1.1982862 -0.046730940 -0.51404964 -0.539145389 -0.1974830556## 17 ? 0.7469984 -0.135627742 -0.41704475 -0.225732657 ?0.3002412238## 18 ? 0.6797017 ?0.071022464 -0.40447546 ?0.310941885 -0.2111951279## 19 ? 0.7212673 -1.101790984 -0.23206494 ?0.994154106 -0.0137572900## 20 ? 0.6324663 ?2.123915086 -0.14960047 -0.400833936 ?0.6631493809## 21 ?-1.1150663 -1.309323254 -0.46811501 -0.365610298 ?0.1143476895## 22 ?-1.1772456 -0.114464666 -0.50358996 -0.714677976 -0.0388520527## 23 ?-1.1469654 -1.245203028 -0.31212551 -0.071517298 -0.0777115866## 24 ? 0.7135691 -0.055091067 -0.21248771 -0.187275330 -0.2057817932## 25 ? 0.7322209 -1.128263036 -0.40691877 ?1.302388464 ?0.4910311174## 26 ?-1.2219955 -0.066394792 -0.21184330 ?0.213923089 ?0.1979202156## 27 ? 0.6498245 ?1.081642082 -0.13125944 ?0.138216600 ?0.3061473809## 28 ? 0.6400693 ?1.107300720 -0.16077305 ?0.353800730 ?0.3838137499## 29 ? 0.6699465 ?0.096681103 -0.43398907 ?0.526526015 -0.1335287589## 30 ?-1.1997212 -0.060400043 -0.47388675 -0.367986292 -0.0400866623## 31 ? 0.7361399 -0.139241242 -0.25059557 -0.107172244 ?0.2668129506
=famod11$scores %*%)#每個(gè)樣本的每個(gè)因子得分乘以因子方差權(quán)重cbind(s,decre
## ? ? ? ?[,1] ? ? ? ? ? ? ? ? ? ?[,2] ## ? [1,] "0.684292148532709" ? ? "49" ## ? [2,] "0.682922604084486" ? ? "145"## ? [3,] "0.637282813915165" ? ? "83" ## ? [4,] "0.63264266719218" ? ? ?"169"## ? [5,] "0.52614929396462" ? ? ?"107"## ? [6,] "0.47469132249647" ? ? ?"14" ## ? [7,] "0.44897869276371" ? ? ?"20"
繪制正交或斜交結(jié)果的圖形,查看每個(gè)變量在不同因子上的載荷情況 圖 中 不同點(diǎn)代表不同的變量,橫軸和縱軸代表不同的主因子,如果變量在縱軸對(duì)應(yīng)的因子上具有較高的載荷,則分布在散點(diǎn)圖的左上角,若變量在橫軸因子上有較大的載荷,則分布在右下角。 從 上 圖,可以看到5個(gè)因子在9個(gè)變量上載荷比重的關(guān)系,因子和變量之間有聯(lián)系說(shuō)明因子在這些變量上有較大的載荷,連線的數(shù)字表示該因子在該變量上的載荷值。 從因子得分上,我們可以看到每個(gè)接受調(diào)查的用戶在5個(gè)因子上的得分情況,從而判斷每個(gè)接受調(diào)查用戶在不同的兼職指標(biāo)上的能力強(qiáng)弱。同時(shí)我們可以通過(guò)每個(gè)因子的方差解釋程度作為權(quán)重來(lái)計(jì)算每個(gè)用戶的綜合因子得分。
4個(gè)因子分析
## Standardized loadings (pattern matrix) based upon correlation matrix## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ML2 ? ML1 ? ML3 ? ML4 ? ?h2## X1.您的性別是... ? ? ? ? ? ? ? ? ? ? ? ? 0.07 ?0.03 -0.20 -0.23 0.098## X2.您的年級(jí)是.. ? ? ? ? ? ? ? ? ? ? ? ? ?0.04 ?0.02 ?0.07 -0.28 0.087## X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ? ? ? ? ? 0.17 ?0.05 ?0.31 ?0.00 0.128## X4.你是否做過(guò)兼職. ? ? ? ? ? ? ? ? ? ? ? 0.11 ?0.14 ?0.67 -0.03 0.481## X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ? ? ? ? ?-0.20 ?0.06 -0.17 ?0.07 0.079## X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ? ? -0.69 ?0.72 ?0.00 ?0.00 0.995## X7.您的家長(zhǎng)是否同意您做兼職.. ? ? ? ? ? ?0.69 ?0.72 ?0.00 ?0.00 0.995## X8.你會(huì)選擇做哪類兼職工作. ? ? ? ? ? ? ?-0.20 -0.05 ?0.07 ?0.47 0.269## X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. ?0.08 ?0.07 -0.12 ?0.13 0.043## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?u2 com## X1.您的性別是... ? ? ? ? ? ? ? ? ? ? ? ?0.902 2.2## X2.您的年級(jí)是.. ? ? ? ? ? ? ? ? ? ? ? ? 0.913 1.2## X3.你認(rèn)為大學(xué)生有必要做兼職嗎. ? ? ? ? ?0.872 1.6## X4.你是否做過(guò)兼職. ? ? ? ? ? ? ? ? ? ? ?0.519 1.1## X5.你認(rèn)為兼職會(huì)影響你的學(xué)業(yè)嗎. ? ? ? ? ?0.921 2.4## X6.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊. ? ? 0.005 2.0## X7.您的家長(zhǎng)是否同意您做兼職.. ? ? ? ? ? 0.005 2.0## X8.你會(huì)選擇做哪類兼職工作. ? ? ? ? ? ? ?0.731 1.4## X9.你認(rèn)為兼職過(guò)程中.你最大的優(yōu)勢(shì)是什么. 0.957 3.2## ## ? ? ? ? ? ? ? ? ? ? ? ?ML2 ?ML1 ?ML3 ?ML4## SS loadings ? ? ? ? ? 1.09 1.07 0.64 0.38## Proportion Var ? ? ? ?0.12 0.12 0.07 0.04## Cumulative Var ? ? ? ?0.12 0.24 0.31 0.35## Proportion Explained ?0.34 0.34 0.20 0.12## Cumulative Proportion 0.34 0.68 0.88 1.00## ## Mean item complexity = ?1.9## Test of the hypothesis that 4 factors are sufficient.## ## The degrees of freedom for the null model are ?36 ?and the objective function was ?0.31 with Chi Square of ?51.93## The degrees of freedom for the model are 6 ?and the objective function was ?0 ## ## The root mean square of the residuals (RMSR) is ?0.01 ## The df corrected root mean square of the residuals is ?0.02 ## ## The harmonic number of observations is ?172 with the empirical chi square ?0.98 ?with prob < ?0.99 ## The total number of observations was ?172 ?with MLE Chi Square = ?0.58 ?with prob < ?1 ## ## Tucker Lewis Index of factoring reliability = ?3.152## RMSEA index = ?0 ?and the 90 % confidence intervals are ?NA NA## BIC = ?-30.3## Fit based upon off diagonal values = 0.99## Measures of factor score adequacy ? ? ? ? ? ? ## ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ML2 ?ML1 ?ML3 ? ML4## Correlation of scores with factors ? ? ? ? ? ? 1.00 1.00 0.72 ?0.57## Multiple R square of scores with factors ? ? ? 0.99 1.00 0.52 ?0.32## Minimum correlation of possible factor scores ?0.99 0.99 0.04 -0.35



從結(jié)果來(lái)看,3個(gè)主因子所解釋的方差占整個(gè)方差的80%左右,基本反映了11個(gè)指標(biāo)的信息,第一個(gè)因子.當(dāng)兼職與上課沖突時(shí).你會(huì)怎么做啊和您的家長(zhǎng)是否同意您做兼職.的變量的載荷值較大,因此該因子反映的是兼職和個(gè)人家庭學(xué)業(yè)方面關(guān)系的能力,第5個(gè)因子在性別和年級(jí)兩個(gè)變量的載荷較大,反應(yīng)的是調(diào)查者的節(jié)本情況。第3個(gè)因子在是否做過(guò)兼職的載荷較大,所以可以代表兼職經(jīng)驗(yàn)的能力。因此,各個(gè)因子分分別可以代表這些的值的含義,從因子分析的結(jié)果來(lái)看,每個(gè)因子的經(jīng)濟(jì)意義比較明顯。 圖中 不同點(diǎn)代表不同的變量,橫軸和縱軸代表不同的主因子,如果變量在縱軸對(duì)應(yīng)的因子上具有較高的載荷,則分布在散點(diǎn)圖的左上角,若變量在橫軸因子上有較大的載荷,則分布在右下角。 從上圖,可以看到4個(gè)因子在11個(gè)變量上載荷比重的關(guān)系,因子和變量之間有聯(lián)系說(shuō)明因子在這些變量上有較大的載荷,連線的數(shù)字表示該因子在該變量上的載荷值。

最受歡迎的見(jiàn)解
1.matlab偏最小二乘回歸(PLSR)和主成分回歸(PCR)
2.R語(yǔ)言高維數(shù)據(jù)的主成分pca、 t-SNE算法降維與可視化分析
3.主成分分析(PCA)基本原理及分析實(shí)例
4.R語(yǔ)言實(shí)現(xiàn)貝葉斯分位數(shù)回歸、lasso和自適應(yīng)lasso貝葉斯分位數(shù)回歸
5.使用LASSO回歸預(yù)測(cè)股票收益數(shù)據(jù)分析
6.r語(yǔ)言中對(duì)lasso回歸,ridge嶺回歸和elastic-net模型
7.r語(yǔ)言中的偏最小二乘回歸pls-da數(shù)據(jù)分析
8.R語(yǔ)言用主成分PCA、?邏輯回歸、決策樹、隨機(jī)森林分析心臟病數(shù)據(jù)并高維可視化
9.R語(yǔ)言主成分分析(PCA)葡萄酒可視化:主成分得分散點(diǎn)圖和載荷圖