lattice

1熱度

1回答

是否可以將鍵（例如sp.points圖層）添加到由levelplot生成的顏色鍵？看看下面的例子： library(rasterVis) library(latticeExtra) library(sp) r <- as.factor(raster(matrix(rbinom(100, 1, 0.5), 10))) levels(r)[[1]] <- data.frame(ID=0:1

0熱度

1回答

不同佈局的格點直方圖

我想仔細看看RT時間在問題上的分佈情況。爲了做到這一點，我使用了格子來製作陰影，並用一個數字來描繪它們。我用以下設置： histogram(~ rt | pp,layout=c(6,4),data = data.frame, main=list( label="RT distribution per subject", cex=1.5), xlab=l

2熱度

1回答

R格線框顏色比例相似的跨劇情

有沒有辦法改變格的懸垂顏色比例：wireplot？我有一系列的情節，並希望調整顏色，使他們每個顯示相同的色階。我可以改變z軸的比例尺，但這隻能讓它自動上下移動，而不是色階。有沒有一個關鍵字我查找它時失蹤？ wireframe(InitFe2solid.ug.gdw~Depth*Distance, allplatesdata[allplatesdata$UseMonth=="Augus

2熱度

1回答

在rasterVis levelplot中更改添加的形狀文件的背景顏色

我想更改海洋顏色（在shapefile邊界之外）。我可以剪切光柵並更改背景顏色，但在此我想用添加的shapefile來完成此操作。 library(raster) library(rasterVis) library(maps) library(maptools) library(mapdata) r <- raster(nrow=361, ncol=576, ymn=-90, ymx

0熱度

1回答

更改區域間隔rasterVis horizonplot

我正在與rasterVishorizonplot功能，我想改變區間間隔;例如我想要顯示x axis中每10個緯度區域的平均值。這是an example從rasterVis庫。 library(raster) library(rasterVis) horizonplot(SSTanom, col.regions = rev(brewer.pal(n = 10, 'RdBu')))

-1熱度

2回答

創建時間圖

我有以下示例數據並想創建水平圖，顯示列在year上的更改。任何建議使用ggplot2？ year <- 1990:2005 area1 <- runif(16, 18,20) area2 <- runif (16,6,6.7) area3 <- runif(16, 7,8) dat <- data.frame(year, area1, area2, area3)

1熱度

1回答

如何反轉水平圖中y軸標籤的順序？

我想將y軸（「行」）的標籤從減少（從上到下）更改爲增加（從上到下），以正確匹配繪圖值。這應該對任何y軸標籤（自動）完成，而不僅僅是手動定義y軸上的值（換句話說，我如何在y軸上取出使用的標籤，顛倒它們的順序，然後把它們放回來作爲標籤？panel.levelplot（）看起來像什麼？）。另外，這應該在不使用額外包的情況下完成。 library(lattice) A <- outer(1:100, 1

2熱度

1回答

如何刪除面板標題，並添加點到晶格積

我有兩個數據幀： df1 <- read.table(text = " Time Score ID -83 19 C1 -69 17 C2 -55 15 C3 -28 22 C4 0 27 C5", header=TRUE) df2 <- read.table(text = " Time Score ID -83 19 C1 -55 15 C3

1熱度

1回答

在地層圖上更改基線位置

如何手動調整地層圖中特定面板的x軸基線位置？例如，這裏的Stratiplot從模擬： library(analogue) data(V12.122) Depths <- as.numeric(rownames(V12.122)) (plt <- Stratiplot(Depths ~ O.univ + G.ruber + G.tenel + G.pacR, data =

0熱度

1回答

更改格子圖例中的訂單

我想知道是否有改變格子圖例中系列的順序？例如，如果我有一個疊加密度a，b和c的圖，但在圖例中，我希望命令是c，b，a有無論如何我可以這樣做？ dat <- data.frame(dens = c(rnorm(100), rnorm(100, 10, 5), rnorm(100,-10,5)) , lines = rep(c("a", "b","c"), each = 100))