你們中的有些人可能已經(jīng)看過我關于這個主題的博客文章，在這里我希望幫助朋友產(chǎn)生半填充圓作為圖形上的點，從而編寫了以下代碼：TestUnicode <- function(start="25a0", end="25ff", ...)  {    nstart <- as.hexmode(start)    nend <- as.hexmode(end)    r <- nstart:nend    s <- ceiling(sqrt(length(r)))    par(pty="s")    plot(c(-1,(s)), c(-1,(s)), type="n", xlab="", ylab="",         xaxs="i", yaxs="i")    grid(s+1, s+1, lty=1)    for(i in seq(r)) {      try(points(i%%s, i%/%s, pch=-1*r[i],...))    }  }TestUnicode(9500,9900) 這是可行的（即產(chǎn)生一個幾乎完整的涼爽的符號符號網(wǎng)格）：在X11或PNG設備上的Ubuntu 10.04上在安裝了pango-devel的Mandriva Linux發(fā)行版上，具有本地R的相同設備它在不同程度上（無聲地或警告中）無法不同程度地生成（即生成部分或全部填充有點或空矩形的網(wǎng)格）：使用PDF或PostScript在同一臺Ubuntu 10.04計算機上運行（嘗試將font =“ NimbusSan”設置為使用URW字體無濟于事）在MacOS X.6上（石英，X11，開羅，PDF）例如，嘗試所有可用的PDF字體系列：flist <- c("AvantGarde", "Bookman","Courier", "Helvetica", "Helvetica-Narrow",        "NewCenturySchoolbook", "Palatino", "Times","URWGothic",        "URWBookman", "NimbusMon", "NimbusSan", "NimbusSanCond",        "CenturySch", "URWPalladio","NimbusRom")for (f in flist) {  fn <- paste("utest_",f,".pdf",sep="")  pdf(fn,family=f)  TestUnicode()  title(main=f)  dev.off()  embedFonts(fn)}在Ubuntu上，這些文件都不包含符號。使它能夠處理盡可能多的組合會很好，但是尤其是在某些矢量格式中，尤其是在PDF中更是如此。任何有關字體/圖形設備配置的建議都將受到歡迎。