星图格式：图表上的键

Question

我想创建六个stars - 根据输入data.frame 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来完全删除每个细分的行，但这会使数字在空间中浮出水面。