levelplot

问题 This question already has an answer here : ggplot's qplot does not execute on sourcing (1 answer) Closed 7 years ago . The following code produces an image: library(latticeExtra) x=runif(40) y=runif(40) z=runif(40) png(filename=paste(i,".png",sep="")) levelplot(z ~ x + y, panel = panel.levelplot.points, col.regions = rainbow(50)) dev.off() But the following code does not. Why? library(latticeExtra) for(i in seq(1,5)) { x=runif(40) y=runif(40) z=runif(40) png(filename=paste(i,".png",sep=""))

问题 This question already has an answer here : ggplot's qplot does not execute on sourcing (1 answer) Closed 7 years ago . The following code produces an image: library(latticeExtra) x=runif(40) y=runif(40) z=runif(40) png(filename=paste(i,".png",sep="")) levelplot(z ~ x + y, panel = panel.levelplot.points, col.regions = rainbow(50)) dev.off() But the following code does not. Why? library(latticeExtra) for(i in seq(1,5)) { x=runif(40) y=runif(40) z=runif(40) png(filename=paste(i,".png",sep=""))

问题 I would like to insert a new levelplot into a previously plotted levelplot like the image shown below. Is there some sort of subplot function for levelplot that will allow me to do this? Thanks in advance. 来源： https://stackoverflow.com/questions/30018448/subplot-function-for-levelplot

问题 I am using the awesome rasterVis to create a panel with maps that have the same extent (i.e. same spatial coverage) but that show different features (i.e. each with its own legend). This is what it looks like so far: library(raster) library(rasterVis) library(RColorBrewer) library(gridExtra) # make-up data r <- raster(system.file("external/test.grd", package="raster")) s <- stack(r, r*2, r*3, r*4, r*5) names(s) <- paste0("Field ",seq(1,5)) # pre-allocate list l <- vector("list", length

问题 I am using the awesome rasterVis to create a panel with maps that have the same extent (i.e. same spatial coverage) but that show different features (i.e. each with its own legend). This is what it looks like so far: library(raster) library(rasterVis) library(RColorBrewer) library(gridExtra) # make-up data r <- raster(system.file("external/test.grd", package="raster")) s <- stack(r, r*2, r*3, r*4, r*5) names(s) <- paste0("Field ",seq(1,5)) # pre-allocate list l <- vector("list", length

问题 Somebody can help me to create color scale like this picture. I have tried a basic code below, but didn't work well... chl <- colorRampPalette(c('midnight blue','cyan 4','green 3','yellow','goldenrod 3','tomato 3')) levelplot(raster_name, col.regions = chl, at=c(0.03, 0.1, 0.4, 2, 10, 30), margin=FALSE, ylab='Latitude', xlab='Longitude') 来源： https://stackoverflow.com/questions/60702075/how-to-create-irregular-color-scale-in-levelplot

问题 With levelplot / spplot we can use at to define the color region range (min, max, interval). My question is: how can I use red for values greater than 29.5? This is my sample NCDF file --> download here library (raster) r <- brick('bali.nc', varname='TEMPERATURE', level=1) library(rasterVis) jet <- colorRampPalette( c('#00007F', 'blue', '#007FFF', 'cyan', 'yellow', '#FF7F00', 'red', '#7F0000') ) # First Figure - without at levelplot(r, layer=1, margin=F, contour=F, col.regions=jet) # Second

问题 With levelplot / spplot we can use at to define the color region range (min, max, interval). My question is: how can I use red for values greater than 29.5? This is my sample NCDF file --> download here library (raster) r <- brick('bali.nc', varname='TEMPERATURE', level=1) library(rasterVis) jet <- colorRampPalette( c('#00007F', 'blue', '#007FFF', 'cyan', 'yellow', '#FF7F00', 'red', '#7F0000') ) # First Figure - without at levelplot(r, layer=1, margin=F, contour=F, col.regions=jet) # Second

问题 I am using levelplot to plot a matrix. I need to change x and y labels. When I use the following piece of code, plot looks nice. However x and y labels are from 133 to 139 as opposed to 133..139 133...139. Can anyone help me fix it? (instead of huge matrix i am plotting, I ll give a sample matrix) library(lattice) library(RColorBrewer) m <- matrix(c(0,1,1,2,0,2,1,1,0),6,6) b <- c(seq(133,139),seq(133,139)) xy.labels <- b cols <- colorRampPalette(brewer.pal(6, "Spectral")) print(levelplot(m,

问题 Goal Code require(lattice) png('my_typing.png') par(mfrow=c(2,1)) read.csv('race_data.csv')->sol plot(sol$Race.., sol$WPM*sol$Accuracy, type='l') # TODO: it wrongly substitutes the plot with levelplot # TODO: I want two plots one below another, plot and then levelplot below levelplot(cor(sol[1:5])) Helper questions How can I plot the normal plot and the special plot together in one PNG -file? Should I combine different plotting -packages such as lattice and grid to base? 回答1: The gridBase