#r
#r
Вопрос:
Мой код выглядит следующим образом
Fun2<-function(x){
x$dportfolio<-with(x, cut(x$coef,
breaks=quantile(x$coef, probs=seq(0,1, by=0.1), na.rm=FALSE),
include.lowest=TRUE,
labels=c("0","1","2","3","4","5","6","7","8","9")))
}
Data.1936.dsort.1<-aggregate(Data.1936.dsort,Data.1936.dsort$portfolio,FUN = Fun2)
Я продолжал получать сообщение об ошибке Ошибка
in eval(substitute(expr), data, enclos = parent.frame()) :
invalid 'envir' argument of type 'character'
Что я хочу сделать, так это применить эту функцию к каждой группе, для каждой группы я создаю подгруппы
Комментарии:
1. Предполагается, что аргумент by для
aggregate
должен быть списком. Вы даете ему атомарный вектор. Я должен признать, что я не помню, чтобы получал эту ошибку, когда я допустил эту ошибку в прошлом, поэтому вам рекомендуется опубликовать небольшое подмножество данных.1936.dsort с использованиемdput
.2. Я изменил его на список, но все равно получил сообщение об ошибке, подобное этому.