我是r的新手,正在尝试创建一个函数来为多个因素创建条形图。使用ggplot,我为绘图的样式创建了代码,我想针对数据帧(long_femnat)中的不同因素重现该样式。该图的代码可以在函数外部正常运行,但是当我将因子作为函数的输入参数添加时,它将不起作用。尽管我也收到了以下错误,但没有返回错误,但没有生成图:FUN(X [[i]],...)中的错误:尝试修复问题时找不到对象'Group'。
我尝试将输入参数包括在dataframe $ variable和函数本身的代码中指定的dataframe中。
我也尝试过将输入参数放在“”和“”中。
Failed_function <- function (i){
Group_bar <-ggplot(long_femnat, aes(Emotion, Accuracy, fill = i)) +
scale_y_continuous(expand = c(0, 0), limits = c(0, 100))
Group_bar + stat_summary(fun.y = mean, geom = "bar", position = "dodge",
colour="black") +
stat_summary(fun.data = mean_cl_boot, geom="errorbar", position =
position_dodge(width=0.90), width=0.2) +
labs(y= "Mean Accuracy (%)") + theme_classic() +
scale_fill_manual(values=c("grey80", "white")) +
theme(plot.title = element_text(hjust = 0.5, size = 12, face = "bold"),
axis.title.x = element_text(size = 12, face = "bold"),
axis.title.y = element_text(size = 12, face = "bold"),
axis.text = element_text(color = "black"),
legend.title = element_text(size = 12, face = "bold"))
bar
}
我要实现的目标是针对以上代码中数据框“ long_femnat”中不同因素(i)的绘图功能。