r - 如何绘制字母？

Question

我想要一个看起来像字母表字母的散点图。我怎么能用程序做到这一点？我可以进入坐标并使情节看起来像一个＆＃39; A＆＃39;或者＆＃39; S＆＃39;管他呢。但它可以更容易地完成吗？

Answer 1

plot的pch参数将采用可用于表示这些值的参数。从?points开始，值32-127是ASCII字符集。

稍微弄乱一下，值65:90对应大写字母，值97:122对应小写字母。

为了说明这一点，请尝试

plot(1:10, 1:10, type="p", pch=97:107)

例如。

这是所有拉丁字母的图表

# blank canvas
plot(1:30, 1:30, type="n")
# upper case
points(1:26, 1:26, pch=65:90)
# lower case
points(1:26, 4:29, pch=97:107)

您甚至可以在这些值之间构建映射以便于参考。

myRefUpper <- setNames(65:90, LETTERS)

myRefUpper
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z 
65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90

myRefLower <- setNames(97:107, letters)

myRefLower
  a   b   c   d   e   f   g   h   i   j   k   l   m   n   o   p   q   r   s   t   u   v   w   x   y   z 
 97  98  99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122

这样，您可以按名称引用特定字母。例如，尝试

plot(1:10, 1:10, type="p", pch=c(myRefLower[c("a", "t", "q")], myRefUpper[LETTERS[10:16]]))