R: сохранить многострочный html-текст и передать его как объект

Я пытаюсь интегрировать googleVis и KML. Мне нужно иметь возможность передавать объект, хранящий несколько строк html-кода, во всплывающее окно в моем объекте KML. Однако я не могу понять, как сохранить многострочный текстовый объект в R. Поскольку мне нужно вставить HTML, у меня не может быть разрывов строк, таких как «\ n» и т. д.

Вот нерабочий пример:

install.packages('googleVis')
library(googleVis)
chart =  gvisCandlestickChart(OpenClose, xvar="Weekday", low="Low",
                                    open="Open", close="Close",
                                    high="High",
                                    options=list(legend='none'))

Мне нужно сохранить объект, который идентичен

print(chart)
"<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
  "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>CandlestickChartID27d81b892d9b</title>
<meta http-equiv="content-type" content="text/html;charset=utf-8" />
<style type="text/css">
body {
...."

По сути, мне нужно передать объект, содержащий действительный HTML-код, который можно использовать для моего всплывающего окна KML.

Я пробовал различные методы. вставка добавляет '\n', кот не может быть сохранен как многострочный. Самое близкое, что я пришел, это сделать следующее

  description <-   capture.output(cat(unlist(chart$html)))

который дает:

 head(description)
[1] "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\""              
[2] "  \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">"                
[3] "<html xmlns=\"http://www.w3.org/1999/xhtml\">"                           
[4] "<head>"                                                                  
[5] "<title>CandlestickChartID27d81b892d9b</title>"                           
[6] "<meta http-equiv=\"content-type\" content=\"text/html;charset=utf-8\" />"

Какие-либо предложения??? Любой способ сохранить объект HTML?


r text html cat
person mmann1123    schedule 26.09.2014    source источник

Ответы (2)


arrow_upward
1
arrow_downward

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

я предлагаю попробовать добавить тег <br> внутри текста, чтобы он стал многострочным, и вы могли разбивать его там, где вам нужно.

спасибо

person Manjunath Siddappa    schedule 26.09.2014

arrow_upward
0
arrow_downward

Похоже, вы можете использовать его как html, если вы измените возврат каретки с '\n' на '\r'

  description <-  paste( capture.output(cat(unlist(chart$html))),collapse='\r')

Описание теперь можно передавать как объект, содержащий html-код! Да.

person mmann1123    schedule 26.09.2014