Используя ответ @ sebastian-c и другие источники, у меня есть функция, которая, я думаю, будет работать, и я хотел бы поделиться ею. Я думаю, что я вижу решение Хенрика, но похоже, что это больше, поскольку у меня есть 4 группы, 4 'x' категории и третья категория, связанная с временем (год, четверть, месяцы).
library(ggplot2)
### sample data ###
n=25
dataTest = data.frame(
xVar=sample(1:3, n, replace=TRUE),
yVar = rnorm(n, 5, 2),
zVar=rnorm(n, 5, .5),
brand=letters[1:5])
### function
my.plot = function(x, y, data, group=NULL)
{
p=ggplot(data, aes_string(x=x, y=y, fill=group))+
geom_bar(stat="identity")
# make a facet if group is not null
if(length(group)>0) {
facets = facet_wrap(formula(paste("~", group)))
p = p + facets
}
return(p)
}
Используйте профилировщик symfony для просмотра запроса ajax.
Используйте веб-debbuger для просмотра любых ошибок javascript (F12)
Кроме того, если вы хотите загрузить поддельную базу данных для dev, вы должны использовать приборы