Отображение графика ggvis в блестящем документе

Работает ли ggvis с Shiny Documents?

В этом примере ggplot виден, а ggvis нет.

---
title: "testShiny"
runtime: shiny
output: html_document
---

ggplot2

```{r, echo=FALSE}

require(ggplot2)

renderPlot({
  ggplot(women, aes(height, weight))+
    geom_point()+
    theme_bw()

  })

```

ggvis

```{r, echo=FALSE}

require(ggvis)

renderPlot({
  women %>%
    ggvis(x= ~height, y = ~weight) %>%
    layer_points()

  })

```

При поиске наткнулся на bind_shiny, но проблему это не решило


person Ed G    schedule 05.07.2014    source источник


Ответы (1)


Вам нужно использовать bind_shiny, чтобы присвоить идентификатор визуализации. Затем вам нужно использовать ggvisOutput для создания элемента в DOM для отображения визуализации:

---
title: "testShiny"
runtime: shiny
output: html_document
---

```{r, echo=FALSE}

require(ggvis)
require(knitr)
require(shiny)

ggvisOutput("p")

women %>%
  ggvis(x= ~height, y = ~weight) %>%
  layer_points()%>%
  bind_shiny("p")

```

введите здесь описание изображения

person jdharrison    schedule 05.07.2014
comment
Работает отлично, спасибо. Вы знаете, почему ggvisOutput("p") должно произойти до того, как заговор будет вызван? - person Ed G; 05.07.2014
comment
Порядок не должен иметь значения, я думаю. Я просто склонен ставить ui.R объекты перед server.R. - person jdharrison; 05.07.2014