如何在R语言grid包中访问unit对象的数值?
处理Grid包Grob对象中点位置的筛选方案
grid包里没有专门针对“区分0.5npc左右点”的现成函数,但可以用grid原生的convertUnit()结合基础逻辑判断高效完成,比手动用unclass()+unlist()更可靠(尤其是处理混合单位的情况):
将位置转换为纯npc数值
不管你从grob里提取的positionx是unit对象还是嵌套结构,用convertUnit()可以直接转成npc单位的数值,无需手动拆解:x_npc <- convertUnit(positionx, "npc", valueOnly = TRUE)参数
valueOnly = TRUE会直接返回数值向量,跳过unit对象的包装。筛选左右侧的点
用简单的逻辑索引就能区分0.5npc左右的点:- 左侧点(x < 0.5npc):
left_points <- x_npc < 0.5 - 右侧点(x > 0.5npc):
right_points <- x_npc > 0.5
如果需要获取对应的索引,用which()包裹即可:
left_indices <- which(x_npc < 0.5) right_indices <- which(x_npc > 0.5)- 左侧点(x < 0.5npc):
完整示例
library(grid) # 构造包含多个点的复杂grob示例 point_grob <- pointsGrob( x = unit(c(0.3, 0.6, 0.4, 0.7), "npc"), y = unit(runif(4), "npc"), pch = 16 ) # 提取x轴位置 positionx <- point_grob$x # 转换为npc数值 x_npc <- convertUnit(positionx, "npc", valueOnly = TRUE) # 筛选左右点索引 left_indices <- which(x_npc < 0.5) right_indices <- which(x_npc > 0.5) # 输出结果 cat("左侧点索引:", left_indices, "\n") cat("右侧点索引:", right_indices, "\n")
如果你的positionx已经是通过unclass()+unlist()得到的纯数值,直接跳过转换步骤,用逻辑判断筛选即可。
内容的提问来源于stack exchange,提问作者Crops
相关产品推荐
相关产品推荐

