У меня есть некоторые данные, которые я пытаюсь построить гранями по его типу с наложением сглаживания (Loess, LM, что угодно). Поколение код ниже:
testFrame <- data.frame(Time=sample(20:60,50,replace=T),Dollars=round(runif(50,0,6)),Type=sample(c("First","Second","Third","Fourth"),50,replace=T,prob=c(.33,.01,.33,.33)))
У меня нет проблем ни с гранью, ни сглаживанием, но я не могу сделать и то, и другое. Первые три строки кода ниже работают нормально. Четвертая строка, где у меня проблемы:
qplot(Time,Dollars,data=testFrame,colour=Type)
qplot(Time,Dollars,data=testFrame,colour=Type) + geom_smooth()
qplot(Time,Dollars,data=testFrame) + facet_wrap(~Type)
qplot(Time,Dollars,data=testFrame) + facet_wrap(~Type) + geom_smooth()
выдает следующую ошибку:
Ошибка в [<-.data.frame (*tmp*, var, value = list (NA = NULL)):
пропущенные значения не допускаются в подписанных назначениях фреймов данных
Чего мне не хватает, чтобы наложить сглаживание на граненый график? Я мог бы поклясться, что делал это раньше, возможно, даже с теми же данными.