请问怎么解决ggplot2图片保存为.svg格式时文本不显示的问题？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

ID	Station	Longtitude	Latitude
1	北京南	116.3849	39.87133
2	廊坊	116.7152	39.5157
3	天津西	117.1699	39.16384
4	天津南	117.0671	39.06263
5	沧州西	116.8418	38.37595
6	德州东	116.4687	37.41535
7	平原东	116.4301	37.15662
8	禹城东	116.5813	36.91914
9	齐河	116.6783	36.72345
10	济南西	116.8978	36.67511
11	泰安	117.0426	36.17885
12	曲阜东	117.0754	35.5623
13	滕州东	117.2633	35.09671
14	枣庄	117.3123	34.78672
15	徐州东	117.3116	34.27302
16	宿州东	117.2566	33.68198
17	蚌埠南	117.448	32.90751
18	定远	117.8484	32.58168
19	滁州	118.3336	32.31413
20	南京南	118.786	32.01192
21	镇江南	119.4651	32.1972
22	丹阳北	119.6774	32.02048
23	常州北	119.9613	31.85924
24	无锡东	120.4656	31.6036
25	苏州北	120.6513	31.42649
26	昆山南	120.9572	31.35926
27	上海虹桥	121.3262	31.20092

1. svg(file = "Railways.svg", width = 40, height = 40)

复制代码

截取了一小部分数据，在R窗口时站名能正常显示，但保存为SVG格式时站名显示为口口口口这样子。怎么解决啊，谢谢了。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

1.      ggplot(Railways, aes(Longtitude, Latitude)) +
   
2.      geom_path(color = "red", size = 2.5) +
   
3.      geom_point(size = 1.5, color = "white") +
   
4.      geom_text(size = 4.5, aes(Longtitude, Latitude, label = Station)) +
   
5.      theme(legend.position = "none") + theme_classic() +
   
6.      coord_map(projection = "azequidistant")

复制代码

在geom_text（）括号中加family="Simsun"或者在ggplot+所有代码后+ theme(text = element_text(family = 'SimSun'))试试。SimSun
表示宋体，其他字体做相应修改。