小编Phi*_*ipp的帖子

R中将包含非ASCII字符的字符(向量)转换为html的首选方法是什么？我想比如转换

  "ü"

至

  "ü"

我知道这可以通过聪明地使用gsub(但是有人一劳永逸地做过吗？)而且我认为R2HTML包可以做到这一点,但事实并非如此.

编辑:这是我最终使用的; 通过修改字典显然可以扩展它:

char2html <- function(x){
  dictionary <- data.frame(
    symbol = c("ä","ö","ü","Ä", "Ö", "Ü", "ß"),
    html = c("&auml;","&ouml;", "&uuml;","&Auml;",
             "&Ouml;", "&Uuml;","&szlig;"))
  for(i in 1:dim(dictionary)[1]){
    x <- gsub(dictionary$symbol[i],dictionary$html[i],x)
  }
  x
}

x <- c("Buschwindröschen", "Weißdorn")
char2html(x)

在C++中,我想对reals的long(2^20)向量进行排序,显然sort()可以解决这个问题.在我习惯了很好的order()函数之前使用了R,它产生了导致排序向量的排列.

例:

x = {24, 55, 22, 1}

然后是排列

perm = {3, 2, 0, 1}

将原始图像x按x升序排列.

我可以实现一些冒泡排序,它不仅可以排序x,而且可以在向量上执行相同的转置{0,1,2,...}并输出两者,但我相信有人必须考虑它,特别是有效地完成它.

我正在使用 RMySQL 将一些 html 代码写入 SQL 数据库（但我想我的问题是一个通用的 R 问题，而不是真正与 SQL 或 RMySQL 相关的问题）。所以我正在尝试这样的事情：

con <- RMySQL(...) # some connection    
html <- "<div style='text-align: center; font-family: Arial;'><span style='font-size: 14pt;'>Some text without any tricky symbols.</span></div>"    
    query <- c('INSERT INTO table (htmlfield) VALUES (\"', html, '"') 
    dbSendQuery(con,paste(query, collapse = ""))

麻烦的是，R 的粘贴会将单引号中的双引号（即 '"'）替换为转义序列 \"，即：

> paste(query, collapse = "")
[1] "INSERT INTO table (htmlfield) VALUES (\"<div style='text-align: center; font-family: Arial;'><span style='font-size: 14pt;'>Some text without any tricky symbols.</span></div>\""

如果我将向量查询中的单引号更改为双引号，将 html 中的单引号更改为双引号，那么问题就出在字符串 html 的一侧，此后 html …

现在我正在学习sweave写一个包装小插图.我正在使用传统的R图形.奇怪的是,我添加到高级绘图中的一个传奇工作正常,否则在我扫描文件时不起作用.这是一个最小的例子:

 \documentclass{article}
 \begin{document}
 <<fig=TRUE>>=
 plot(0.5, 0.5, xlim = c(0,1), ylim = c(0,1))
 legend("bottomright", c("data", "summary", "curve", "conf. region"), 
      pch = c(2,1,NA,NA), lwd = c(NA,NA, 2,1))
 @
 \end{document}

R代码生成(当运行R版本2.15时)单点和由两个点组成的图例,以及两种不同类型的线:

在sweave中,传说无法生成,我只看到一个空盒子:

这是一个sweave bug,还是我忽略了什么？