---
title: "Wikileaks Twitter DM - Home"
author: '@_colinfay'
date: "`r Sys.Date()`"
fig_width: 10
fig_height: 4
navlink: "[Wikileaks Twitter DM](https://colinfay.me/wikileaksdm)"
og:
type: "article"
title: "Wikileaks Twitter DM"
footer:
- content: 'colinfay.me • @_colinfay
'
output: markdowntemplates::skeleton
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE, message = FALSE, warning = FALSE)
source("funs.R")
```
`r shiny::includeMarkdown("intro.Rmd")`
## The datasets:
### List of all DMs
A dataset with 3 columns:
+ text: extracted text
+ date: date of the dm
+ user: user who sent the dm
#### `r fa("download")` [wikileaks_dm.csv](wikileaks_dm.csv)
```{r}
full <- read_csv("wikileaks_dm.csv")
full %>%
dt()
```
`r shiny::includeMarkdown("outro.Rmd")`