我使用rmarkdown创建了一个闪亮的演示文稿,其中一个幻灯片包含一个shinyAce编辑器(下面的代码)。整个应用程序似乎都在一个白色背景的容器内。我想使用css使这个容器的背景透明,但到目前为止我还没有找到正确的对象名来应用更改。
我已经在shinyAce
,mainPanel
和body {background-color: transparent
软件包中的默认css文件中尝试了一个简单的---
title : "White Backgrounds are Ugly"
subtitle : "Help me make it go away"
author : "Me"
date : "Now"
output:
ioslides_presentation:
widescreen : true
runtime: shiny
---
## Basic R Plot with shinyAce
```{r, echo=FALSE}
library(shinyAce)
shinyApp(
shinyUI(
fluidPage(
sidebarLayout(
sidebarPanel(
aceEditor("code", mode="r",
value="plot(1:5, 1:5,\nxlab = 'This is side 1',\nylab = 'This is side 2',\nmain = 'This is side 3',\nsub = 'Subtitle or Caption',\naxes = TRUE,\ntype = 'p',\nlas = 0)"),
actionButton("eval", "Evaluate")),
mainPanel(list(tags$head(tags$style("body {background-color: rgba(255,130,255,1); }"))), plotOutput("output"))))),
shinyServer(function(input, output, session) {
output$output <- renderPlot({
par(bg = NA)
input$eval
return(isolate(eval(parse(text=input$code))))
})
})
)
```
并进行了加密...但是不能找到合适的地方进行改变。
最后,我在virtual
中添加了代码以更改背景的颜色。但是,这似乎是白色容器上的叠加层,因为当我设置dynamic
}时,背景仍为白色。
与往常一样,任何帮助都表示赞赏
{{1}}