d3 облака слов в R: проблема с очисткой предыдущего представления

Question

Я создал приложение-облако слов d3 в R (блестящий пакет) и поместил ползунок, чтобы выбрать количество слов, которые будут отображаться следующим образом:

Когда я запускаю ползунок вправо, происходит именно то, что я ожидал: увеличение количества слов справа: [

Несмотря на это, когда я запускаю ползунок в слева, на 6 слов, например, 6 основных слов меняют свое положение, но другие слова остаются на экране (всего 10, а не 6):

Я бы хотел, чтобы на экране отображалось правильное количество слов, даже когда я запускаю ползунок влево.

Это мой код:

ui <- fluidPage(
  titlePanel("Palavras"),
  theme = shinythemes::shinytheme('yeti'),
    sidebarLayout(
    sidebarPanel(sliderInput('nb_words', 'Selecione o número de palavras', 5, 100, 5)
                 ),

      mainPanel(
        tabsetPanel(
          tabPanel('Word Cloud', d3wordcloud::d3wordcloudOutput('wc_roi', height = '400'))

        ))
  )
)

server <- function(input, output, session){
output$wc_roi <- d3wordcloud::renderD3wordcloud({
    iwc_roi <- word_counts_relatorios %>%
      arrange(desc(n)) %>%
      head(input$nb_words) %>%
      mutate(word2 = forcats::fct_reorder(word2, n))
    d3wordcloud(iwc_roi$word2, iwc_roi$n, tooltip = TRUE)
  })

  }
shinyApp(ui = ui, server = server)