Отображение valueBox с перекрестными помехами select_filter - PullRequest
Новая
       23

Отображение valueBox с перекрестными помехами select_filter

1 голос
/ 30 января 2020

В моей Flexdashboard я хочу сгенерировать valueBox, отображающий суммы продаж, основанные на фильтре. Я сконструировал фильтр с помощью перекрестных помех. Блестящий вариант не подходит из-за отсутствия блестящего сервера и конфиденциальных данных компании. Тем не менее, я пытался это сделать, но создание номера результата не производится, только ошибка «невозможно привести тип символа». 

---
title: "testsales"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
---
Column {data-width=150}
---------

```{r}
library(crosstalk)
library(flexdashboard)
library(dplyr)
library(plotly)

testcase_df <- data.frame(c("A", "B", "A", "B", "A", "B"), c(1,5,3,2,4,1))
colnames(testcase_df) <- c("company", "sales")
shared_data <- SharedData$new(testcase_df)

filter_select("showcase_filter", "A or B?", shared_data, testcase_df$company)

valueBox(sum(testcase_df$costs))

Чтобы подвести итог, я хотел бы создать valueBox на основе моего фильтра. Есть ли возможность сделать это в сочетании с пакетом перекрестных помех?

...