У меня блестящее приложение, в котором я просто пытаюсь использовать group by и суммировать в renderTable.Приведенный ниже код прекрасно работает в обычном скрипте, но когда я пытаюсь запустить его в «блестящем» режиме, я получаю ошибку ниже.Любые мысли будут с благодарностью!спасибо.
Error in summarise_impl: Columns
4 ,
5 ,
6 ,
7 ,
8 , ... cannot have NA as
output$Risk <- renderTable({
dailyvols <- data.frame(cbind(FrontSwapLegPerf2$`Total Return`-(BackSwapLegPerf2$`Total Return`*HedgeRatios1),
FrontSwapLegPerf2$Residual))
colnames(dailyvols) <- c("Total_Return","Residual")
dailyvols$bin <- round(dailyvols$Residual)
Bins <- group_by(dailyvols, bin ) %>%
summarise(SD = sd(Total_Return))
})