Current: Ocean Current Data

Description Usage Format Source Examples

Description

Contains the information of the surface ocean currents measured in the Bay of Biscay by the Donostia buoy and the HF-Radar from the Basque Meteorological Agency EUSKALMET. Additionally, it also contains model data from the high resolution global analysis and forecasting system PSY4V3R1 of the Copernicus Marine Environment Monitoring Service (CMEMS). Only the closest spatial grid points to the buoy location (43.6 ºN and 2.0 ºW) in radar and model grids are considered, and only the parts of years 2017 and 2018 which are present in the three sources (8319 hourly observations) are included.

Usage

1
data("Current")

Format

A list with two data frames:

mod

a data frame including the data from both gridded datasets.

ref

a data frame including the buoy data.

Each of these data frames includes 3 variables:

mod

a factor defining if the data belong to the observed data (ref), to the radar (rad) or to the ocean modelling product (mod).

U

zonal component of ocean current (m/s).

V

meridional component of ocean current (m/s).

Source

The in-situ data belong to the Basque Meteorological Agency EUSKALMET and were downloaded from https://www.euskoos.eus. The Copernicus Marine Environment Monitoring Service (CMEMS) data can be retrieved from their data portal.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#--------------------------------------------------------
# Example 1: Figure 6 (left) from Sáenz et al. (2020)
#--------------------------------------------------------

# Load the data
data(Current)

# Parameters
Uxlim=c(-0.5,0.5)
Uylim=c(-0.5,0.5)
Uxlab<-"Ux (m/s)"
Uylab<-"Uy (m/s)"
plotmain<-"Surface current"
sfactor<-4
ref<-Current[["ref"]]
mod<-Current[["mod"]]
  
# Index
SailoR.Indices(ref,mod)

# Plot
SailoR.Plot(ref, mod, ColourList=NULL, sfactor, docenter=TRUE,
            Uxlim, Uylim, Uxlab, Uylab, plotmain, plotlegend=TRUE,
            plotRMSElegend=TRUE, plotscalelegend=TRUE,
            RMSE_legend_Rounding=2, RMSE_legend_units = " m/s",
            referenceName="Buoy")

Example output

$rad
$rad$meanU
            U             V 
-5.785112e-05  2.431770e-03 

$rad$meanV
          U           V 
0.024605265 0.007651911 

$rad$RMSE
[1] 0.1441834

$rad$sdUx
[1] 0.1271796

$rad$sdUy
[1] 0.1136317

$rad$sdVx
[1] 0.1100144

$rad$sdVy
[1] 0.09605587

$rad$Eu
          PC1         PC2
U -0.99880711  0.04882987
V -0.04882987 -0.99880711

$rad$Ev
        PC1        PC2
U 0.9118668  0.4104862
V 0.4104862 -0.9118668

$rad$Sigmau
          [,1]      [,2]
[1,] 0.1272103 0.0000000
[2,] 0.0000000 0.1135973

$rad$Sigmav
          [,1]      [,2]
[1,] 0.1132882 0.0000000
[2,] 0.0000000 0.0921721

$rad$TotVarU
[1] 0.02908681

$rad$TotVarV
[1] 0.0213299

$rad$thetau
[1] -3.092743

$rad$thetav
[1] 0.4229871

$rad$thetavu
[1] -2.669756

$rad$R2vec
[1] 0.4300532

$rad$Rvu
           U          V
U -0.8907351 -0.4545228
V -0.4545228  0.8907351

$rad$EccentricityU
[1] 0.4500795

$rad$EccentricityV
[1] 0.5814145

$rad$congruenceEOF
[1] 0.9308231


$mod
$mod$meanU
            U             V 
-5.785112e-05  2.431770e-03 

$mod$meanV
         U          V 
0.02309406 0.01086942 

$mod$RMSE
[1] 0.1329895

$mod$sdUx
[1] 0.1271796

$mod$sdUy
[1] 0.1136317

$mod$sdVx
[1] 0.0653787

$mod$sdVy
[1] 0.06430191

$mod$Eu
          PC1         PC2
U -0.99880711  0.04882987
V -0.04882987 -0.99880711

$mod$Ev
         PC1        PC2
U -0.7325463  0.6807172
V -0.6807172 -0.7325463

$mod$Sigmau
          [,1]      [,2]
[1,] 0.1272103 0.0000000
[2,] 0.0000000 0.1135973

$mod$Sigmav
           [,1]       [,2]
[1,] 0.07181743 0.00000000
[2,] 0.00000000 0.05702077

$mod$TotVarU
[1] 0.02908681

$mod$TotVarV
[1] 0.008409111

$mod$thetau
[1] -3.092743

$mod$thetav
[1] -2.392851

$mod$thetavu
[1] 0.6998919

$mod$R2vec
[1] 0.3609251

$mod$Rvu
          U          V
U 0.7649118 -0.6441350
V 0.6441350  0.7649118

$mod$EccentricityU
[1] 0.4500795

$mod$EccentricityV
[1] 0.607959

$mod$congruenceEOF
[1] 0.7649118

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