星图格式:图表上的键

我想创建六个星形图,其半径根据输入data.frame u的列命名.换句话说,我想没有关键的传说,并且在星形图上直接使用关键名称.有没有办法在不使用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 )

最佳答案 有点摆弄你可以得到一些可行的东西.

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来完全删除每个段的行,但这会使数字在空间中浮出水面.

点赞