为什么radarchart()会产生空图

Question

我正在尝试绘制一些雷达图，但是我已经花了整整一天的时间进行搜索，而且我似乎没有得到我的代码错误的位置，因为我得到了空图。我使用了library(fmsb)我的数据是

df<-data.frame(
site.spp=c("G.E", "G.R", "N.E", "N.R","W.R"),
am1=c(11.17, 62.71, 14, 17, 23),
am2=c(5.75,62.9,20.18,18,8.375),
pm1=c(16.14, 53.77, 21.75, 53, 25.67),
pm2=c(20, 52.5, 34.2, 23.38, 4.75)
)

我尝试设置图形边距，然后运行一个循环。

par(mar=c(2, 1, 2, 1))
layout(matrix(1:6, ncol=3)) #draw 4 plots to device
lapply(1:5, function(i) { 
  radarchart(rbind(rep(1,6), rep(0,6), df[i,-1]))
})

我只能在没有数据绘制的情况下获得空图。有人会帮助这个初学者吗？

Answer 1

我找到了解决方案，我只是不为地块设置范围，

因此，它可以完美地工作，我将图的范围从rep（0-6）更改为rep（0-70） - 覆盖我的数据范围。我认为这可能会帮助像我这样的其他初学者！

lapply(1:5, function(i) { 
  radarchart(rbind(rep(70,4), rep(0,4), df[i,-1]))
})