Как я могу приспособить сплайн к группам и затем найти AUC в R - PullRequest
Новая
       62

Как я могу приспособить сплайн к группам и затем найти AUC в R

0 голосов
/ 31 октября 2019

У меня большой набор данных, и я хотел бы разместить сглаживающий сплайн для каждой группы (дата), а затем рассчитать площадь под кривой для каждой группы.

Я пытался использовать функцию метлы 

data1 <- read.table(file="https://pastebin.com/raw/agyvWGmS", header= TRUE,dec=",", na.strings=c("",".","NA")) 

head(data1)
data1$date <- as.factor(as.character(data1$date))
data1$date.time <- as.numeric(as.character(data1$date.time))
data1$tot.par <- as.numeric(as.character(data1$tot.par))
library(stats)
slope2 = data1 %>%
group_by(date) %>%
do(broom::tidy(with(data=., auc(date.time, tot.par, type = 'spline', subdivisions =500)))) # but can't seem to get AUC.
...