-
Notifications
You must be signed in to change notification settings - Fork 2
/
home_info.Rmd
100 lines (80 loc) · 5.61 KB
/
home_info.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
---
title: "Info"
output:
bookdown::html_document2:
toc: false
number_sections: false
---
```{r,child="assets/header-lab.Rmd"}
```
## Location
```{r,include=FALSE}
library(yaml)
library(leaflet)
# set location in _site.yml
loc <- yaml::read_yaml("_site.yml")$location
if(loc=="lund") {
dfr <- data.frame(venue_lat=55.713394,
venue_lon=13.206628,
venue_address="<b>Department of Biology</b>,Building D, Room Retina D227, Sölvegatan 35,Lund Sweden",
description="For Lund city buses, regional buses and regional trains, [click here](https://www.skanetrafiken.se/). You can buy a ticket at the central station in Lund or at the regional bus (card only). You can also use the app [Skånetrafiken](https://www.skanetrafiken.se/om-oss/ladda-ner-appen/)",
stringsAsFactors=F)
}
if(loc=="umea") {
dfr <- data.frame(venue_lat=63.820019,
venue_lon=20.307814,
venue_address="<b>Department of Science and Mathematics Education</b>,Naturvetarhuset A,Umeå University,Universums gränd,90736 Umeå,Sweden",
description="[Umeå city buses](http://tabussen.nu/):<br>Pay your bus ticket on the bus (credit card only), or in advance in the ticket machines at Vasaplan or Umeå Airport, or at any Reseinfo centre. It is cheaper to buy the ticket in advance. You can also use the app [Ultra vill mer](https://www.tabussen.nu/ultra/biljetter/appen-ultra-vill-mer/). The bus stop in the city centre is *Vasaplan* and the stop near the course venue is *Universum*. Bus options are 2,5,8 or 9 and takes about 6-7 min.<br><br>[Airport bus](https://www.tabussen.nu/flygbussen/english/):<br>The airport bus (Bus 80) goes from the airport to *Vasaplan* (the city centre), and then passes NUS and Umeå Campus on the way back. The trip takes about 8 min from the airport to *Vasaplan*, and about 15 min the other way. It stops at *Universum* (Umeå Campus) approx. 5 min after leaving *Vasaplan*.",
stringsAsFactors=F)
}
if(loc=="uppsala") {
dfr <- data.frame(venue_lat=59.841949,
venue_lon=17.637073,
venue_address="<b>SciLifeLab</b>,Entrance C11,Biomedicinskt centrum,Uppsala University,Husargatan 3,75237 Uppsala,Sweden",
description="Use the [UL website](www.ul.se) or the [UL app](https://www.ul.se/en/tickets/how-to-buy-a-ticket/the-UL-app/) for bus and train services around Uppsala. For buses from the Centralstation (Train/Bus), take Bus 4 (towards Gottsunda Centrum) or 8 (towards Sunnersta) and get off at the stop *Uppsala Science Park*. Bus tickets can be purchased in the app or directly from the driver using a credit card.",
stringsAsFactors=F)
}
if(loc=="linkoping") {
dfr <- data.frame(venue_lat=58.402748,
venue_lon=15.578822,
venue_address="<b>Linköping University</b>,Campus Valla, C-house, Entrance 12, 581 83 Linköping, Sweden",
description="Use the [Östgötatrafiken website](https://www.ostgotatrafiken.se) or the [Östgötatrafiken app](https://www.ostgotatrafiken.se/kundservice/hur-kan-vi-hjalpa-dig/nya-appen/) for bus services around Linköping. Tickets can be bought in the app, or you can by a travel card in advance which you can load with tickets as described [here](https://www.ostgotatrafiken.se/biljetter/kopa-biljett/utan-app/). From Linköping Resecentrum, take bus 12 (towards Lambohov) or bus 543 (towards Slaka) and get off at the stop *Mäster Mattias väg*.",
stringsAsFactors=F)
}
if(loc=="solna") {
dfr <- data.frame(venue_lat=59.350451,
venue_lon=18.023393,
venue_address="<b>SciLifeLab</b>, Tomtebodavägen 23, 171 65 Solna",
description="Use the [Stockholms Län trafiken website](https://www.sl.se) or the [Stockholms Län trafiken app](https://sl.se/sl/om-sl/om-sl-appen) for bus services around Stockholm. You can find more information about the site [here](https://www.scilifelab.se/community-pages/at-campus-solna/).",
stringsAsFactors=F)
}
```
```{r,eval=TRUE,echo=FALSE,chunk.title=NULL}
if(loc!="online") {
address <- paste(unlist(strsplit(dfr$venue_address,split=",")),collapse="<br>")
leaflet(height=450,width="auto") %>%
addTiles(urlTemplate='http://{s}.tile.openstreetmap.org/{z}/{x}/{y}.png') %>%
addMarkers(lat=dfr$venue_lat,lng=dfr$venue_lon,popup=address) %>%
setView(lat=dfr$venue_lat,lng=dfr$venue_lon,zoom=15)
}
```
```{r,eval=TRUE,echo=FALSE,chunk.title=NULL,results="asis"}
if(loc=="online") {
cat("The workshop is online only. Zoom and Slack links are sent to participants by email.")
}
```
```{r,eval=TRUE,echo=FALSE,results="asis",chunk.title=NULL}
if(loc!="online") {
cat("## Travel info")
cat("\n",dfr$description)
}
```
### Lunch
The lunches during the course will be provided at **Cafe Bryggan** located at **IKDC Building** which is 5 minutes walk from the course location. The location of the restaurant is [here](https://goo.gl/maps/94UhgmtaEw4396857).
### Dinner
The restaurant for the dinner on the 2nd day will be at [Valvet Steakhouse](https://goo.gl/maps/rMfdSM79ddTodzxE9).
## Contact
This workshop is run by the **National Bioinformatics Infrastructure Sweden (NBIS)**. NBIS is a platform that is part of **SciLifeLab**.
If you would like to get in touch with us regarding this workshop, please contact us at **edu.plotting.r@nbis.se**.
If you would like to get in touch with us regarding the course at GitHub, kindly write to us at the [issues](https://github.com/NBISweden/workshop-data-visualization-r/issues) page.
***