針對不同群體設計不同特性的相機產品

非參大作業(yè)：針對不同群體設計不同特性的相機產品組長略文獻簡述及初步探索李克特量表1、總體分布情況圖1度量c01-c05，c11-c16的得分情況，將每一份問卷的得分相加，得到總分score，整體情況如圖1.從圖中可以看出,量表總分絕大部分分布在“普通”(3×11=33)右側,即群體態(tài)度傾向于積極。群體量表總分均值為41,標準差為5.616133。(Rcode1)2、因子分析關Total陰Vari穴ance晉Expla屢ined矛Compo盆nent個Initi壽alEi蜓genva朵lues椒Extra尺ction榆Sums寨ofS稅quare稍dLoa頭dings很Rotat答ionS銹umso玩fSqu組ared刺Loadi可ngs孔Total劇%of情Varia蹲nce彩Cumul勞ative介%鳳Total應%of就Varia喬nce焦Cumul滋ative槐%搬Total旨%of未Varia齊nce鞏Cumul權ative苦%石1書4.299宅39.07敲8準39.07瞎8森4.299熊39.07安8摟39.07灑8完3.547地32.24菠2物32.24怨2俗2逮1.408間12.79贊8流51.87文6擦1.408于12.79家8膛51.87坑6壩2.056制18.68華7界50.92畢9掏3金1.087霜9.879傅61.75豪4響1.087付9.879熊61.75逐4獻1.191社10.82擾5埋61.75逃4尖4菠.881賣8.008泰69.76稍2誠5賢.798粥7.256衫77.01術8舊6龜.711守6.465懇83.48痕2頑7犬.545熱4.954社88.43忽6峰8紡.466邪4.235眉92.67荷1也9袍.400受3.634軍96.30或5擋10職.293丟2.667歸98.97姐2猶11睬.113些1.028銜100.0喂00依Extra嗽ction果Meth災od:P扁rinci擺palC盞ompon駁entA慨nalys擴is.3、分類情況概覽（用rpart包做決策樹）(Rcode2)為了解對不同相機特性的重視程度和職業(yè)的關系，抽樣420個數據記錄作為訓練集，用剩下449個數據記錄作為測試集，進行了回歸樹分析，得到的初步分類為下圖所示：測試的結果為：>table(predict(kyphosis,kyphosis1,type="class"),camera[tsamp,19])飛蹄1拾23誠4燃1炒151恰812越10愈2仙41111伯6756耕3貫52牧220成10假4訂102戲017袋15陵衫誤分率為6應4%饅仗從決策樹中艷可以大致看弄出每種職業(yè)繪的偏好特點涼情況：頂·校1代表學生悉：學生群體義的特點：往店往處在左向絨樹枝的末端眉，意味著學檔生往往對于怕相機的各個呢參數都很看猴重，屬于非伍常敏感的群紛體；磁·拘2代表企業(yè)析大經理：企蠅業(yè)大經理的穗位置分布較蠢廣，可以認咽為群體內的收差異比較大衡，沒有非常濫統(tǒng)一的敏感劃特點；剝·是3代表一般甚行政：這個觀群體比較明稍顯的一個特怕征是，有一帽部分人非常渠看重定時拍娃攝，但對任余意角度拍攝餡并不敏感奪·苦4代表專業(yè)湯技術：該群抵體在下圖的大最右支這部矮分人群較為棍重視相機可盒上網的功能總，這一點比近較值得關注閃。幟下表為全數請據進行得回裁歸樹分析：床(Rcod蝶e3)描述統(tǒng)計立不同職業(yè)的珠人對外觀的彩重視程度滑1、蹄輕薄短小，千攜帶方便胳2、群新潮、很絢匹3、同多樣化顏色燃4、敢搭配流行的銹造型圖案薯在外觀的選迎擇上，不同紗職業(yè)人群的頓偏好大體相配同。其中，奪對亡“釀新潮、很炫漢”址這一外觀特屠性普遍持重冤視態(tài)度，而鏟對其它外觀踐特征，持普點通和重視態(tài)編度的人群比灰例大體相同施并且均較高歡。兄不同職業(yè)的丹人對功能的劃重視程度檢簡單的操作砍方式，只要頃按一個鍵就座能拍攝煌連動拍攝（忠1秒20張希）謊任意角度拍壺攝定時拍攝可更換鏡頭可接三角架可上網籌在功能的選幼擇上，不同疑職業(yè)人群的債偏好游也謊大體相同?；牌渲?，對中“現操作簡單、戚聯(lián)動拍攝、稿任意角度拍丘攝躁”齒這三種功能懂特性普遍持械相當橫重視蹄的智態(tài)度，而對訓其它霸四種功能鋒特征，持普戴通刺態(tài)度的人群困比例最高東。摟不同性別對肺相機外觀的雁重視程度插1、賢輕薄短小，洪攜帶方便欄2、齊新潮、很絢剝3、歷多樣化顏色棒4、則搭配流行的展造型圖案連對外觀選擇三方面，男女蓋偏好大體一槐致。其中，斤兩者均對撈“廊新潮、很炫僑”肯這一外觀特汪性持重視態(tài)圣度，其他三國個方面的外宇觀特性持普躁通與重視態(tài)耍度的人群比她例大致相同斃且均較高。礙不同性別對泥相機功能的腦重要程度內簡單的操作得方式，只要撫按一個鍵就蜻能拍攝蠅連動拍攝（慮1秒20張挺）腹任意角度拍雄攝定時拍攝可更換鏡頭可接三角架可上網雁在功能的選欄擇上，不同項性別的人群嫌偏好也大體納相同。其中篇，對氣“久操作簡單、掛聯(lián)動拍攝、眠任意角度拍土攝都”姑這三種功能愉特性普遍持沉相當重視的座態(tài)度，而對持其它四種功活能特征，持誤普通態(tài)度和懷重視態(tài)度的襯人群比例均遵較高。弟不同性別對伯價格的可接長受程度崖對半價格的可接弦受程度，男脈性普遍能接井受較高價格挑，而女性傾踩向于較低價爸格。其中，京男性能接受拉的價格集中終在1000礎-3000娃左右，而女參性能接受的蟻價格集中在膚2000以墓下。滋不同職業(yè)對買價格的可接鬧受程度絹對價格的可貞接受程度，滋不同職業(yè)的弟人群有較大幕差異。其中休，專業(yè)技術火人員能接受娘的價格最高傭；一般行政歷人員和企業(yè)征大堂經理能交接受的價格細最低，基本肯集中在20已00以內；溝學生的可接品受價格處于嚼中間水平，崇普遍集中在裁1000-抵2000元槐之間。歡綜上所述，篇不同職業(yè)和嘴不同性別的宜人群對相機陸外觀和功能石的偏好大致駛相同。其中越，在外觀上租，人們普遍濟對隸“弦新潮、很炫游”肥比較看重；情在功能上，析人們普遍對哈“蛛操作簡單、蜜聯(lián)動拍攝、殊任意角度拍六攝訂”約相當重視。掉在價格的可之接受程度上測，不同職業(yè)鋼和不同性別恢的人群有較炊大差異。其悄中，性別方第面，男性可幼接受的價格汗高于女性；夢職業(yè)方面，知專業(yè)技術人圣員可接受的魂價格最高，慧其次為學生委，一般行政溫人員和企業(yè)嬸大堂經理可宗接受價格最耽低。妹不同兔職業(yè)的人對撓于邪相機各慨屬性重啊視突程度輩的比較派由之前的描歷述統(tǒng)計結果必可以看到男糧女對于相機誠屬性的偏好麗各不相同，獵因此為了更戰(zhàn)好的了解不猶同職業(yè)的人塑偏好的不同忽，我們首先遼將總體分男熟女進行區(qū)分妄，然后分別慶對男性和女冒性不同職業(yè)攝的人群做呈其對不同相匙機屬性重視鴿程度的Ri測dit檢驗壞。潑H0：所考應察人群對于鎮(zhèn)各屬性的重矮視程度無輕箏重之分膀H1：所考夢察人群對于需各屬性的重稀視程度有輕內重之分概不同職業(yè)人跨群對于咱攜帶方便特額性（C01濕）慎的重視程度弦列聯(lián)表（男姥性）高重濕視度塞職業(yè)扶非常不重視顏不重視糞普通姥重視維非常重視但學生誘0惕1額7劍5罪0脅企業(yè)大堂經默理糾7緒35潤125盲120械39難一般行政斯4調26朵73搭69士21捎專業(yè)技術彩1小1斜9紋8威2庭不同職業(yè)人惠群對于躬攜帶方便特肅性（C01音）暢的重視程度卻列聯(lián)表（女關性）明重躺視度鋤職業(yè)棍非常不重視凳不重視咸普通吵重視袋非常重視司學生他4針24薪58舌52直7破企業(yè)大堂經線理耍0姐0濁0聾2閥0捷一般行政乓0蒙0束8氣7她1闊專業(yè)技術懶4水25帳62脾46持16掛不同職業(yè)人城群對于箭攜帶方便特淹性（C01窩）做的重視程度絹Ridit凈值忘95%扁置信區(qū)間圖假（哭左男右女盟下整體布）牙不同職業(yè)人室群對于謀新潮特性（頸C02）漿的重視程度刮Ridit眨95%憤值置信區(qū)間妄圖（左男右龜女傭下整體圖）免不同職業(yè)人念群對于融多樣化顏色攏特性（漆C03箱）醬的重視程度秋Ridit板值研95%證置信區(qū)間圖慶（左男右女帽下整體賺）劫五封不同職業(yè)人嶼群對于紐流行惠造型圖案來特性（吩C04甩）幕的重視程度淘Ridit屈值95%置摔信區(qū)間圖（望左男右女樸下整體對）登皮君不同職業(yè)人騾群對于姓簡單畏操作方式誤特性（戰(zhàn)C05淚）爬的重視程度刷Ridit儉值95%置頓信區(qū)間圖（昂左男右女饒下整體衣）斤不同職業(yè)人號群對于凳連動拍攝亦特性（鉗C11頌）己的重視程度貍Ridit瘡值95%置劣信區(qū)間圖（拼左男右女珠下整體喊）惜不同職業(yè)人菊群對于領任意角度拍線攝摘特性（督C12敞）點的重視程度臘Ridit閣值95%置淹信區(qū)間圖（產左男右女晝下整體殼）咱不同職業(yè)人磁群對于小定時拍攝碑特性（墳C13赴）橡的重視程度剛Ridit組值95%置岔信區(qū)間圖（跪左男右女指下整體蘋）罷不同職業(yè)人醋群對于賭可更換鏡頭溝特性（塘C14傳）彼的重視程度誠Ridit酒值95%置衣信區(qū)間圖（障左男右女孩下整體湖）狠不同職業(yè)人纏群對于猛可接三角架問特性（授C15鍵）饞的重視程度宜Ridit子值95%置酒信區(qū)間圖（籮左男右女須下整體映）葡不同職業(yè)人麻群對于僻可上網堅特性（準C16事）喚的重視程度族Ridit環(huán)值95%置取信區(qū)間圖（辜左男右女仔下整體饅）驢匯總表如下紗：胞屬性憲男聞女兆整體旨C罷02沾對職業(yè)一重層要性低桐對職業(yè)一重描要性低桐C11桶對職業(yè)二重親要性高終對職業(yè)三重也要性低凝對職業(yè)二重捎要性高作C12許對職業(yè)二重恥要性高漂對職業(yè)三重秤要性低如對職業(yè)二重棄要性高趣C13福對職業(yè)二重墾要性高誕對職業(yè)三重作要性低艱對職業(yè)二重割要性高，職布業(yè)四重要性庸低濁C14暫對職業(yè)三重粉要性高屆對職業(yè)三重嫁要性低蒙C15村對職業(yè)二重我要性高裕對職業(yè)三重究要性低捐對職業(yè)二重外要性高恢C喪16超對職業(yè)二重開要性高寸對職業(yè)三重每要性低陪對職業(yè)三重聯(lián)要性低饞不同職業(yè)人規(guī)群對相機屬石性重視程度乒的映關聯(lián)規(guī)則分原析關聯(lián)規(guī)則配先對數據處騙理整理成撈2元數據，彎只選取了其擠中部分變量預如下：溝c01c貼02c0劃3c04龜c05壯c11c刮12c1吸3c14眠c15瓜c16饒其中c01訓到c16為辰對相機的特釀性重視程度箭，包括外觀皂和性能，處愧理辦法是把身重視和非常軟重視設為1打，普通，不餐重視和非常迷不重視設為貨0培d1破為性別燙轉化后0表木示男性1表違示女性快砌下面轉化成騎函數包能處近理的tra瓶nsact告ion形式絕camer糊anew1山=as.m羊atrix撞(came攻ranew扎1);t釋rans2疲<-a歪s(cam硬erane鑒w1,"鋼trans剪actio狹ns");因院轉化后數據閉情況大致如惰下嘩summa租ry(tr燭ans2)尼從中大概可競以看出最受杜重視的因素蕩有c12，理c11，c庭05，c0廁2，這點從滴下面的頻率納圖中也可以蓮看出布itemF缸reque燦ncyPl監(jiān)ot(tr棟ans2,各supp飾ort=叔0.05帝,cex愉.name歌s=0勉.8)#款圖3.1分性別：零按lift泉由大到小排桑序的?？梢允闯雠砸老纱胃匾昪孫03，c0之1，c13農，c05，往c15，c殖12，c0鐘4，c02什這些提升度機均大于1，代意味著女性陶傾向于重視問這些因素。穴但有意思的斧是d1夏——污c14和d植1到c15岔的提升度是首小于1的，退也就意味著駛沒有先驗信疑息是重視c袖14和c1魂6的概率要遼大于女性重圈視這兩個因厘素的比例，定所以針對女圾性相機這兩徐個特性可以燭不做重點宣遍傳和打造的傭。取分訂職業(yè)：結將總體按照兆職業(yè)的不同且分為四大類遵，分別對于禮相機外觀和械配置供11潑個屬性進行娛關聯(lián)分析，謹根據提升度賴這一指標分喂析不同人群代重視相機屬疊性的關聯(lián)效吧應。這對于悄相機廠商針浩對目標人群盲的相機整體交設計具有指筋導意義。覽取支持度大溉于0.5，酸置信度在0茄.95以上陶，提升度在膜1.1以上由的關聯(lián)項輸竿出如下：學生：陣企業(yè)大堂經富理：一般行政：專業(yè)技術：結論閘描述統(tǒng)計階支段的分析表睛明：噸在相機外觀繞和功能方面紗，不同職業(yè)范和不同性別緊的人群希的重視程度壁有細微差別侵。其中，在哭外觀上，人亮們普遍對啞“鍬新潮、很炫培”橫比較看重；抗在功能上，愧人們普遍對尸“炸操作簡單、晚聯(lián)動拍攝、觀任意角度拍期攝搞”腳相當重視。島在價格的可偏接受程度上先，不同職業(yè)既和不同性別傭的人群有較謹大差異。其酷中，性別方怒面，男性可撞接受的價格待高于女性；愉職業(yè)方面，膀專業(yè)技術人解員可接受的功價格最高，棒其次為學生舒，一般行政癢人員和企業(yè)擊大堂經理可敘接受價格最毀低。惜Rdit檢助驗結果表明在：舟于學生來說白，對不太重菠視條輕薄短小，膊攜帶方便蒜這一特性，毅其他特性的楊顯著性沒有卷通過墓旁對于企業(yè)大皮堂經理來說弟，c11到哥c15的特齊性重視度都月很高，及可上以針對此人帥群設計株連動拍攝（分1秒20張載）慰、叫任意角度拍逮攝尺、朱定時拍攝心、設可更換鏡頭量和涼可接三角架梯性能好的相微機。特鈔對于一般行滅政人員來說扣，男性的特諸點是對可更黎換鏡頭比較密重視，女性倡一般行政人進員從結果上友看對很多特撕性都不是很辜重視，針對治以上這些可嚇以對男性一浪般行政人員躺設計可更換運鏡頭較好的篩相機，對女哥性一般行政苗人員設計一巡般化產品即敢可。奏對于專業(yè)技慢術人員來說圍，上述檢驗便沒有檢驗出鑼很多顯著的盾特點，需要餃注意的是專報業(yè)技術人員蠅對定時拍攝蔥重視度低，受所以針對這池類人群的相焰機定時拍攝微功能一般化請即可。勇總的來看，寨人們對于相包機屬性的重乎視度的關聯(lián)熊主要集中于吳相機的技術峰配置，而不砌是外觀立關聯(lián)規(guī)則結雁果表明：僅于學生來說苗，重視盤“腫定時拍對攝燃”亦特性的同時肅也會同時重昆視快“關連動拍攝谷”椒和甚“源任意角度拍纏攝膠”練，同時注意仁到線“練連動拍攝鬧”儉和規(guī)“斥任意角度拍傳攝氣”偽特性也是相蠅互關聯(lián)的，扮因此針對此啟類人群的同肢一產品中這輸三個特性最姻好兼顧妄對于企業(yè)大撥堂經理來說莖，屬性間的俘關聯(lián)因素很追多，較為明親顯的有哨“責連動拍攝柄”擦、和“揭任意角度拍尺攝霜”泉、禁“下定時拍攝戲”蚊間，以及揪“涉任意角度拍微攝煩”綱、冤“方定時拍攝貿”稀同級“僻可更換鏡頭式”隔、付“相可接三角架敏”荷之間的關聯(lián)訴，說明以上疑五個屬性最濃好同時在針靜對此類人群闊的設計中體叫現盆對于一般行存政人員來說貴，押“育連動拍攝館”且屬性和經“籮任意角度拍杯攝勁”尺屬性相互關終聯(lián)，因此針先對此類人群堆的同一產品性中做“鼻連動拍攝扇”特屬性和豈“幸任意角度拍打攝詳”械可以同時體鞭現。捐對于專業(yè)技全術人員來說扯，語“錦連動拍攝忌”改屬性和踢“勾任意角度拍過攝拐”騰屬性相互關嶄聯(lián)，因此針絹對此類人群奪的同一產品決中北“家連動拍攝啄”拐屬性和默“兆任意角度拍費攝翼”違可以同時體微現。儲總的來看，敲人們對于相凳機屬性的重憑視度的關聯(lián)破主要集中于巷相機的技術員配置，而不源是外觀鵲綜上所述，纖本文主要正辰對不同職業(yè)輛對相機不同甘特性重視程私度的差異?？山涍^以上分北析知，不同較職業(yè)間人群受確實存在差葬異，總體而諸言企業(yè)大堂口經理重視的約特性最多，港這類顧客是親最挑剔的，希但是肚其心理價位波卻不高，相湯比而言對于船學生群體和員專業(yè)技術人奸員，主要重耳視的是相機糖的功能，心裁理價位較高拼，可以重點帖突破。與此型同時，針對墾一般行政人的員可以采取陪一般化產品鬧的推廣即可低。程序附錄拳文獻綜述及怎數據初探部甚分俊Rcode寄1:隸camer禮a=rea拍d.tab氣le("C雙:\\Us色ers\\抱MacX\遵\Desk生top\\耗camer永a.txt搖",hea滴der=T庭)我attac稱h(cam務era)瓣v=whi躲ch(is庫.na(c匙amera宅),arr宏.ind=詠TRUE)霉##檢測警缺失值（輸煎出結果無缺盜失值）滔a=mat腸rix(c寶(c01,勒c02,c包03,c0塑4,c05軟,c11,醬c12,c工13,c1琴4,c15度,c16)款,nrow梳=869,卵ncol=兔11)扮score個=NA答for(i顧in1婆:869)婚{scor惜e=c(s謊core,那sum(a里[i,])漢)}滾hist(腐score顛,prob防=TRUE燦,ylim泄=c(0,袖0.09)兼,xlim乓=c(10退,60))該lines礦(dens賭ity(s條core)購)席rug(j易itter近(scor巡e))挨Rcode弄2:m=869棄set.s要eed(1堆0)矩samp=筋c(sam怎ple(1掉:200,圍100),屬sampl抄e(201隱:400,已100),蜜sampl旦e(401團:600,腥100),布sampl教e(601踢:869,薪120))騾tsamp旅=setd魔iff(1松:m,sa擋mp)繼kypho紹sis=r丸part(太facto病r(d3)歪~fact壟or(c0夸1)+fa笛ctor(循c02)+碎facto真r(c03稻)+fac撿tor(c朽04)+f反actor每(c05)刷+fact番or(c1逼1)+fa電ctor(揚c12)+鴨facto薦r(c13夢)+fac購tor(c桶14)+f礙actor決(c15)憲+fact式or(c1滋6),da磨ta=ca煌mera,享subse嗚t=sam騾p)會kypho蹦sis啞plot(禽kypho助sis)片text(繁kypho罩sis,u吃se.n=輪T,xpd壺=T)屋libra詠ry(rp購art.p走lot)源rpart接.plot投(kyph壯osis)懂kypho底sis1=漆camer奧a[tsa老mp,]型predi祥ct(ky臉phosi束s,kyp疫hosis從1,typ然e="cl譯ass")饞table殊(pred葉ict(k姑yphos敬is,ky殃phosi椒s1,ty晃pe="c恭lass"俱),cam付era[t擠samp,后19])叔Rcode賊3襯stu=a弟[whic晶h(d3=握=1),]紙libra奶ry(rp臥art)攔fit=r幸part(納facto蕉r(d3)船~fact龜or(c0昨1)+fa菜ctor(劣c02)+幅facto攤r(c03狗)+fac礦tor(c終04)+f灘actor俱(c05)桌+fact鮮or(c1免1)+fa酸ctor(月c12)+哭facto拖r(c13年)+fac誓tor(c善14)+f澆actor烤(c15)姜+fact條or(c1插6),da憶ta=ca幕mera)奪plot(東fit);妙text(緞fit,u日se.n=根T,xpd鼓=T)彎rpart蕉.plot竭(fit)刪描述統(tǒng)計部僚分：型data=跌read.職table礙("dat追a.dat組",hea勇der=T志)皆attac潛h(dat理a)它par(m伶frow=危c(1,2渣))#臣不同性別對糊外觀重要性收的箱線圖攀for(i裙in1箭:2)爪boxpl頁ot(c0愿1[d1=炮=i],c膀02[d1跳==i],飽c03[d修1==i]越,c04[竊d1==i宏],mai叮n=row醫(yī)names范(sex.那c01)[狀i])粉for(i躲in1獨:2)傭#不同性別攤對功能重要超性的箱線圖冬boxpl羅ot(c0趣5[d1=庫=i],c只11[d1險==i],謠c12[d陷1==i]躺,c13[時d1==i多],c14錫[d1==溉i],c1刑5[d1=簡=i],礎c16[d逝1==i]充,main剝=rown我ames(底sex.c棉01)[i役])朽#性別對外戚觀&功能重扶要程度，列掛聯(lián)表，條形坐圖局sex.c臺01=ma好trix(育rep(0批,10),驅nrow=膠2,dim穴names范=list輔(c("男吵","女"秒),嘴c("非常嗚不重視",強"不重視"拘,"普通"退,"重視"腔,"非常重賭視")))鬼for(i撕in1搜:2)利for(j概in1厲:5)艘sex.c擋01[i,捕j]=su首m(d1=紛=i&面c01==搶j)頓par(m決frow=灣c(1,2客))旨for(i慘in1肆:2)五barpl明ot(se碰x.c01霉[i,],這main=株rowna感mes(s簽ex.c0憶1)[i]青)行sex.c鼠02=ma占trix(滋rep(0壯,10),臂nrow=闖2,dim管names豆=list池(c("男肅","女"谷),遵c("非常彈不重視",剛"不重視"隨,"普通"尊,"重視"掠,"非常重躁視")))是for(i霉in1旁:2)悅for(j業(yè)in1令:5)肯sex.c改02[i,株j]=su鑰m(d1=席=i&隊c02==符j)吊par(m伸frow=弟c(1,2禮))債for(i夠in1利:2)中barpl婦ot(se引x.c02嗎[i,],沙main=陪rowna弓mes(s誕ex.c0安2)[i]涉)鞏sex.c扶03=ma熱t(yī)rix(記rep(0坡,10),晶nrow=左2,dim甜names漠=list孫(c("男機","女"裝),崇c("非常巴不重視",洋"不重視"斯,"普通"別,"重視"據,"非常重具視")))泉for(i推in1孤:2)現for(j至in1居:5)悔sex.c獅03[i,輩j]=su詢m(d1=柄=i&派c03==茫j)藥par(m賓frow=晌c(1,2幕))飼for(i繭in1穴:2)綿barpl館ot(se游x.c03煉[i,],河main=則rowna曲mes(s懲ex.c0砌3)[i]找)濃sex.c伶04=ma檔trix(計rep(0野,10),垃nrow=齒2,dim握names壟=list代(c("男懼","女"源),宿c("非常身不重視",眉"不重視"正,"普通"揀,"重視"嫌,"非常重喪視")))諒for(i遇in1支:2)保for(j讀in1央:5)借sex.c廚04[i,痕j]=su腸m(d1=昆=i&槐c04==箱j)片par(m姿frow=菠c(1,2幅))叫for(i驢in1該:2)就barpl摘ot(se擴x.c04通[i,],在main=雷rowna欠mes(s惜ex.c0板4)[i]聽)鑰sex.c筐05=ma絮trix(孟rep(0襪,10),勞nrow=熟2,dim懸names田=list佛(c("男擺","女"叫),粉c("非常康不重視",畜"不重視"晶,"普通"者,"重視"奏,"非常重懂視")))粉for(i狀in1肢:2)俊for(j亦in1殲:5)慌sex.c釋05[i,濁j]=su貢m(d1=倡=i&公c05==勒j)嗓par(m燈frow=總c(1,2蔬))冊for(i活in1施:2)脫barpl奉ot(se垂x.c05騎[i,],刪main=面rowna顫mes(s僑ex.c0宋5)[i]脖)遭sex.c已11=ma蓮trix(叨rep(0笑,10),項nrow=屋2,dim迷names虹=list賽(c("男鉤","女"左),撓c("非常恒不重視",蹄"不重視"藝,"普通"解,"重視"革,"非常重氧視")))條for(i趙in1吩:2)釀for(j癥in1永:5)拆sex.c斷11[i,福j]=su握m(d1=浙=i&濱c11==甩j)斤par(m當frow=腿c(1,2廊))屆for(i咐in1錘:2)閃barpl穩(wěn)ot(se域x.c11智[i,],申main=題rowna春mes(s伴ex.c1淘1)[i]膨)烤sex.c組12=ma綁trix(際rep(0征,10),踐nrow=汪2,dim刊names算=list扭(c("男君","女"項),做c("非常并不重視",菠"不重視"惰,"普通"充,"重視"窗,"非常重確視")))劣for(i緞in1妖:2)磚for(j發(fā)in1透:5)憐sex.c永12[i,賀j]=su遷m(d1=惰=i&齊c12==律j)錢par(m林frow=墾c(1,2鏡))剝for(i廟in1度:2)告barpl肅ot(se蹤x.c12苦[i,],覆main=蜓rowna耽mes(s扇ex.c1態(tài)2)[i]賄)寫sex.c綁13=ma砌trix(議rep(0堆,10),識nrow=帳2,dim候names躺=list艙(c("男股","女"矛),來c("非常劇不重視",也"不重視"甚,"普通"淡,"重視"志,"非常重稻視")))抽for(i都in1盆:2)出for(j怨in1詞:5)誤sex.c厭13[i,執(zhí)j]=su筒m(d1=艷=i&并c13==靠j)兆par(m氣frow=桐c(1,2彈))國for(i帶in1炭:2)港barpl赴ot(se膚x.c13儉[i,],遼main=敲rowna泡mes(s蠅ex.c1手3)[i]社)世sex.c寬14=ma肆trix(奶rep(0代,10),喇nrow=捧2,dim蔽names做=list悄(c("男器","女"些),的c("非常軟不重視",丸"不重視"蘋,"普通"霜,"重視"零,"非常重湊視")))德for(i壺in1米:2)凳for(j現in1素:5)哲sex.c敵14[i,鄭j]=su購m(d1=嘉=i&浙c14==點j)因par(m厘frow=減c(1,2剪))褲for(i善in1顯:2)屆barpl斗ot(se妨x.c14芽[i,],檢main=黨rowna使mes(s且ex.c1呈4)[i]慎)尤sex.c指15=ma握trix(賣rep(0沿,10),脹nrow=告2,dim每names乞=list歲(c("男務","女"晃),露c("非常坡不重視",叫"不重視"連,"普通"崖,"重視"盒,"非常重簽視")))蒜for(i惰in1法:2)哄for(j逃in1闖:5)仰sex.c第15[i,倡j]=su糊m(d1=原=i&促c15==嫩j)局par(m替frow=鋼c(1,2致))炭for(i素in1歪:2)宴barpl具ot(se昌x.c15歇[i,],郊main=斗rowna協(xié)mes(s著ex.c1東5)[i]界)謎sex.c武16=ma染trix(旅rep(0榜,10),添nrow=桃2,dim煩names努=list源(c("男犧","女"典),郊c("非?？棽恢匾?,冶"不重視"尺,"普通"銜,"重視"城,"非常重暑視")))董for(i注in1墨:2)帝for(j裕in1瘡:5)核sex.c緊16[i,議j]=su朽m(d1=腳=i&處c16==苦j)個par(m鉛frow=饅c(1,2當))播for(i搞in1堡:2)泊barpl靈ot(se序x.c16得[i,],爺main=巨rowna集mes(s念ex.c1夫6)[i]粱)荷par(m吼frow=夜c(2,2囑))#趙不同職業(yè)對圣外觀重要性躁的箱線圖棉for(i心in1儀:4)熄boxpl重ot(c0罰1[d3=陜=i],c步02[d3銀==i],焰c03[d榆3==i]敵,c04[夠d3==i熔],mai染n=row雁names已(job.骨c01)[擔i])鑰for(i稻in1藝:4)丙boxpl績ot(c0酷5[d3=歷=i],c球11[d3滲==i],爹c12[d偉3==i]翻,c13[協(xié)d3==i擔],c14蛙[d3==氏i],c1蛙5[d3=弱=i],司c16[d撓3==i]乎,main忘=rown斃ames(小job.c定01)[i脆])著#列聯(lián)表畫屠條形圖_不梢同職業(yè)對外殃觀和功能的誠重視程度憲job.c涌01=ma救trix(控rep(0岔,20),擦nrow=貪4,dim哭names倡=list芽(c("學柱生","企砍業(yè)大堂經理踩",歸"一般行政搞","專業(yè)具技術"),雖c("非常暑不重視",帽"不重視"關,"普通"槐,"重視"立,"非常重葵視")))繡for(i駕in1疑:4)著for(j杠in1享:5)仰job.c奸01[i,阿j]=su側m(d3=徒=i&直c01==貍j)責par(m泡frow=茫c(2,2懷))固for(i嘆in1貨:4)濫barpl請ot(jo杏b.c01郵[i,],喪main=驢rowna粘mes(j漫ob.c0純1)[i]豬)石job.c尚02=ma病trix(初rep(0網,20),進nrow=蜜4,dim喊names逆=list肺(c("學饑生","企枝業(yè)大堂經理凍",坐"一般行政匯","專業(yè)思技術"),變c("非常館不重視",捐"不重視"滴,"普通"惡,"重視"否,"非常重閑視")))健for(i軟in1順:4)電for(j漆in1怎:5)潮job.c犯02[i,斜j]=su冤m(d3=凈=i&赴c02==腿j)流par(m騎frow=惹c(2,2冬))扭for(i讓in1輕:4)泉barpl陷ot(jo鬧b.c02猛[i,],鬼main=流rowna更mes(j佩ob.c0售2)[i]輩)連job.c搏03=ma伯trix(共rep(0大,20),努nrow=辟4,dim見names哭=list扒(c("學旬生","企詳業(yè)大堂經理岔",使"一般行政管","專業(yè)卡技術"),稀c("非常價不重視",哈"不重視"岔,"普通"燈,"重視"到,"非常重授視")))惹for(i趴in1罩:4)渡for(j腫in1醒:5)際job.c刻03[i,煎j]=su超m(d3=牲=i&齒c03==春j)粗par(m段frow=滾c(2,2鍛))磚for(i輪in1搬:4)殲barpl男ot(jo材b.c03覽[i,],簽main=蘿rowna品mes(j漆ob.c0篇3)[i]辯)博job.c期04=ma栽trix(省rep(0瘋,20),玉nrow=然4,dim唇names窮=list月(c("學賣生","企孤業(yè)大堂經理禁",脖"一般行政踢","專業(yè)建技術"),蹈c("非常垂不重視",作"不重視"分,"普通"燦,"重視"礦,"非常重叫視")))榨for(i狗in1砍:4)忘for(j識in1恢:5)削job.c殿04[i,別j]=su汁m(d3=買=i&購c04==皇j)紛par(m狼frow=告c(2,2心))柜for(i桑in1誼:4)概barpl運ot(jo愧b.c04法[i,],死m(xù)ain=攝rowna訪mes(j約ob.c0廉4)[i]蛾)購job.c寧05=ma刃trix(朝rep(0炮,20),鳳nrow=僑4,dim浸names蛾=list票(c("學群生","企集業(yè)大堂經理伯",淹"一般行政規(guī)","專業(yè)戶技術"),頌c("非常紫不重視",蒼"不重視"睡,"普通"交,"重視"亭,"非常重劇視")))趕for(i登in1俯:4)接for(j斜in1江:5)紹job.c褲05[i,述j]=su喬m(d3=容=i&跪c05==伏j)監(jiān)par(m齊frow=擱c(2,2于))至for(i但in1私:4)今barpl慶ot(jo徹b.c05陵[i,],難main=洞rowna煉mes(j擱ob.c0攏5)[i]煎)昆job.c譽11=ma委trix(購rep(0浙,20),覽nrow=驅4,dim緩names燦=list龍(c("學凳生","企鋒業(yè)大堂經理惡",遇"一般行政佳","專業(yè)那技術"),氏c("非常冬不重視",齊"不重視"田,"普通"善,"重視"廳,"非常重鞋視")))際for(i隔in1壯:4)海for(j仆in1軋:5)剃job.c損11[i,筍j]=su戚m(d3=醬=i&門c11==公j)蠅par(m笨frow=呼c(2,2漠))圓for(i朽in1齡:4)行barpl科ot(jo烈b.c11晨[i,],鬼main=脾rowna箱mes(j鐮ob.c1喜1)[i]廉)貴job.c虎12=ma喚trix(傲rep(0余,20),攪nrow=激4,dim花names趁=list及(c("學扶生","企肆業(yè)大堂經理樸",巧"一般行政亦","專業(yè)色技術"),厚c("非常銜不重視",鮮"不重視"便,"普通"僑,"重視"著,"非常重約視")))泄for(i灘in1堪:4)吼for(j臥in1鼓:5)琴job.c趕12[i,脖j]=su瘡m(d3=故=i&蕉c12==惱j)有par(m西frow=瘡c(2,2嶺))啊for(i嶼in1毫:4)齡barpl攪ot(jo上b.c12某[i,],護main=硬rowna窮mes(j憲ob.c1士2)[i]紋)帆job.c礙13=ma脖trix(施rep(0涼,20),例nrow=呢4,dim必names挑=list惠(c("學蔬生","企燥業(yè)大堂經理巨",支"一般行政貓","專業(yè)配技術"),跌c("非?；@不重視",夕"不重視"器,"普通"漿,"重視"悼,"非常重湖視")))綠for(i密in1損:4)巧for(j加in1鳴:5)章job.c鉤13[i,桂j]=su壯m(d3=測=i&幅c13==絲j)沸par(m釀frow=膨c(2,2倡))白for(i績in1喜:4)尤barpl毒ot(jo男b.c13年[i,],突main=唱rowna肆mes(j掙ob.c1路3)[i]爹)尋job.c偶14=ma閥trix(努rep(0困,20),婆nrow=描4,dim比names貨=list僻(c("學尿生","企棄業(yè)大堂經理器",闊"一般行政區(qū)","專業(yè)班技術"),他c("非常耀不重視",弓"不重視"門,"普通"奔,"重視"頑,"非常重黃視")))桶for(i放in1疼:4)浙for(j截in1驅:5)遲job.c她14[i,律j]=su購m(d3=督=i&摘c14==趕j)趟par(m縣frow=裁c(2,2興))施for(i請in1勵:4)嗚barpl成ot(jo炸b.c14購[i,],灶main=謎rowna掉mes(j嫁ob.c1栽4)[i]榮)涉job.c飼15=ma絹trix(樂rep(0堤,20),船nrow=繼4,dim艷names宴=list蕩(c("學撐生","企厘業(yè)大堂經理奇",濱"一般行政鼓","專業(yè)風技術"),搜c("非常旱不重視",喬"不重視"返,"普通"卸,"重視"著,"非常重旺視")))本for(i憑in1敘:4)險for(j義in1選:5)化job.c豐15[i,倡j]=su斯m(d3=仆=i&汪c15==爹j)形par(m前frow=絮c(2,2釘))點for(i志in1艷:4)沒barpl違ot(jo刃b.c15余[i,],警main=院rowna模mes(j以ob.c1屬5)[i]盞)準job.c鵝16=ma貞trix(創(chuàng)rep(0諸,20),右nrow=夏4,dim帥names撓=list驕(c("學看生","企她業(yè)大堂經理制",裝"一般行政弄","專業(yè)瓦技術"),脆c("非常衫不重視",更"不重視"烤,"普通"莖,"重視"互,"非常重傾視")))宵for(i枝in1貧:4)滴for(j丟in1武:5)話job.c沿16[i,寄j]=su北m(d3=鈴=i&沙c16==豐j)揭par(m等frow=咽c(2,2爛))濾for(i匠in1歉:4)曉barpl屯ot(jo歐b.c16拋[i,],矮main=赴rowna進mes(j彈ob.c1披6)[i]文)畜sex.p存rice=珍matri綢x(rep朝(0,10卻),nro穴w=2,b偵yrow=延T,dim我names獲=list握(c("男忍","女"煌),c("菊<=100煩0","1隸001-2舟000",賭"2001秧-3000運","30矮01-60癢00","洞>6000愁")))荒for(i壺in1尺:2)償for(j腸in1睬:5)介sex.p串rice[修i,j]=段sum(d乞1==i告&a03娛==j)互for(i我in1承:2)肚barpl材ot(se垃x.pri元ce[i,最],mai會n=row利names干(sex.儉price小)[i])櫻par(m缺frow=齊c(1,1宗))烘boxpl公ot(a0眠3[d1=摸=1],a昌03[d1傻==2])截job.p往rice=撈matri黎x(rep肺(0,20勵),nro養(yǎng)w=4,d胳imnam懂es=li怪st(c(后"學生",腥"企業(yè)大堂披經理",心"一般行政瓶","專業(yè)段技術"),陸c("<1三000",離"1000芝-2000姥","20住00-30賄00","烏3000-慈6000"諷,">60競00"))昏)的for(i墊in1府:4)此#職業(yè)、價鉆格列聯(lián)表圣for(j瞇in1錢:5){演job.p棕rice[肚i,j]=津sum(d沙3==i核&a03莖==j)}余par(m午frow=虛c(2,2免))梅for(i紗in1均:4)顯barpl出ot(jo似b.pri吹ce[i,如],mai叢n=row棚names翻(job.喂price柿)[i])藍boxpl迷ot(a0掏3[d3=妙=1],a士03[d3執(zhí)==2],艷a03[d呆3==3]臟,a03[輕d3==4擦])款Ridit紙檢驗部分：滲#Ridi降t檢驗函數嚴，主要是算役出W值，求君出p值，并乖且輸出置信宇區(qū)間，看重提復程度，檢覆驗函數如下甘：破ridit荒.test轎=func捷tion(截x){晚O=sum夢(x)竹帽險筐冒合酬#先求出幾很個O..,貿r和s貝r=nro恭w(x)活s=nco稼l(x)強H=0.5碰*appl鑼y(x,2及,sum)拉敞賺水因滋#求H、R棋j壘C=rep園(0,s)輝for(i泳in2剝:s){C額[i]=2絕*sum(袋H[1:i償-1])}N=H+C賓Rdot.衣j=N/O秩Oi.do宇t=app將ly(x,醋1,sum溉)#萌求行和熟O.jdo觸t=app希ly(x,蘇2,sum償)窄秋#求列和壘##計算R活i東翁R=mat局rix(r避ep(0,秋r*s),池nrow=跌r,nco逆l=s)央for(i蹲in1匪:r)商for(j厭in1珍:s){紛R[i,j曲]=x[i寺,j]/O尚.jdot企[j]*R艙dot.j纏[j]}亭Ri.do崇t=app啊ly(R,泊1,sum史)筆##計算R因idit得拋分矩陣沸Rid=m區(qū)atrix競(rep(宿0,r*s袖),nro邀w=r)戒for(i周in1繡:r){R培id[i,峰]=Rdo敵t.j*x塵[i,]}漢##計算各音處理的秩平念均鍛Ri_ba岸r=rep冰(0,s)那for(i扛in1星:r){R殼i_bar膊[i]=s屢um(Ri恢d[i,]外)/Oi.峰dot[i剩]}琴##求平均籃Ridit昨的置信區(qū)間拌conf.匯inter晴val=m茂atrix擇(rep(辱0,2*r廣),nro年w=r)鏟for(i嫁in1亞:r){c置onf.i久nterv槍al[i,評]=c(R遷i_bar洽[i]-1侮/sqrt舅(3*Oi戚.dot[蘭i]),R屠i_bar擋[i]+1課/sqrt耕(3*Oi門.dot[搭i]))}諷dimna暑mes(c導onf.i兩nterv摔al)=l累ist(N過ULL,c誠("置信下天限","置精信上限")鏈)##作圖梢plot(杏rep(1聯(lián),100)寺,seq(旬conf.炒inter齡val[1派,1],c礎onf.i反nterv黨al[1,兵2],le采ngth=攪100),君type=申"l",m刷ain="她Ridit崖valu土econ筋fiden臨cein艇etrva寨l",欲xlab=營"grou塞p",yl嫌ab="R姿scor煉e",xl蝴im=c(駝1,r),致ylim=淋c(0,1昏))檢for(i慈in2則:r){諷lines詳(rep(拴i,100催),seq守(conf得.inte殖rva