r - 星图格式 : keys on the graphs

Question

我想创建六个 stars -根据输入数据的列命名的半径图。框架u .换句话说，我希望没有关键图例，而是直接在星图上使用关键名称。有没有办法在不遍历 stars 的情况下做到这一点？ - 使用 par(mfrow) 绘图?谢谢。

 u = matrix(runif(60),6,10)
 colnames(u) <- as.character(1:10)
 stars( u , locations = NULL , key.loc = c(0,0) , labels=1:6,
   key.labels = colnames(u) , col.lines=1:10, lwd=2 )

Answer 1

稍微摆弄一下，您就可以找到可行的方法。

sloc <- stars(u,len=0.6,lwd=2, col.lines=1:10)

Map(
  function(x,y) stars(
                  matrix(1,ncol=10,nrow=6),key.loc=c(x,y),
                  key.labels=colnames(u),add=TRUE, lty=3, cex=0.7, len=0.6
                ),
  sloc$Var1, sloc$Var2
)

结果:



您可以通过指定 lty=0 完全删除每个段的行。 ，但这会使数字笨拙地漂浮在空间中。