Как добавить элемент стиля CSS в Rmd ShIndInd Render? - PullRequest
Новая
       19

Как добавить элемент стиля CSS в Rmd ShIndInd Render?

0 голосов
/ 24 октября 2019

Я изо всех сил пытаюсь добавить элемент стиля CSS в мой блестящий код renderImage. Я пробовал различные варианты с исходным файлом css через тэг $ link, а также с прямым кодом css через тэг $ style.

Я пробовал как тэг $ link, так и тэг $ style (в моемпример кода) (1) вне кода renderImage (2) внутри кода renderImage, вне оболочки списка (3) внутри кода renderImage внутри оболочки списка

Я получаю одну из двух ошибок:Ошибка 1: объект типа «замыкание» не может быть изменен. Ошибка 2: объект «centerImage» не найден

С моим изображением logo5.png на моем локальном компьютере, без дополнительных css - это работает. С моим изображением logo5.png на моем локальном компьютере, с дополнительным css - он НЕ РАБОТАЕТ.

Обратите внимание, что я оставил «1», dir () и «2» в моем коде до renderImage для отслеживаниявыполнение.

Может кто-нибудь помочь?

(Чтобы запустить в Rstudio, измените rrr`` на 3 обратных кавычки в 4 местах)

(URL моего изображения в Интернетеhttp://www.richpat.com/wp-content/uploads/2019/04/logov5.png)

---
title: 'Shiny Dev with Logo'
output: 
  flexdashboard::flex_dashboard:
    theme: united
  orientation: columns
source_code: embed
runtime: shiny
---

rrr``{r setup, include=FALSE}        #CORRECT THIS WHEN RUNNING
knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE)
library(flexdashboard,quietly=TRUE, verbose=FALSE)
library(shiny,quietly=TRUE, verbose=FALSE)
library(plotly,quietly=TRUE, verbose=FALSE)
rrr``                                #CORRECT THIS WHEN RUNNING

Corporate
=======================================================================

Column
-----------------------------------------------------------------------

### Logo

rrr``{r}                              #CORRECT THIS WHEN RUNNING
(1)
dir()
#tag$head(tags$link(rel = "stylesheet", type = "text/css", href = "BRstyle.css"))
#tag$head(tag$style("centerImage {text-align:center;}"))

(2)
renderImage({
      rfilename=normalizePath("logov5.png")
      list(src=rfilename, contentType = "image/png", alt = "logo5", class=centerImage)
      }, deleteFile = FALSE)
rrr``                                 #CORRECT THIS WHEN RUNNING

Background
=======================================================================

Column
-----------------------------------------------------------------------

### Purpose

ad valorem libram

1 Ответ

0 голосов
/ 25 октября 2019

ОК - так что я нашел ответ. И простота - это путь ...

Вместо того, чтобы делать это в блестящем renderImage, я многое узнал о том, как блестяще работают и flexdashboard, и markdown работают вместе !!!

Я использовал тег img html какчасть раздела уценки с прямыми тегами отображения 

<img src="http://www.richpat.com/wp-content/uploads/2019/04/logov5.png"
 alt="Markdown Monster icon"
 style="ftext-align:center; display: center;" />

И я удалил полный блестящий раздел р-кода renderImage

В качестве бонуса - и просто чтобы показать немного больше из того, что я узналвот мой пересмотренный ямл 

title: 'Br F A'
output: 
  flexdashboard::flex_dashboard:
    logo: logov5s.png
    theme: readable
    css: BRstyle.css
    navbar: 
    - { title: "About", href: "http://www.richpat.com", align: left }
    source_code: embed
    orientation: columns
runtime: shiny
...