我有幾個我想比較的具有相同結果維度的字符變數。我能夠為這些變數中的每一個創建一個直方圖:
ggplot(MD, aes()) geom_bar(aes(x = vielfalt_alter), stat = "count")

和
ggplot(MD, aes()) geom_bar(aes(x = vielfalt_bildung), stat = "count")

如何組合這兩個直方圖,使每個值的條形圖彼此并排,并且通過不同的顏色區分變數?
dput(MD3)
structure(list(vielfalt_alter = c("Teilweise vielf?ltig", "Eher vielf?ltig",
NA, NA, "Eher vielf?ltig", "Sehr vielf?ltig", "Eher vielf?ltig",
NA, "Sehr vielf?ltig", "Sehr vielf?ltig", NA, "Eher vielf?ltig",
NA, "Sehr vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", "Teilweise vielf?ltig", "Eher vielf?ltig",
NA, NA, "Sehr vielf?ltig", "Eher vielf?ltig", "k. A.", NA, "Eher vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", NA, NA, "Eher vielf?ltig", NA, "Sehr vielf?ltig",
NA, "Eher vielf?ltig", NA, "Nicht vielf?ltig", NA, "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", "Eher nicht vielf?ltig",
NA, "Teilweise vielf?ltig", NA, NA, NA, NA, "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", NA, NA, "Eher vielf?ltig",
"Sehr vielf?ltig", NA, "Teilweise vielf?ltig", "Eher vielf?ltig",
"Teilweise vielf?ltig", NA, "Nicht vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig", NA,
NA, "Eher vielf?ltig", NA, "Sehr vielf?ltig", NA, "Sehr vielf?ltig",
"Sehr vielf?ltig", "Eher nicht vielf?ltig", "Sehr vielf?ltig",
"Teilweise vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Eher nicht vielf?ltig",
"Eher vielf?ltig", "Eher vielf?ltig", "Eher nicht vielf?ltig",
"Teilweise vielf?ltig", NA, "Eher vielf?ltig", "Sehr vielf?ltig",
NA, "Sehr vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig",
NA, "Sehr vielf?ltig", "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Eher nicht vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig",
"Sehr vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Eher vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig", "Eher vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig"), vielfalt_bildung = c("Eher vielf?ltig",
"Nicht vielf?ltig", NA, NA, "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", NA, "Sehr vielf?ltig", "Eher vielf?ltig",
NA, "Eher vielf?ltig", NA, "Sehr vielf?ltig", "Eher vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", NA, NA, "Eher vielf?ltig", "Eher nicht vielf?ltig",
"Eher vielf?ltig", NA, "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Teilweise vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig",
NA, NA, "Eher vielf?ltig", NA, "Sehr vielf?ltig", NA, "Eher vielf?ltig",
NA, "Eher vielf?ltig", NA, "Eher nicht vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", "Eher nicht vielf?ltig", NA, "Teilweise vielf?ltig",
NA, NA, NA, NA, "Sehr vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig",
NA, NA, "Teilweise vielf?ltig", "Sehr vielf?ltig", NA, "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", NA, "Eher vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", NA, NA, "Eher vielf?ltig", NA, "Teilweise vielf?ltig",
NA, "Eher nicht vielf?ltig", "Sehr vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig", "k. A.",
"Eher vielf?ltig", "Teilweise vielf?ltig", "k. A.", NA, "Teilweise vielf?ltig",
"Sehr vielf?ltig", NA, "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Teilweise vielf?ltig", NA, "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Eher vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Teilweise vielf?ltig", "Eher nicht vielf?ltig", "Eher nicht vielf?ltig",
"Teilweise vielf?ltig"), vielfalt_geschlecht = c("Eher vielf?ltig",
"Eher vielf?ltig", NA, NA, "Eher nicht vielf?ltig", "Eher nicht vielf?ltig",
"Teilweise vielf?ltig", NA, "Eher nicht vielf?ltig", "Eher vielf?ltig",
NA, "Eher vielf?ltig", NA, "Sehr vielf?ltig", "Eher vielf?ltig",
"Teilweise vielf?ltig", "Eher nicht vielf?ltig", "Teilweise vielf?ltig",
"Eher nicht vielf?ltig", NA, NA, "Eher vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", NA, "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Teilweise vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig",
NA, NA, "Teilweise vielf?ltig", NA, "Sehr vielf?ltig", NA, "Eher nicht vielf?ltig",
NA, "Eher nicht vielf?ltig", NA, "Eher nicht vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", "k. A.", NA, "Nicht vielf?ltig", NA, NA, NA,
NA, "k. A.", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
NA, NA, "Eher vielf?ltig", "Sehr vielf?ltig", NA, "Eher nicht vielf?ltig",
"Eher vielf?ltig", "Teilweise vielf?ltig", NA, "Sehr vielf?ltig",
"Nicht vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Teilweise vielf?ltig", NA, NA, "Teilweise vielf?ltig", NA, "Eher nicht vielf?ltig",
NA, "Eher nicht vielf?ltig", "Eher vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", "Eher nicht vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig", "Eher nicht vielf?ltig",
"k. A.", "Eher vielf?ltig", "Teilweise vielf?ltig", "k. A.",
NA, "Nicht vielf?ltig", "k. A.", NA, "Teilweise vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", NA, "Eher vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Eher nicht vielf?ltig",
"Teilweise vielf?ltig", "Eher nicht vielf?ltig", "Teilweise vielf?ltig",
"Eher nicht vielf?ltig", "Eher nicht vielf?ltig", "Eher vielf?ltig",
"Sehr vielf?ltig", "Eher nicht vielf?ltig", "Eher nicht vielf?ltig",
"Sehr vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", "Eher vielf?ltig"), vielfalt_kultur = c("Eher nicht vielf?ltig",
"Teilweise vielf?ltig", NA, NA, "Eher nicht vielf?ltig", "Sehr vielf?ltig",
"Eher nicht vielf?ltig", NA, "Teilweise vielf?ltig", "Eher vielf?ltig",
NA, "Eher vielf?ltig", NA, "Eher vielf?ltig", "Eher vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", NA, NA, "Teilweise vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", NA, "Eher vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Eher vielf?ltig", "Teilweise vielf?ltig",
NA, NA, "Sehr vielf?ltig", NA, "Sehr vielf?ltig", NA, "Eher vielf?ltig",
NA, "Eher vielf?ltig", NA, "Eher vielf?ltig", "Sehr vielf?ltig",
"Eher nicht vielf?ltig", "Eher nicht vielf?ltig", NA, "Eher nicht vielf?ltig",
NA, NA, NA, NA, "Sehr vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
NA, NA, "Eher nicht vielf?ltig", "Sehr vielf?ltig", NA, "Eher nicht vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", NA, "Eher vielf?ltig",
"Nicht vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", NA, NA, "Eher vielf?ltig", NA, "Eher nicht vielf?ltig",
NA, "Teilweise vielf?ltig", "Eher nicht vielf?ltig", "Eher nicht vielf?ltig",
"Eher vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Teilweise vielf?ltig", "Eher nicht vielf?ltig", "Eher vielf?ltig",
NA, "Eher nicht vielf?ltig", "Sehr vielf?ltig", NA, "Sehr vielf?ltig",
"Eher nicht vielf?ltig", "Eher vielf?ltig", NA, "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Eher nicht vielf?ltig", "Eher nicht vielf?ltig", "Eher vielf?ltig",
"Teilweise vielf?ltig", "Eher vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Eher vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig", "Eher nicht vielf?ltig",
"Eher vielf?ltig", "Eher nicht vielf?ltig"), vielfalt_k?rper = c("Eher nicht vielf?ltig",
"Teilweise vielf?ltig", NA, NA, "Teilweise vielf?ltig", "Eher vielf?ltig",
"k. A.", NA, "Sehr vielf?ltig", "Sehr vielf?ltig", NA, "Eher vielf?ltig",
NA, "Sehr vielf?ltig", "Teilweise vielf?ltig", "Eher nicht vielf?ltig",
"Eher nicht vielf?ltig", "Teilweise vielf?ltig", "Eher nicht vielf?ltig",
NA, NA, "Teilweise vielf?ltig", "Sehr vielf?ltig", "Eher vielf?ltig",
NA, "Teilweise vielf?ltig", "Teilweise vielf?ltig", "Eher nicht vielf?ltig",
"Eher vielf?ltig", "Sehr vielf?ltig", NA, NA, "Eher nicht vielf?ltig",
NA, "Sehr vielf?ltig", NA, "Eher nicht vielf?ltig", NA, "Teilweise vielf?ltig",
NA, "Eher nicht vielf?ltig", "Teilweise vielf?ltig", "Eher vielf?ltig",
"Eher nicht vielf?ltig", NA, "Teilweise vielf?ltig", NA, NA,
NA, NA, "Eher nicht vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig",
NA, NA, "Eher nicht vielf?ltig", "Sehr vielf?ltig", NA, "Eher nicht vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", NA, "Teilweise vielf?ltig",
"Eher nicht vielf?ltig", "Teilweise vielf?ltig", "Nicht vielf?ltig",
"Eher vielf?ltig", NA, NA, "Teilweise vielf?ltig", NA, "Eher vielf?ltig",
NA, "Eher vielf?ltig", "Eher vielf?ltig", "Sehr vielf?ltig",
"Eher vielf?ltig", "Eher nicht vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Eher nicht vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"k. A.", NA, "Teilweise vielf?ltig", "k. A.", NA, "Eher vielf?ltig",
"Sehr vielf?ltig", "k. A.", NA, "Eher vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Eher nicht vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", "Teilweise vielf?ltig", "k. A.", "Eher vielf?ltig",
"Teilweise vielf?ltig", "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Eher nicht vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig",
"Teilweise vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig",
"Eher nicht vielf?ltig"), vielfalt_sozial = c("Teilweise vielf?ltig",
"Teilweise vielf?ltig", NA, NA, "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Teilweise vielf?ltig", NA, "Sehr vielf?ltig", "Eher vielf?ltig",
NA, "Eher vielf?ltig", NA, "Sehr vielf?ltig", "Eher vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", NA, NA, "Teilweise vielf?ltig", "Eher nicht vielf?ltig",
"Eher vielf?ltig", NA, "Eher vielf?ltig", "Sehr vielf?ltig",
"Eher vielf?ltig", "Eher vielf?ltig", "Eher vielf?ltig", NA,
NA, "Eher vielf?ltig", NA, "Sehr vielf?ltig", NA, "Eher vielf?ltig",
NA, "Eher vielf?ltig", NA, "Eher nicht vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", "Eher nicht vielf?ltig", NA, "Eher nicht vielf?ltig",
NA, NA, NA, NA, "Sehr vielf?ltig", "Eher vielf?ltig", "k. A.",
NA, NA, "Eher nicht vielf?ltig", "Sehr vielf?ltig", NA, "Eher nicht vielf?ltig",
"Eher vielf?ltig", "Teilweise vielf?ltig", NA, "Teilweise vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", "Teilweise vielf?ltig",
"Sehr vielf?ltig", NA, NA, "Eher vielf?ltig", NA, "Teilweise vielf?ltig",
NA, "Eher vielf?ltig", "Eher vielf?ltig", "k. A.", "Eher vielf?ltig",
"Eher nicht vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Sehr vielf?ltig", "k. A.",
"Eher vielf?ltig", "Teilweise vielf?ltig", "k. A.", NA, "Eher nicht vielf?ltig",
"Sehr vielf?ltig", NA, "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", NA, "Sehr vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Eher vielf?ltig", "Teilweise vielf?ltig",
"Eher vielf?ltig", "Teilweise vielf?ltig", "Eher vielf?ltig",
"Eher vielf?ltig", "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Teilweise vielf?ltig", "Teilweise vielf?ltig", "Sehr vielf?ltig",
"Sehr vielf?ltig", "Sehr vielf?ltig", "Teilweise vielf?ltig",
"Eher nicht vielf?ltig", "Eher nicht vielf?ltig")), row.names = c(NA,
-114L), class = c("tbl_df", "tbl", "data.frame"))
uj5u.com熱心網友回復:
鑒于您的資料框名稱是“MD”,您可以試試這個。
tidy_data = gather(MD, new_col, value, factor_key=TRUE)
tidy_data %>%
ggplot(aes(value, fill=new_col))
geom_bar(stat='count', position = "dodge") theme(axis.text.x = element_text(angle = 90))
如果您只想繪制兩列的圖,您可以這樣做。
tidy_data %>%
filter(new_col %in% c('vielfalt_alter', 'vielfalt_bildung'))%>%
ggplot(aes(value, fill=new_col))
geom_bar(stat='count', position = "dodge") theme(axis.text.x = element_text(angle = 90))

