当数据少于5列或行时,会有虚拟网格。有可能避免这种情况吗?
set.seed(123)
my.mat <- matrix(runif(20), nrow = 4)
dimnames(my.mat) <- list(LETTERS[1:4], letters[11:15])
s3d.dat <- data.frame(columns = c(col(my.mat)),
rows = c(row(my.mat)), value = c(my.mat))
scatterplot3d(s3d.dat, type = "h", lwd = 5, pch = " ",
x.ticklabs = colnames(my.mat), y.ticklabs = rownames(my.mat))
根据scattorplot3d晕影中的示例对上述代码进行了略微修改,并生成以下图表。
在y轴上,添加了虚拟网格,并重复相应的标签以覆盖额外的网格。有什么想法来解决它吗?