knitr::opts_chunk$set( collapse = TRUE, comment = "#>" ) setwd("~/MISSIONS/Shiny_demo/fifa2019demo")
club_coord <- read.csv("www/data/club_coordinates.csv", stringsAsFactors = FALSE, encoding = 'UTF-8') length(unique(fifa2019_raw$Club)) sum(unique(fifa2019_raw$Club) %in% club_coord$clubLabel)
setwd("~/MISSIONS/Shiny_demo/fifa2019demo") fifa2019_raw <- read.csv("", stringsAsFactors = FALSE, sep = ",", header = TRUE, quote = "\"")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.