R软件包中的嵌入式闪亮应用小插曲？

我想嵌入一个闪亮的应用程序到一个R包的小插曲。我做了一个小测试包，源代码在

vignette

testshinny

具有以下yaml标题：

---
title: "test embedded Shiny app"
output: rmarkdown::html_vignette
runtime: shiny
vignette: >
  %\VignetteIndexEntry{test embedded Shiny app}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

并包含以下代码块：

shiny::shinyAppDir(
  system.file("examples/example-app", package="testShinyVignette")
)

在

示例应用程序

目录中有一个名为

app.R

的应用程序

我的期望是，如果您在RStudio中运行以下代码

devtools::install_github("qdread/testShinyVignette", build_vignettes = TRUE)
vignette("testshiny", package = "testShinyVignette")

该应用程序应在渐晕图出现在RStudio查看器窗格中时运行，因为它是在本地R安装上运行的。相反，我看到一个空白的窗口。我做错什么了吗