levelplot - 在某个 Lat Long 的水平图中写入文本

Question

我有光栅图，我想在每个图中以一定的纬度写文本。我有降水数据，请告诉我，我们该怎么办？非常感谢任何帮助，这里有一些示例代码；

library(dplyr)
library(tidyr)
library(gstat)
library(rgdal)
library(raster)
library(rgeos)
library(scales)
library(ggplot2)
library(reshape2)
library(rasterVis)
library("ggmap")
library("gridExtra")

####raster data in acii format

DJFT=raster("999.asc")
MAMT=raster("888.asc")
JJAT=raster("777.asc")
SONT=raster("6666.asc")

DJFS=raster("2001.asc")
MAMS=raster("2002.asc")
JJAS=raster("2003.asc")
SONS=raster("2004.asc")


DJFV=raster("7500.asc")
MAMV=raster("8500.asc")
JJAV=raster("2244.asc")
SONV=raster("5544.asc")

p.strip <- list(cex=0.9, lines=1, col="blue")
x.scale <- list(cex=1, alternating=1)
y.scale <- list(cex=1, alternating=1)
dudu=list(labels=list(cex=1,font=2),height=1,width=1.4, space= "right")
newcol=colorRampPalette(brewer.pal(10,"Spectral"))

##########Lat long at which text required
LONG<-c(43.54,43.90,44.21,44.32,43.69)
LAT<-c(15.46,16.35,15.30,14.73,14.64)
Names<-c("Al Mahwit","Amran","Sana'a","Thamar","Raymah")
####levelplot
levelplot(stack(DJFT,MAMT,JJAT,SONT,DJFS,MAMS,JJAS,SONS,DJFV,MAMV,JJAV,SONV),layout=c(4,3), 
par.settings=list(layout.heights=list(xlab.key.padding=1)), scales=list(x=x.scale, y=y.scale),  
xlab="Longitude",lab="Latitude", cex.lab=4, main="RCP 8.5", names.attr=c("DJF(20s)", "MAM (20s)","JJA 
(20s)", "SON (20s)", "DJF (50s)","MAM (50s)","JJA (50s)", "SON (50s)","DJF (80s)","MAM (80s)","JJA 
(80s)","SON (80s)"), par.strip.text=p.strip,cex=1.5,col.regions = newcol,colorkey = dudu)

标签： levelplot