Я хочу рассчитать Eps для DBSCAN. Я разделил свой код следующим образом: я использовал библиотеку dbscan R. Я должен вычислить соседа как data<- kNNdist(iris, k=4, search="kd") Затем я хочу вычислить ненулевые наклоны. d<-apply(data,1, function(x) coef(lm(I(1:4)~x)) ) Затем я вычислил среднее значение и стандартное отклонение ненулевых наклонов SD <-sd(unlist(d)) и SD <-sd(unlist(d))
Сначала я хочу расположить данные в порядке возрастания по последнему столбцу, и мне нужно предложения по улучшению кода. Я новичок