2013-12-10 52 views
0

我想生成一个文本文件,所以工程师可以运行java脚本。它有一个头部(顶部),永远不会像下面(片段)那样改变。使用R打印JavaScript?

<!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> 
    <meta http-equiv="Content-type" content="text/html; charset=utf-8"/> 

     var myChart = new Chart.Bubble('myChartContainer', { 
    width: 500, 
    height: 500, 

此块后将是我的R分析输出。到目前为止,这是我试过的(非常手动,但不管用,不管)。我也尝试了paste(),cat(),但它也不起作用。

print("<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"") 

有没有什么办法可以很好地在这个使用R的文本文件中植入这段代码?

+1

的java!= JavaScript的 – Thomas

+0

你可以从字面上只是复制和粘贴“头”行成'R'一个字符串变量。只要确保使用'\\'转义任何引号和特殊字符。 –

+3

有一个伟大的报价浮动:Java到Javascript是因为汽车是地毯 –

回答

1

您可以复制并粘贴信息。唯一的问题是逃避特殊字符。所以使用readLines这将为你逃脱它们。

headerInfo <- paste(readLines(file("clipboard")), collapse="\n") 

cat(headerInfo) 


<!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> 
    <meta http-equiv="Content-type" content="text/html; charset=utf-8"/> 
+0

谢谢!它就像一个魅力! – user1486507

1

您需要转义引号以便R不认为字符串在PUBLIC之后结束。

反斜杠\用于转义字符,E.g:

print("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"") 

如果你的字符串有一个反斜杠,你需要把两个反斜杠的打印功能。

+0

谢谢。我学到了新东西! – user1486507