plot.station | R Documentation |
These plot functions are S3 methods for esd objects, based on plot
.
## S3 method for class 'station'
plot(
x,
...,
plot.type = "single",
new = TRUE,
lwd = 3,
type = "l",
pch = 0,
main = NULL,
col = NULL,
xlim = NULL,
ylim = NULL,
xlab = "",
ylab = NULL,
errorbar = TRUE,
legend.show = FALSE,
map.show = TRUE,
map.type = NULL,
map.insert = TRUE,
xrange = NULL,
yrange = NULL,
cex.axis = 1.2,
cex.lab = 1.2,
cex.main = 1.2,
mar = NULL,
alpha = 0.5,
alpha.map = 0.7,
verbose = FALSE
)
x |
the object to be plotted |
... |
additional arguments |
plot.type |
"single" |
new |
if TRUE plot in new window |
lwd |
width of line |
type |
type of plot: 'l' = line, 'p' = point, 'b' = both |
pch |
type of marker |
main |
main title |
col |
Colour see |
xlim |
range of x-axis |
ylim |
range of y-axis |
xlab |
label of x-axis |
ylab |
label of y-axis |
errorbar |
if TRUE show errorbar |
legend.show |
if TRUE show legendp |
map.show |
show map of stations |
map.type |
'points' to show stations on map, 'rectangle' to show area |
map.insert |
if TRUE show map as insert, else show map in new window |
cex.axis |
see |
cex.lab |
see |
cex.main |
see |
mar |
see |
alpha |
transparency factor for main plot |
alpha.map |
transparency factor for map |
verbose |
a boolean; if TRUE print information about progress |
it |
For subsetting in time - See |
is |
For subsetting in space - See |
ip |
Which EOF/CCA pattern (mode) to plot |
cex |
magnification factor, see |
fig |
coordinates of figure region, see |
what |
Indicate what to plot. For |
colbar |
a list, see |
None
# Example: use aggregate to compute annual mean temperature for Svalbard:
data(Svalbard)
y <- aggregate(Svalbard, by=year(Svalbard), FUN='mean', na.rm = FALSE)
plot(y, new=FALSE)
# Example with downscaling:
lon <- c(-12,37)
lat <- c(52,72)
t2m <- t2m.DNMI(lon=lon,lat=lat)
data(Oslo)
ds <- DS(Oslo,t2m)
# Plot the results for January month
# plot(subset(ds,it='Jan'))
# Plot the residuals:
residual <- as.residual(ds)
obs <- as.anomaly(as.calibrationdata(ds))
plot.zoo(obs[,1], lwd=2, new=FALSE)
lines(residual, col="red")
print("Global climate model simulation NorESM")
T2m <- t2m.NorESM.M(lon=lon,lat=lat)
# Plot the global mean of the field:
plot(T2m, new=FALSE)
# Plot area mean of a sub region
plot(T2m,is=list(lon=c(0,10),lat=c(60,70)), new=FALSE)
# Plot interpolated results corresponding to ferder
data(ferder)
plot(T2m,ferder, new=FALSE)
print("Extract a subset - the January month")
x <- subset(t2m,it="jan")
X <- subset(T2m,it="jan")
print("Combine the fields for computing common EOFs:")
XX <- combine(x,X)
print("Compute common EOFs")
eofxx <- EOF(XX)
plot(eofxx, new=FALSE)
print("Downscale the January mean temperature")
ds.jan <- DS(Oslo,eofxx)
plot(ds.jan, new=FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.