ggplot字体系列版本之间的变化

时间:2013-01-03 09:56:32

标签: windows r fonts ggplot2

在下图中,您可以看到在两台不同(窗口)机器中创建的ggplot图形的相同部分。在每个图表上方,我已经编写了相关软件包的版本。我没有在ggplot调用中使用任何font family设置。为什么我使用最新版本获得不同的字体? (这一变化让我想起了Cleartype设置对平滑字体边缘的影响)

picture

1 个答案:

答案 0 :(得分:10)

您可能需要查看此页面http://wiki.stdout.org/rcookbook/Graphs/Fonts/,了解有关使用ggplot / ggplot2处理字体问题的一些提示。还有一个示例R脚本,它将生成一个包含所有渲染字体的表,以便您可以在两个系统之间更轻松地比较它们。

make_font_table.R

fonttable <- read.table(header=TRUE, sep=",", stringsAsFactors=FALSE,
                        text='
Short,Canonical,
mono,Courier,
sans,Helvetica,
serif,Times
,AvantGarde
,Bookman
,Helvetica-Narrow
,NewCenturySchoolbook
,Palatino
,URWGothic
,URWBookman
,NimbusMon
URWHelvetica,NimbusSan
,NimbusSanCond
,CenturySch
,URWPalladio
URWTimes,NimbusRom
')

fonttable$pos <- 1:nrow(fonttable)

library(reshape2)
fonttable <- melt(fonttable, id.vars="pos", measure.vars=c("Short","Canonical"),
                  variable.name="NameType", value.name="Font")

# Make a table of faces. Make sure factors are ordered correctly
facetable <- data.frame(Face = factor(c("plain","bold","italic","bold.italic"),
                                      levels = c("plain","bold","italic","bold.italic")))

fullfonts <- merge(fonttable, facetable)

library(ggplot2)
pf <- ggplot(fullfonts, aes(x=NameType, y=pos)) + 
             geom_text(aes(label=Font, family=Font, fontface=Face)) +
             facet_wrap(~ Face, ncol=2)

pf

你可以像这样运行它:

% R
> source ("make_font_table.R")
> pf

ss of font table

注意:实际上只有一些字体(Timea,Helvetica,Courier)被渲染。

您也可以查看extrafont-package。最后,这个post展示了如何使用extrafont-package,以便在输出中呈现更好看的字体。