-
Notifications
You must be signed in to change notification settings - Fork 0
/
data_summary.Rmd
146 lines (100 loc) · 3.84 KB
/
data_summary.Rmd
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
---
title: "Summary of WP1 data products"
author: "Robert Schlegel"
date: '`r format(Sys.Date(), "%d %B %Y")`'
output: workflowr::wflow_html
editor_options:
chunk_output_type: console
# css: acid.css
# csl: frontiers.csl
# bibliography: FACE-IT.bib
---
```{r global_options, include = FALSE}
knitr::opts_chunk$set(fig.width = 8, fig.align = 'center',
echo = FALSE, warning = FALSE, message = FALSE,
eval = TRUE, tidy = FALSE)
```
<center>
<!-- ![](assets/FACE-IT_Logo_900.png){ width=70% } -->
</center>
# Overview
```{r setup}
# Necessary libraries
source("code/functions.R")
# Table column names
# DT_cols <- c("Type", "Driver", "Date", "Longitude", "Latitude", "Depth", "Files", "Link", "Reference", "Notes")
# Datatable options for all tables
# options(DT.options = list(pageLength = 5,
# # autoWidth = TRUE,
# # This chunk of code only allows six characters to be shown in a column
# # But it interferes with the HTML code for popups and links
# # columnDefs = list(list(
# # targets = list(9),
# # render = JS(
# # "function(data, type, row, meta) {",
# # "return type === 'display' && data.length > 6 ?",
# # "'<span title=\"' + data + '\">' + data.substr(0, 6) + '...</span>' : data;",
# # "}"))),
# # columnDefs = list(list(width = '20%', targets = c(2))),
# deferRender = TRUE,
# # scrollX = TRUE,
# scrollY = 400,
# scrollCollapse = TRUE,
# lengthMenu = c(5, 10, 25, 50, 100)))
```
# Overview
This document contains a summary of the data products produced for WP1 of the FACE-IT project. These data are available to all FACE-IT members via password protected pCloud access. These data are also used in the [meta-analysis review](https://face-it-project.github.io/WP1/review.html) of the key drivers of change to arctic fjord ecosystems.
# European Arctic
# Svalbard
## Kongsfjorden
```{r kong-summary, fig.height=15, width = 10}
# Load full product
load("~/pCloudDrive/FACE-IT_data/kongsfjorden/full_product_kong.RData")
# Summary plot
data_summary_plot(full_product_kong, "Kongsfjorden")
```
## Isfjorden
```{r is-summary, fig.height=15, width = 10}
# Load full product
load("~/pCloudDrive/FACE-IT_data/isfjorden/full_product_is.RData")
# Summary plot
data_summary_plot(full_product_is, "Isfjorden")
```
## Inglefieldbukta
```{r ingle-summary, fig.height=15, width = 10}
# Load full product
load("~/pCloudDrive/FACE-IT_data/inglefieldbukta/full_product_ingle.RData")
# Summary plot
data_summary_plot(full_product_ingle, "Inglefieldbukta")
```
# Greenland
## Young Sound
```{r young-summary, fig.height=15, width = 10}
# Load full product
load("~/pCloudDrive/FACE-IT_data/young_sound/full_product_young.RData")
# Summary plot
data_summary_plot(full_product_young, "Young Sound")
```
## Disko Bay
```{r disko-summary, fig.height=15, width = 10}
# Load full product
load("~/pCloudDrive/FACE-IT_data/disko_bay/full_product_disko.RData")
# Summary plot
data_summary_plot(full_product_disko, "Disko Bay")
```
## Nuup Kangerlua
```{r nuup-summary, fig.height=15, width = 10}
# Load full product
load("~/pCloudDrive/FACE-IT_data/nuup_kangerlua/full_product_nuup.RData")
# Summary plot
data_summary_plot(full_product_nuup, "Nuup Kangerlua")
```
# Norway
## Porsangerfjorden
```{r por-summary, fig.height=15, width = 10}
# Load full product
load("~/pCloudDrive/FACE-IT_data/porsangerfjorden/full_product_por.RData")
# Summary plot
data_summary_plot(full_product_por, "Porsangerfjorden")
```
# References