Можно ли извлечь параметры подгонки модели после вызова ggplot stat_smooth?

Question

Используя stat_smooth, я могу подгонять модели к данным. Э.Г.

g=ggplot(tips,aes(x=tip,y=as.numeric(unclass(factor(tips$sex))-1))) +facet_grid(time~.) 
g=g+ stat_summary(fun.y=mean,geom="point") 
g=g+ stat_smooth(method="glm", family="binomial")

Я хотел бы знать коэффициенты совпадений с биномом glm. Я мог бы повторно выполнить подгонку с помощью dlply и получить коэффициенты с помощью ldply, но я бы хотел избежать такого дублирования.

Вызов str (g) раскрывает иерархию объектов, которые создает ggplot, возможно, есть какой-то способ добраться до коэффициентов через это?

Answer 1

Нет, потому что модели создаются только при визуализации графика. Однако, обычно довольно легко сделать это самостоятельно с помощью plyr.

Почему вы хотите преобразовать секс в число? Числа as.numeric должно быть достаточно само по себе, но если вы собираетесь выполнять вычитание в модели, вам нужно заключить его в I ().