专栏首页优雅RR 语言画图中英文字体解决方案

R 语言画图中英文字体解决方案

在某些时候,需要在 R 画图中添加中文,但是默认情况下,R 对中文的支持不好。这里推荐一个showtext的 R 包。如果需要将含有中文字体的图形保存为 pdf 文件,可以使用下面讲到的方案,最新版的showtext已经支持了ggplot2,推荐使用此种方案。

这样,在你写的 R 代码中,开头添加:

library(showtext)
showtext_auto(enable=True)    # 表示之后用上同样的字体
font_add("kaishu", "simkai.ttf") # 如果系统已经安装了该字体,可以通过这种方式调用
font_add('SimSun', regular = '/Library/Fonts/Microsoft/SimSun.ttf') # 添加字体, 必须给定指定的字体的位置
  • 如果你使用的是 Mac,可以打开 font book,查找你想要字体的位置。如 SimSun 字对应于 /Library/Fonts/Microsoft/SimSun.ttf 文件。
  • 如果你使用的是 Linux,字体应该位于 /usr/share/fonts 目录下。

示例

来一个示例,示例后面有各个函数的解释。

  • 检查系统是否已经安装目标字体
shenweiyan@ecs-steven 22:23:35 /home/shenweiyan
$ fc-list |grep SimSun
/usr/share/fonts/chinese/simsun.ttc: NSimSun,新宋体:style=Regular
/usr/share/fonts/chinese/simsun.ttc: SimSun,宋体:style=Regular
  • 使用 showtext 包在绘图钟显示中英文
library(showtext)
showtext_auto(enable=True)
font_add('SimSun', "simsun.ttc")

set.seed(123)

## For now we are using a device functions to draw axis labels
plot(1, xlim = c(-3, 3), ylim = c(-3, 3), type = "n")

## Then turn showtext on and draw some characters
showtext_begin()

text(runif(100, -3, 3), runif(100, -3, 3), 
     intToUtf8(round(runif(100, 20200, 30000)), multiple=TRUE), 
     col=rgb(runif(100), runif(100), runif(100), 0.5 + runif(100)/2), 
     cex=2, family="SimSun")

title("随机汉字", family="SimSun")

showtext_end()
  • 查看当前 R 的会话信息
> sessionInfo()
R version 3.6.2 (2019-12-12)
Platform: x86_64-conda_cos6-linux-gnu (64-bit)
Running under: CentOS Linux 7 (Core)

Matrix products: default
BLAS/LAPACK: /usr/local/software/miniconda3/lib/libopenblasp-r0.3.7.so

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C
 [9] LC_ADDRESS=C               LC_TELEPHONE=C
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

other attached packages:
[1] showtext_0.7   showtextdb_2.0 sysfonts_0.8

loaded via a namespace (and not attached):
[1] compiler_3.6.2

学习几个 R 函数

runif()是 R 语言生成均匀分布随机数的函数,句法是:runif(n, min=0, max=1),其中 n 表示生成的随机数数量,min 表示均匀分布的下限,max 表示均匀分布的上限;若省略参数 min、max,则默认生成 [0,1] 上的均匀分布随机数。例子如下:

> runif(5, 0, 1)     # 生成5个[0,1]的均匀分布的随机数
[1] 0.5993 0.7391 0.2617 0.5077 0.7199 

> runif(5)           # 默认生成5个[0,1]上的均匀分布随机数
[1] 0.2784 0.7755 0.4107 0.8392 0.7455

round是 R 语言里的 “四舍五入” 的函数,具体的规则采用 banker's rounding,即四舍六入五留双规则(wiki)。round的原型是round(x, digits = 0),digits 用于设定小数点位置,默认为零即小数点后零位(取整)。例子如下:

> c <- c(1.4, 1.6, 1.5, 2.5, 2.51)
> round(c)
[1] 1 2 2 2 3

intToUtf8是一个将整数向量转换为或转换为 Utf-8 编码字符向量的函数,与之对应的函数是utf8ToInt—— 一个能把 Utf-8 编码字符转换为整数向量的函数。示例如下:

> utf8ToInt("沈维燕")
[1] 27784 32500 29141
> intToUtf8(c(27784, 32500,29141))
[1] "沈维燕"
> intToUtf8(c(27784, 32500,29141), multiple=TRUE)    # multiple: 转换为单个字符串还是多个单独的字符
[1] "沈" "维" "燕"

本文分享自微信公众号 - 优雅R(elegant-r)

原文出处及转载信息见文内详细说明,如有侵权,请联系 yunjia_community@tencent.com 删除。

原始发表时间:2020-03-01

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

相关文章

  • 「R」变量同质性检验

    你想要(精确)检验样本的方差同质性(同方差,方差齐性)。许多统计检验假设总体同方差。

    王诗翔呀
  • 「R」MRO装包踩坑记

    前几天开始装MRO后发现一切跟Github的操作都不工作了,比如说使用blogdown::install_hugo()。

    王诗翔呀
  • 「R」资源|R数据科学导论

    日常逛 GitHub,今天发现了很不错的学习资源。有针对 R 和 Python 2 种不同的版本。我这里截取教程的第一部分知识,读者阅读之后如果比较感兴趣可以通...

    王诗翔呀
  • Python Vs R:数据科学家的永恒问题pythonR结论

    Python有一些使用案例,R也是如此。使用它们的场景各不相同。 更常见的是环境以及客户或雇主的需求决定了Python和R之间的选择。许多事情在Python中都...

    用户1359560
  • 微信小程序文件上传下载应用场景

    微信小程序提供了一套在微信上运行小程序的解决方案,有比较完整的框架、组件以及 API,在这个平台上面的想象空间很大。基于微信小程序轻便、快捷的特点,使用腾讯云简...

    草小灰
  • HTML5多线程与离线存储

    使用 HTML5,通过创建 cache manifest 文件,可以轻松地创建 web 应用的离线版本。 HTML5引入了应用程序缓存,这意味着 web 应用可...

    踏浪
  • Android Jetpack: LiveData 和 Lifecycle 介绍 | 中文教学视频

    Android Jetpack 是一系列助力您更容易打造优秀 Android 应用的工具和组件。这些组件能帮助您遵循最佳实践、免除编写繁复的样板代码并简化复杂任...

    Android 开发者
  • 教你如何编写第一个爬虫

    2019年不管是编程语言排行榜还是在互联网行业,Python一直备受争议,到底是Java热门还是Python热门也是一直让人争吵的话题。

    AI科技大本营
  • HTML5离线缓存技术

    杭州前端工程师
  • AppleWatch开发入门八——Watch中图片缓存的处理

            由于iWatch在存储和性能上都和iPhone有着很大的差距,这就要求开发者对程序有更高的性能优化,下载与传输图像,在Watch操作中是一个非时...

    珲少

扫码关注云+社区

领取腾讯云代金券