您好,登錄后才能下訂單哦!
本篇內(nèi)容介紹了“R語言繪制分布曲線的方法是什么”的有關(guān)知識,在實(shí)際案例的操作過程中,不少人都會遇到這樣的困境,接下來就讓小編帶領(lǐng)大家學(xué)習(xí)一下如何處理這些情況吧!希望大家仔細(xì)閱讀,能夠?qū)W有所成!
library(readr)
df<-read_tsv("author_number.tsv")
head(df)
table(df$journal)
我們先來看一下幫助文檔中的例子
df_1 <- data.frame(
x = c(rnorm(100, 0, 3), rnorm(100, 0, 10)),
g = gl(2, 100)
)
p1<-ggplot(df_1, aes(x)) + stat_ecdf(geom = "step")
# Don't go to positive/negative infinity
p2<-ggplot(df_1, aes(x)) + stat_ecdf(geom = "step", pad = FALSE)
# Multiple ECDFs
p3<-ggplot(df_1, aes(x, colour = g)) + stat_ecdf()
library(patchwork)
p1+p2+p3
這里新學(xué)到一個(gè)函數(shù)gl()
,生成因子數(shù)據(jù),比如
gl(2, 8, labels = c("Control", "Treat"))
參數(shù)的意思是
之前我實(shí)現(xiàn)這個(gè)都是用rep()函數(shù)
再來一個(gè)例子
gl(2, 1, 20)
兩個(gè)因子,每種一個(gè),重復(fù)20次
ggplot(df, aes(x=auth_num, col=journal)) +
stat_ecdf(geom="smooth", se=F, size=1.2) +
theme_bw() +
scale_x_log10(breaks=c(1:5, seq(10, 50, by=10),
100, 200, 300,400,500)) +
theme(legend.position=c(.75,.33),
panel.grid = element_blank()) +
labs(x="Number of authors per paper",
y="ECDF",
col="") +
coord_cartesian(xlim=c(1,500)) +
scale_color_brewer(type="qual", palette=6)
“R語言繪制分布曲線的方法是什么”的內(nèi)容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識可以關(guān)注億速云網(wǎng)站,小編將為大家輸出更多高質(zhì)量的實(shí)用文章!
免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場,如果涉及侵權(quán)請聯(lián)系站長郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。