我已經使用下面的代碼成功地繪制了一個類似的向量（“todmc_v1”），但不適用于我遇到問題的特定向量，我將提供該向量dput()。
ggplot(todmc_v1, aes(x=factor(tod, level = c('Morning', 'Afternoon', 'Evening', 'Late')), y=value, fill=variable))
geom_bar(stat='identity', position='dodge')
這是dput()我無法繪制的向量“rldow”：
structure(list(`data_2021_v2$member_casual` = c("casual", "member",
"casual", "member", "casual", "member", "casual", "member", "casual",
"member", "casual", "member", "casual", "member"), `data_2021_v2$day_of_week` = c("Friday",
"Friday", "Monday", "Monday", "Saturday", "Saturday", "Sunday",
"Sunday", "Thursday", "Thursday", "Tuesday", "Tuesday", "Wednesday",
"Wednesday"), `data_2021_v2$ride_length` = c(1760.09364802057,
799.435593679782, 1891.04649254227, 794.827114155888, 2042.12860343406,
915.879808325155, 2203.20327031892, 939.474596054804, 1623.62034644899,
766.524376333107, 1665.79837660326, 767.099664854878, 1613.5331421196,
768.874141204975)), row.names = c(NA, -14L), class = "data.frame")
不確定是否相關，但這個向量是從一個aggregate函式創建的，如下所示：
rldow <- aggregate(data_2021_v2$ride_length ~ data_2021_v2$member_casual data_2021_v2$day_of_week, FUN = mean)
我嘗試melt()了向量，因此它按列“member_casual”排序，但我嘗試的變體最終以行中的列名作為值 - 這很奇怪。這也可能與為什么dput()在我的列名周圍包含反引號有關。我知道我可以手動創建矢量，但這需要時間，我希望aggregate將來我可以使用該函式創建可繪制的矢量。
因此，您對我正在尋找的輸出有所了解，請參見下面的螢屏截圖 - 在我將資料匯出到 EXCEL 后生成。我很感激這方面的幫助。
uj5u.com熱心網友回復：
在這里，我試圖重現您的圖表。我的ggplot圖表和您的 Excel 圖表的模式非常相似，但我不確定您使用的是什么 y 軸值，從 0 到 40 的值不存在于您的dput().
library(ggplot2)
ggplot(df, aes(factor(`data_2021_v2$day_of_week`,
levels = c("Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday",
"Sunday")),
`data_2021_v2$ride_length`,
fill = fct_rev(`data_2021_v2$member_casual`)))
geom_col(position = position_dodge(width = 1))
scale_fill_manual(values = c("dodgerblue4", "darkorange2"),
labels = c("Member Avg Ride Length", "Casual Avg Ride Length"))
theme_minimal()
theme(legend.position = "bottom",
legend.title = element_blank(),
axis.title = element_blank())
轉載請註明出處，本文鏈接：https://www.uj5u.com/qianduan/427680.html