我制作了一個簡單的條形圖,顯示了 csv 兩列的平均值和標準差。標準繪圖輸出非常難看,所以我想進行一些更改,但我似乎可以讓它作業。
例如,假設 csv 看起來像這樣。
unfiltered_data,filtered_data
2,1
3,4
5,6
7,8
然后
test <- read.csv("Performance Metric Testing/test.csv")
long <- tidyr::pivot_longer(test, everything(), names_to = "data")
p1 <- ggplot(long, aes(data, value))
stat_summary(fun = "mean", geom = "col")
stat_summary(fun.data = "mean_se")
p1
在這里給出這個情節。實用,但丑陋。

所以我決定從改變顏色開始
p1 geom_bar(fill = "red")
這會引發我不理解的錯誤并破壞情節。
Error in `f()`:
! stat_count() can only have an x or y aesthetic.
Run `rlang::last_error()` to see where the error occurred.
uj5u.com熱心網友回復:
您的第一次呼叫已經繪制了這些列stat_summary,這是您需要應用填充的地方。如果要將顏色映射到 x 軸變數,可以執行以下操作:
ggplot(long, aes(data, value))
stat_summary(fun = "mean", geom = "col", aes(fill = data))
stat_summary(fun.data = "mean_se")
scale_fill_manual(values = c("red", "blue"))

或者,如果您只想要一種顏色,您可以這樣做:
ggplot(long, aes(data, value))
stat_summary(fun = "mean", geom = "col", fill = "red")
stat_summary(fun.data = "mean_se")

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