首页 > 解决方案 > 在 R 中创建流程图;形状没有正确改变大小或缩放

问题描述

我正在尝试在 R 中构建一个流程图,其布局如下:

3 列或垂直部分:

  1. 第一列:两个相互重叠的圆圈,带有一些填充,每个圆圈都有一个连接到的箭头,
  2. 第 2 列:地块最中心的一个正方形,有两个箭头伸出,旁边是,
  3. 第三列:两个相互重叠的圆圈,带有一些填充。

每个形状应该足够大,足以容纳两行文本,每行大约 8 个字符长。

下面是我完成此操作的代码,但出现以下失误:

# Prepare plot area
plot(0:100, 0:100, type = "n") #axes = F, xlab = NA, ylab = NA)

# Draw shapes
symbols(x = 50, y = 50, squares = 20, add = T) # square in middle
symbols(x = c(15, 15), y = c(70, 30), circles = c(5,5), add = T) # leftmost column of two circles
symbols(x = c(80, 80), y = c(70, 30), circles = c(5,5), add = T) # rightmost column of two circles

# Draw arrows
arrows(x0 = 25, y0 = 75, x1 = 43.5, y1 = 55) # upper-left arrow
arrows(x0 = 25, y0 = 25, x1 = 43.5, y1 = 45) # lower-left arrow

arrows(x0 = 57.5, y0 = 55, x1 = 75, y1 = 75) # upper-right arrow
arrows(x0 = 57.5, y0 = 45, x1 = 75, y1 = 25) # lower-right arrow
  1. 无论我分别为它们的长度和半径输入什么值,正方形和圆形都不会改变大小。
  2. 更何况,圈子都太大了。
  3. 当我缩小绘图时,任何形状或文本都不会按比例缩放,但箭头移动得很好。
  4. 箭头坐标与长度和半径不完全匹配的原因是箭头延伸到形状中。我希望箭头与形状边缘的位置完全匹配。

标签: rplotsymbolsflowchart

解决方案


推荐阅读