原标题：修改ggplot的图例符号

介绍

最新版本的ggplot2 3.2.0使我们能够像这样改变图例中的符号。

1library(ggplot2)

2

3ggplot(economics_long, aes( date, value01, colour = variable)) +

4geom_line(key_glyph = "timeseries")

它们同样可以用draw_key_*函数指定。

1ggplot(economics_long, aes( date, value01, colour = variable)) +

2geom_line(key_glyph = draw_key_timeseries)

展示例子

下面是ggplot2中所有可用的draw_key_*函数。请注意，点图和多边形中的深灰色是未指定填充美学的结果。生成这些图形的代码可以在本文末尾找到。

自定义符号键

因为draw_key_*函数只返回一个grob，所以您可以花一些时间来创建自己的自定义符号!从draw_key_boxplot中获得灵感。

1draw_key_boxplot

2## function (data, params, size)

3## {

4## grobTree(linesGrob(0.5, c(0.1, 0.25)), linesGrob(0.5, c(0.75,

5## 0.9)), rectGrob(height = 0.5, width = 0.75), linesGrob(c(0.125,

6## 0.875), 0.5), gp = gpar(col = data$colour %||% "grey20",

7## fill = alpha(data$fill %||% "white", data$alpha), lwd = (data$size %||%

8## 0.5) * .pt, lty = data$linetype %||% 1))

9## }

10##

11##

我会试着自己用点和线做一个符号。

1library(grid)

2library(rlang)

3draw_key_smile

4grobTree(

5pointsGrob( 0. 25, 0. 75, size = unit(. 25, "npc"), pch = 16),

6pointsGrob( 0. 75, 0. 75, size = unit(. 25, "npc"), pch = 16),

7linesGrob(c( 0. 9, 0. 87, 0. 78, 0. 65, 0. 5, 0. 35, 0. 22, 0. 13, 0. 1),

8c( 0. 5, 0. 35, 0. 22, 0. 13, 0. 1, 0. 13, 0. 22, 0. 35, 0. 5)),

9gp = gpar(

10col = data$colour %||% "grey20",

11fill = alpha(data$fill %||% "white", data$alpha),

12lwd = (data$size %||% 0. 5) * .pt,

13lty = data$linetype %||% 1

14)

15)

16}

17

18ggplot(economics_long, aes(date, value01, colour = variable)) +

19geom_line(key_glyph = draw_key_smile)

它看起来很开心!

附录1library(dplyr)

2library(magrittr)

3library(ggplot2)

4library(grid)

5

6draws

7

8legend_fun

9ggg %

10mutate(variable = factor(variable, labels = paste( "Option", LETTERS[ 1: 5]))) %>%

11ggplot(aes(date, value01, colour = variable)) +

12geom_line(key_glyph = get(x)) +

13labs(color = x)

14

15legend

16

17grid.newpage

18grid.draw(legend)

19}

20

21purrr::walk(draws[ 1: 12], legend_fun)

22p

23geom_text(aes(colour = factor(ceiling(seq_len(nrow(mtcars)) %% 5), labels = paste( "Option", LETTERS[ 1: 5])))) +

24labs(color = "draw_key_text")

25legend

26

27grid.newpage

28grid.draw(legend)

29purrr::walk(draws[ 14: 16], legend_fun)

原文链接：

https://www.hvitfeldt.me/blog/changing-glyph-in-ggplot2/

您在阅读中有什么问题，请留言。若是觉得有用，请您点赞和分享给其他朋友，感谢支持和分享。

数据人才(ID：datarencai)

(一个帮助数据人才找工作，

帮助数据公司招人才的公众号，

也分享数据人学习和生活的有趣事情。)返回搜狐，查看更多

责任编辑：

回答：

导读：cad钢筋符号的输入我们经常会见到，尤其是钢筋符号，它是一种特殊的符号，这些钢筋符号的输入可以借助一些软件完成，例如天正软件，它可以自动完成cad钢筋符号的输入。尽管这样，在进行cad钢筋符号输入的过程当中，我们还会遇到很多问题，下面小编就带你来看看cad钢筋符号如何才能正确的输入。

一、cad钢筋符号输入的第一种方法：

第一步：首先将cad打开，或者可以直接将cad钢筋符号的图纸打开，将相应的cad打开以后，需要选择合适的字体，如果选择的字体样式在cad当中没有，则需要进行相应的设置，设置步骤首先需要在命令列表当中输入style，就可以直接将文字的字体样式打开。

第二步：将字体样式设置页面打开以后，进行设置，首先点击新建选项，然后将字体的样式名称改为gbcbig，更改完成以后，点击确定按钮，然后在shx字体的下拉菜单当中选择tssdeng.shx字体，接着找到大字体选项，点击大字体，然后选择gbcbig.shx，点击完成以后，紧接着点击应用，最后将其关闭即可。

第三步：完成以上的设置以后，进行cad钢筋符号的输入，其中每个钢筋符号所对应的字体样式不同，它的输入方式也有所不同。常见的输入方法有%%c符号φ、%%d度符号、%%p±号、%%u下划线、%%130Ⅰ级钢筋φ、%%131Ⅱ级钢筋φ等等。

第四步：输入钢筋符号以后，在电脑的命令列表当中输入dt，然后设置合适的字体高度和角度，然后在相应位置输入%%130，这样就可以出现一级钢了。

二、cad钢筋符号输入的第二种方法：

如果你输入的钢筋符号无法显示，则使用这种方法，这种方法首先是直接画一条直线和一个圆，然后让其自由组合，可以将它组合成块状，在需要的时候可以随时插入，十分的方便，而且不需要考虑他能否正常的显示。

三、cad钢筋符号的输入需要注意的问题：

1、需要注意输入的钢筋符号的最优选择，也就是尽量选择DT单行字。

2、cad钢筋符号的每个字体样式不同，它的输入方式也有所不同。

3、cad钢筋符号输入的方式最好选用画线法，不仅方便实用，而且不需要担心。