Dragonera: Wind data

In SailoR: An Extension of the Taylor Diagram to Two-Dimensional Vector Data

Description

Contains the information of both zonal and meridional wind components measured in the Mediterranean sea by the in-situ buoy Dragonera, operated by the Spanish State Ports Authority - Puertos del Estado. Data from two WRF downscaling experiments (including the 3DVAR data assimilation every 3 hours - D, and not including it - N), ERA-Interim reanalysis and remote sensing data from the second version of the Cross-Calibrated Multi-platform (CCMPv2) product are also included. Only the closest spatial grid points to the buoy location (39.56 ºN, 2.10 ºE) in the gridded products are considered. The data cover the period 2009-2014 (Ulazia et al., 2017).

Usage

data("Dragonera")

Format

A list with two data frames:

ref

a data frame including the buoy data.

mod

a data frame including the data from gridded datasets.

Each of these data frames includes 3 variables:

mod

a factor defining if the data belong to the CCMPv2 product (CCMP_SAT), to the reanalysis ERA-Interim (rad) or to any of the WRF downscaling experiments (WRF_D or WRF_N).

U

zonal component of wind (m/s).

V

meridional component of wind (m/s).

Source

Both WRF downscaling experiments were created by the authors in previous studies. The in-situ data can be retrieved from http://www.puertos.es/es-es/oceanografia/Paginas/portus.aspx. The CCMPv2 data can be retrieved from http://www.remss.com/measurements/ccmp/.

References

A. Ulazia, J. Sáenz, G. Ibarra-Berastegi, S. J. González-Rojí and S. Carreno-Madinabeitia (2017) Using 3DVAR data assimilation to measure offshore wind energy potential at different turbine heights in the West Mediterranean. Applied Energy, 208:1232-1245, doi: https://doi.org/10.1016/j.apenergy.2017.09.030.

Examples

# Load the data
data(Dragonera)

# Parameters

Uxlab<-"Ux (m/s)"
Uylab<-"Vy (m/s)"
ref<-Dragonera[["ref"]]
mod<-Dragonera[["mod"]]
    
# Index
SailoR.Indices(ref,mod)
    
#--------------------------------------------------------
# Example 1: Figure 5 (left) from Sáenz et al. (2020)
#--------------------------------------------------------

Uxlim=c(-10,10)
Uylim=c(-10,10)
sfactor<-1
plotmain<-"Dragonera U10/V10"
p <- SailoR.Plot(ref,mod,ColourList=NULL,sfactor,docenter=TRUE,
                 Uxlim,Uylim,Uxlab,Uylab,plotmain,plotlegend=TRUE,
                 plotRMSElegend=TRUE,
                 plotscalelegend=TRUE,
                 RMSE_legend_Rounding=1,RMSE_legend_units = " m/s",
                 referenceName="Reference")

# Add segments
segments(-1,-1, x1 = -1, y1 = 1,col="brown",lwd=4)
segments(-1,-1, x1 = 1, y1 = -1,col="brown",lwd=4)
segments(1,-1, x1 = 1, y1 = 1,col="brown",lwd=4)
segments(1,1, x1 = -1, y1 = 1,col="brown",lwd=4)



#--------------------------------------------------------
# Example 2: Figure 5 (right) from Sáenz et al. (2020)
#--------------------------------------------------------

Uxlim=c(-1,1)
Uylim=c(-1,1)
sfactor<-0.025
plotmain<-"Dragonera U10/V10 (scaled)"
SailoR.Plot(ref,mod,ColourList=NULL,sfactor,docenter=FALSE,
            Uxlim,Uylim,Uxlab,Uylab,plotmain,plotlegend=TRUE,
            plotRMSElegend=TRUE,
            plotscalelegend=TRUE,
            RMSE_legend_Rounding=1,RMSE_legend_units = " m/s",
            referenceName="Reference")

SailoR documentation built on Oct. 23, 2020, 7:46 p.m.