-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathcourse-resources.Rmd
176 lines (106 loc) · 6.38 KB
/
course-resources.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
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
---
title: "**Course Resources**"
output:
html_document:
includes:
in_header: header.html
editor_options:
chunk_output_type: console
---
```{r, include=FALSE}
knitr::opts_chunk$set(echo = FALSE, warning=FALSE, error = FALSE, message = FALSE)
library(dplyr)
# devtools::install_github("privefl/googlesheets")
library(googlesheets)
# install.packages(c("leaflet", "DT"))
library(leaflet)
library(DT)
```
<div class = "row">
<div class = "col-md-6">
```{r, include=FALSE, fig.width=25}
members<-data.frame("Name" = c("Caitlin Allen Akselrud", "Emily Markowitz"),
"First Name" = c("Caitlin", "Emily"),
"Last Name" = c("Allen Akselrud", "Markowitz"),
"github" = c("CaitlinAkselrud-NOAA", "EmilyMarkowitz-NOAA"),
"lat" = c(47.6863055, 47.6863055),
"lon" = c(-122.257055, -122.257055),
"Institution" = c("Eastern Bering Sea Group",
"Eastern Bering Sea Group"))
members$imagelink<-members$githublink<-NA
members$Status<-"Presenter"
for (i in 1:nrow(members)) {
# if (!(members$github[i] %in% "")) {
members$githublink[i]<-paste0("https://github.com/", members$github[i])
members$imagelink[i]<-paste0("./images/", gsub(pattern = " ", replacement = "",
x = members$Name[i]), ".png")
}
members$GitHub<-members$githublink
members$Website<-members$githublink
membersgit<-members[!(members$github %in% ""),]
membersnogit<-members[(members$github %in% ""),]
library(glue)
membersgit<-as_tibble(membersgit)
print0<-glue_data(.x = membersgit, .sep = "",
'
![{githublink}]({imagelink})')
# `r print0 `
```
```{r}
library(leafpop)
library(maps)
mapStates = map("state", fill = TRUE, plot = FALSE)
leaflet(width = "100%") %>%
addTiles() %>%
addMarkers(lng=members$lon, lat=members$lat, group = "points",
popup=paste("<b> NOAA Fisheries, Alaska Fisheries Science Center </b>
<br/> Resource Assessment and Conservation Engineering Division <br/> "))
```
</div>
<div class = "col-md-6">
## Instructor contacts:
*The course instructors will hold office hours during the remaining time of every class (~1.5 hours), and are also available via email.*
#### **Caitlin Allen Akselrud**
Research Fisheries Biologist
GitHub: @CaitlinAkselrud-NOAA
#### **Emily Markowitz**
Research Fisheries Biologist
GitHub: @EmilyMarkowitz-NOAA
</div>
</div>
## Course info
This course is being taught January-Feburary 2021 virtually over WebEx. For WebEx information, please contact the course instructors. Lessons will be recorded and shared as soon as they become available via links from google drive.
## Course content
A [github website](https://emilymarkowitz-noaa.github.io/FishR101/) and repositories will be set up for each lesson. More details will be shared soon and during our first lesson.
*Fun fact you might have already guessed: this whole website was built using R! (Check out the code we used to create it [here](https://github.com/emilymarkowitz-NOAA/FishR101)).*
## How to access course materials
Follow this guide to help you [download course materials](https://docs.google.com/presentation/d/1C855dzCUu25-45f4rLHJc56hkBTS309JC_cNRa_lItM/edit?usp=sharing) from GitHub so you can follow along with the course. Feel free to comment or suggest edits to make this more helpful and straight forward for other classmates.
We post material on GitHub because it is an easy way to push and pull changes directly from R. This is beyond the scope of the course, be we are more than happy to talk more about how great GitHub is during office hours or outside of class.
## Course structure:
- 3.5 hours (including breaks), 2x/wk, 5 weeks
- Review HW from previous lesson ~10 mins
- Introduce new materials ~40 min
- Interactive learning ~40 min
- Homework assignment (about ½ hour of work) ~30 mins (assigned for next meeting)
- Open time for help from instructors (on hw or otherwise) ~ 1.5 hrs
## Assignments
Assignments are for the student's benefit and no grades will be collected. Assignments are intended to give students the opportunity to practice and explore the material and reinforce lesson material. Ideally, homeworks should take 30 minutes or less to complete. Time will be available after each lesson to assist with questions.
## Course pep-talk
We want you to be able to really *learn* in this course! We want this to be a safe space to ask questions, help one another, and have no one feel like they are being left behind. If you feel like it is moving too fast, come to office hours or please let us know. We (and the other students) are some of your many resources. R is not intuitive or easy to learn, but once you get over the hump, opportunities are boundless. Please, *do not* hesitate to reach out! If you ever want to let us know how you are doing anonymously, please share your thoughts in this [feedback form](https://emilymarkowitz-noaa.github.io/FishR101/feedback.html).
<div class = "row">
<div class = "col-md-6">
### Oh no, not what we want:
![Woah-cakes, what?](images/draw-an-owl.jpg){width=75%}
</div>
<div class = "col-md-6">
### Yes, this is what we want!
![Why we are really here, amiright?](images/ComeForReproStayForScience.jpg){width=75%}
</div>
</div>
## Inclusion, access, and accommodations:
We strive to create a learning environment that supports a diversity of thoughts, perspectives, and experiences. If something was said in class (by anyone) that made you feel uncomfortable, please talk to us about it or reach out to the AFSC Team for Inclusion, Diversity, and Equity (TIDE) directly (email contact: [email protected]) or anonymously. Additional resources are also available on the TIDE intranet site: https://sites.google.com/a/noaa.gov/afsc-home/home/diversity-inclusion.
There is also a copy of the AFSC Code of Conduct in the Resources folder of our shared Google Drive.
All attendees deserve access to the full range of learning experiences, and we are committed to creating inclusive and accessible learning environments consistent with federal laws. Please communicate your accommodation requirements to us at your earliest convenience so we can discuss your needs for this course.
*This page was last updated `r format(Sys.time(), "%A %B %d %Y %X %Z")`*