4

在 R 中使用 levelplot（来自 lattice 包）时，我注意到如果 column.values 和 row.values 的范围很小（例如范围小于 1），则图形边缘周围会有额外的空白。如果 column.values 和 row.values 的范围更大（例如范围为 10），此问题就会消失。

这是一个说明问题的示例：

library(gplots) # for colorpanel()
library(lattice) # for levelplot()

#generate data
myData = runif(100) #generate vector of 100 random numbers
myMatrix=matrix(myData, sqrt(length(myData)), sqrt(length(myData)))

#generate vectors that will be used for col.values and row.values
labelIncrement= 1/10
labelLow = -0.5
labelHigh = 0.5 - labelIncrement

dataForRow.values <- c(seq(labelLow, labelHigh, labelIncrement))
dataForColumn.values <- c(seq(labelLow, labelHigh, labelIncrement))

myLevelsArbitrary <- c(0, 0.2, 0.4, 0.6, 0.8, 1.0)
myColors = topo.colors(length(myLevelsArbitrary)+1)

myLevelPlot = levelplot(myMatrix,
    at=myLevelsArbitrary,
    col.regions=myColors,
    column.values=dataForColumn.values,
    row.values=dataForRow.values,
    main="Title", 
    xlab="Distance from center (cm)", 
    ylab="Distance from center (cm)",
    colorkey=list(width=3))

plot(myLevelPlot)

此图像是 myLevelPlot。

现在，让我们调整上面的代码，让 row.values 和 column.values 的范围更大：

labelIncrement= 1
labelLow = -5
labelHigh = 5 - labelIncrement

此 myLevelPlot 图像是通过使用更大范围的 row.values 和 column.values 重新运行代码生成的。 请注意，下图中没有出现无关的空白。

那么，当我的 row.values 和 column.values 的范围很小时，如何避免出现这种无关的空白？

4

1 回答 1

4

这是一个艰难的。这有效：scales = "sliced"

myLevelPlot = levelplot(myMatrix,
    at=myLevelsArbitrary,
    col.regions=myColors,
    column.values=dataForColumn.values,
    row.values=dataForRow.values,
    main="Title",
    xlab="Distance from center (cm)",
    ylab="Distance from center (cm)",
    scales = "sliced",
    colorkey=list(width=3)
    )
plot(myLevelPlot)

我不喜欢这两个警告，但有时可以忽略警告...

于 2012-01-06T01:09:07.587 回答