uj5u.com熱心網友回復:
您需要將資料轉換為長格式:
ggplot(tidyr::pivot_longer(MD3[1:2], 1:2),
aes(x = value, fill = name))
geom_bar(position = 'dodge')
scale_fill_brewer(palette = 'Set1')
theme_light()

您甚至可以毫不費力地以這種方式繪制所有列
ggplot(tidyr::pivot_longer(MD3, tidyr::everything()),
aes(x = value, fill = name))
geom_bar(position = 'dodge')
scale_fill_brewer(palette = 'Set1')
theme_light()

如果您需要更改圖例和 x 軸中的標簽,請使用labs
ggplot(tidyr::pivot_longer(MD3[1:2], 1:2),
aes(x = value, fill = name))
geom_bar(position = 'dodge')
scale_fill_brewer(palette = 'Set1')
theme_light()
labs(x = 'My x variables', fill = 'My categories')

要洗掉 NA 值,請將它們從資料框中過濾出來以開始:
ggplot(subset(tidyr::pivot_longer(MD3[1:2], 1:2), !is.na(value)),
aes(x = value, fill = name))
geom_bar(position = 'dodge')
scale_fill_brewer(palette = 'Set1')
theme_light()
labs(x = 'My x variables', fill = 'My categories')

轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/462723.html
