freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

r語言學(xué)習(xí)系列19-基本統(tǒng)計(jì)圖形(編輯修改稿)

2025-06-09 22:10 本頁面
 

【文章內(nèi)容簡(jiǎn)介】 值、判斷數(shù)據(jù)的偏態(tài)和尾重、可視化組間差異。用函數(shù)boxplot()繪制箱線圖,單獨(dú)的箱線圖調(diào)用格式:boxplot(x, range=, width=NULL, varwidth=FALSE,notch=FALSE, horizontal=FALSE, ...)其中,x為一系列數(shù)值向量,依次做出箱線圖;range設(shè)置延長(zhǎng)線長(zhǎng)度:幾倍盒長(zhǎng),;width設(shè)置盒長(zhǎng);varwidth設(shè)置盒寬與樣本量的平方根是否成比例,默認(rèn)FALSEnotch設(shè)置是否繪制帶刻槽的凹形盒,默認(rèn)FALSEhorizontal設(shè)置箱線圖的方向,默認(rèn)FALSE垂直作圖,TURE為水平作圖;2. 組間比較的箱線圖調(diào)用格式:boxplot(formula, data=NULL, subset, ...)其中,formula為一個(gè)公式,例如y~grp,表示y為數(shù)值向量,grp為分組變量;data為提供數(shù)據(jù)的數(shù)據(jù)框;boxplot(mpg ~ cyl, data = mtcars, main = 不同汽缸數(shù)量車型油耗的箱線圖,xlab = Number of Cylinders, ylab = Miles Per Gallon)可見,隨著汽缸數(shù)的減少,油耗明顯降低。mtcars$ factor(mtcars$cyl, levels = c(4, 6, 8), labels = c(4, 6, 8))mtcars$ factor(mtcars$am, levels = c(0, 1), labels = c(auto, standard))boxplot(mpg ~ * , data = mtcars, varwidth = TRUE, col = c(gold, darkgreen), main = 兩個(gè)交叉因子的箱線圖, xlab = Auto Type)可見,對(duì)于四缸和六缸車型,標(biāo)準(zhǔn)變速箱的油耗更高。但是對(duì)于八缸車型,油耗似乎沒有差別。注:將核密度圖以鏡像方式在箱線圖上的疊加,可得到小提琴圖。白點(diǎn)是中位數(shù),黑色盒型的范圍是下四分位點(diǎn)到上四分位點(diǎn),細(xì)黑線表示須。外部形狀即為核密度估計(jì)。library(vioplot)x1 mtcars$mpg[mtcars$cyl == 4]x2 mtcars$mpg[mtcars$cyl == 6]x3 mtcars$mpg[mtcars$cyl == 8]vioplot(x1, x2, x3, names = c(4 cyl, 6 cyl, 8 cyl), col = gold)title(Violin Plots of Miles Per Gallon)五、點(diǎn)圖點(diǎn)圖提供了一種在簡(jiǎn)單水平刻度上繪制大量有標(biāo)簽值的方法。用dotchart()函數(shù)繪制點(diǎn)圖,基本格式為:dotchart(x, labels=, groups=, cex=, =,pch=, gpch=, color=, gcolor=...)其中,x為數(shù)值向量;labels為各個(gè)點(diǎn)的標(biāo)簽組成的向量;groups指定用來對(duì)x中元素進(jìn)行分組的因子(參數(shù)gcolor可以控制不同組標(biāo)簽的顏色,cex可控制標(biāo)簽的大?。?;pch, , color指定繪圖符號(hào),及其大小、顏色;dotchart(mtcars$mpg, labels=(mtcars), cex=, main = Gas Milage for Car Models, xlab = Miles Per Gallon)展示了同一個(gè)水平軸上觀察每種車型的每加侖汽油行駛英里數(shù),通常點(diǎn)圖在經(jīng)過排序并且分組變量被不同的符號(hào)和顏色區(qū)分開的時(shí)候最有用。x mtcars[order(mtcars$mpg), ]x$cyl factor(x$cyl)x$color[x$cyl == 4] redx$color[x$cyl == 6] bluex$color[x$cyl == 8] darkgreendotchart(x$mpg, labels = (x), cex = , pch = 19, groups = x$cyl, gcolor = black, color = x$color
點(diǎn)擊復(fù)制文檔內(nèi)容
研究報(bào)告相關(guān)推薦
文庫吧 www.dybbs8.com
備案圖片鄂ICP備17016276號(hào)-1