ggplot2 保存图片字体错误问题

最新推荐文章于 2024-02-29 20:46:14 发布
最新推荐文章于 2024-02-29 20:46:14 发布
阅读量9.8k 收藏 5
点赞数 6
分类专栏： R 文章标签： 其他
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/Gossie/article/details/120253758
版权
当使用ggplot2制作图表并保存时，可能会遇到字体错误，例如尝试设置Arial字体失败。解决方法是利用showtext包来加载所需字体。首先，通过font_add()函数指定字体路径加载Arial字体，然后调用showtext_auto()确保在ggsave()中能正确使用该字体。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

用ggplot2作完图，输出图片或者用ggsave()保存图片时可能会碰到字体错误问题，如设置字体为Arial后：

Error in grid.Call.graphics(C_text, as.graphicsAnnot(x$label), x$x, x$y,  : 
  字体类别出错

一种解决方法是用 showtext 包输入需要的字体：

library(showtext)
font_add('Arial','/Library/Fonts/Arial.ttf') #加载字体，MAC 中字体库在 /Library/Fonts
showtext_auto() #自动调用showtext，否则无法在ggsave()中使用，因为ggsave会自动打开和关闭图形设备。
R plot图片背景设置为透明_R语言实战 牛国庆
weixin_39924307的博客
11-20 2316
[toc]第一章1.3.2 R中帮助函数R中用于管理R工作空间的函数函数setwd()不会自动创建一个不存在的目录。如果必要的话，可以使用函数dir.create()来创建新目录，然后使用setwd() 将工作目录指向这个新目录。1.3.4 输入和输出1.输入关键词：如何运行一个R脚本。函数source(“filename”)可在当前会话中执行一个脚本。如果文件名中不包含路径，R将假设此...
随笔7：R语言绘图黑白印刷风格芯片包
ForvaluesMyself的博客
01-18 1072
R语言绘图黑白印刷风格芯片包 1.基本说明 1.1本包的目标 让使用者将注意力集中在参数设定与调整上，而不是代码使用的细节，类似于一个芯片封装的过程。对几个常用的绘图函数进行了封装，并调整为印刷风格供使用者做课题或写论文参考。 1.2功能特色 设定好参数后，只需要一行代码便能绘制出印刷风格的R图像。 1.3数据说明 本包内置数据集均为随机或手动生成，输入以下命令能够看到对应绘图函数的详细说明。 help(acchist) #堆积柱状图黑白印刷风格绘制 help(bonbon) ..
ggsave的图片图例不显示中文解决办法
ToyPython的博客
06-23 4832
showtext和cairo包可以解决，在mac下： library(showtext) library(cairo) showtext_auto(enable=T) font_add("MicrosoftYaHei","/System/Library/Fonts/msyh.ttf") #微软雅黑字体# ggplot(......) ...
ggplot2 保存图片 字体不协调
热门推荐
自由 平等~忠诚 奉献
01-03 1万+
在使用R语言ggplot2 package画图时，导出图片总会遇到标题字体与图片不协调的情况，下面提出一种解决方案library(Cairo) library(ggplot2) p <- ggplot(mtcars, aes(factor(cyl))) # By default, uses stat="bin", which gives the count in each category p <-
Error in grid.Call.graphics(C_text, as.graphicsAnnot(x$label), x$x, x$y, : 字体类别出错In addition: T
weixin_54434521的博客
08-22 4622
font_import("C:/Windows/Fonts")#选择yes。#再使用ggsave(）就不会报错。#导入windows中的字体库。#和Times相关的有下面这些。
解决：R语言ggsave保存的图片中的文字不显示
weixin_69556916的博客
11-02 689
使用下面代码解决if(!
R/ggplot2保存图片中文字体至PDF——showtext包一文清除所有障碍
Today_history的博客
04-19 1万+
R/ggplot2保存图片中文字体至PDF——showtext包一文清除所有障碍文章概要1.问题描述2.Showtext包使用流程全注释2.1案例介绍——导入线上的谷歌字体2.2实例测试——导入本地字体，以宋体、新罗马为例2.3拓展-新罗马与Serif的不同 文章概要 1.解决R/ggplot2保存图片中文字体至PDF丢失问题。 2.解决新罗马字体（Times New Roman），宋体（simsun）导入失败问题。 3.熟悉并掌握showtext操作。 1.问题描述 ggplot2作图后，使用ggsave
【无标题】rstudio绘制的图形导出pdf不显示文字内容，导出png正常显示
weixin_47151413的博客
07-14 1834
PDF打不开处理办法
Cairo包与ggplot2协同工作：创建交互式数据可视化图表
在数据分析与科学可视化领域，ggplot2库成为了R语言中的一个重要组件，提供了丰富的绘图功能，帮助用户创建精美的图形。不过，对于高质量的图形输出，特别是跨平台导出方面，ggplot2有时面临一定的挑战。这时，Cairo...
# 1.读取图片并添加标题 processed_imgs <- list.files("图片路径", full.names = TRUE) %>% map(~{ img <- image_read(.x) %>% # 添加标题（文件名前3字符） image_annotate( text = substr(basename(.x), 1, 3), gravity = "north", # 顶部对齐 location = "+0+20", # 向下偏移20像素 size = 30, # 字号 color = "black", # 字体颜色 weight = 700 # 字重 ) # 2.移除单个图片坐标标签（需提前生成无轴标签图片） # 建议在生成原始图片时使用以下ggplot2设置： theme(axis.title = element_blank(), axis.text = element_blank()) return(img) }) # 3.横向合并图片 combined_img <- image_append(image_join(processed_imgs), stack = FALSE) # 4.添加全局坐标标签 final_img <- combined_img %>% image_annotate("权重", # 横坐标标签 gravity = "south", location = "+0+50", size = 35) %>% image_annotate("控制单元", # 纵坐标标签 gravity = "west", location = "+100+0", degrees = 90, # 旋转90度 size = 35) # 5.导出结果 image_write(final_img, "combined_output.png")错误: rsession-utf8.exe: NegativeOrZeroImageSize `' @ error/image.c/CloneImage/795
最新发布
04-03
3. 确保在生成原始图片时，使用ggplot2的主题设置移除了坐标轴标签，并且保存的图片尺寸正确，没有因为边距调整导致尺寸异常。 4. 在处理每个图片时，检查是否有异常，例如在`map`循环中加入调试语句，输出每个文件...
# 读取数据 data <- read_excel("E:\\论文2\\数据2025\\去气象化图.xlsx", sheet = "PM10") my_palette <- hue_pal()(21) # 检查日期格式 if (!inherits(data$date, "Date")) { data$date <- as.Date(data$date) } data$encodings <- as.factor(data$encodings) # 绘图 ggplot(data, aes(x = date, y = CO, color = encodings)) + # 确保列名PM10存在 geom_line(linewidth = 0.8) + labs( x = "日期", y = expression(PM[10]~"(μg/m³)"), # 科学格式标签 color = "" ) + theme_bw() + theme( legend.position = c(0.95, 0.95), legend.justification = c(1, 1), legend.title = element_blank(), legend.background = element_rect(fill = "white", color = "grey50"), legend.margin = margin(2, 4, 2, 4), legend.text = element_text(size = 8) # 缩小图例文字 ) + scale_color_manual(values = my_palette) + guides(color = guide_legend(ncol = 3)) # 调整列数 # 保存 ggsave( filename = "E:\\论文2\\图\\1CO气象归一.png", width = 10, height = 5, dpi = 1200, units = "in" ) y = expression(PM[10]~"(μg/m³)"), # 科学格式标签改为CO和单位
03-29
用户的数据路径中有“论文2”和“数据2025”，需要确认这些目录是否存在，避免文件读取错误。另外，检查数据中的列名是否确实有CO，因为原始代码中y = CO，而注释提到PM10，可能存在列名不匹配的问题。 颜色调色板...
trend_plot <- ggplot(trend_df, aes(x = date)) + geom_line(aes(y = actual, color = "试点城市"), linewidth = 0.6) + geom_line(aes(y = synthetic, color = "合成控制组"), linetype = "dashed", linewidth = 0.6) + geom_vline(xintercept = policy_date, linetype = "dashed", color = "red") + labs( x = "日期", y = expression("NO"[2] ~ "浓度 (" * mu * "g·m"^-3 * ")") ) + scale_color_manual( values = c("试点城市" = "firebrick4", "合成控制组" = "darkgreen"), name = NULL, # 关键修改点1：移除expression，直接使用字符向量 labels = c("试点城市", "合成控制组") ) + theme_bw(base_size = 11) + theme( axis.title.x = element_text( hjust = 1, size = 16.5, margin = margin(t = 10) ), plot.margin = unit(c(1, 1, 3, 1), "cm"), legend.position = "bottom", # 关键修改点2：调整边距设置 legend.margin = margin(t = 0, b = 5), legend.background = element_blank(), # 关键修改点3：增加图例项间距 legend.spacing.x = unit(0.5, "cm"), legend.text = element_text( size = 15, # 关键修改点4：添加文字边距 margin = margin(r = 15) ), axis.title.y = element_text(size = 16.5), axis.text.x = element_text(angle = 0, hjust = 0.5) )保存论文图片
04-02
2. 确保保存图片的代码被正确添加，并选择合适的格式和参数。 3. 验证所有文本元素（如轴标签、图例）的字体大小和边距是否一致且符合要求。 4. 确认日期变量和数据的正确性，避免绘图时出现错误。 5. 检查单位的...
报错记录：Error in grid.Call(C_stringMetric, as.graphicsAnnot(x$label))
生信练习生
11-29 997
Error in grid.Call(C_stringMetric, as.graphicsAnnot(x$label))
mac ggplot2中文保存问题解决
qq_45759229的博客
02-29 525
这里注意我的电脑显示/Library/Fonts/的目录内容如下。这个是宋体和黑体，不过这个没报错，是可以正常保存的，注意这个地方我在画图中使用的是。
工业产量分析与预测
诗酒趁年华。
07-01 1240
工业产量分析与预测导入数据与数据概况数据描述统计时序数据进行分析尝试建立时间序列预测模型先对汽车进行分析试试灰色预测灰色预测汽车灰色预测天然气灰色预测钢材组合模型探索相关关系各省份进行聚类分析及可视化标准化后再聚类 导入数据与数据概况 # 安装库专用 # 通过如下命令设定镜像 options(repos = 'http://mirrors.ustc.edu.cn/CRAN/') # 查看镜像是否修改 getOption('repos') # 尝试下载R包 #若有需要，进行安装 #install.packa
R语言ggplot2——“Windows字体数据库里没有这样的字体系列”；更改字体
xigewang_的博客
03-30 5846
从以下博文学到的，以为只能英文字体这么做，没想到中文字体也能这么做。第一行把字体导入，第二行就可以直接使用了。
R中运行ggplot Error in .Call.graphics(C_palette2, .Call(C_palette2, NULL)) : invalid graphics state
夏露九月
01-09 7051
我们在R中运行ggplot 出现了 Error in .Call.graphics(C_palette2, .Call(C_palette2, NULL)) :    invalid graphics state 提示： 只需要执行 dev.off() 这命令 ，再重新执行ggplot的命令就OK了 ...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值