juba

juba

library(quanteda)
library(rainette)
library(scatterD3)
library(ggplot2)


## Classification sur segments
corpus <- corpus_subset(data_corpus_inaugural, Year > 1970)
corpus <- split_segments(corpus)
dtm <- dfm(corpus, remove = stopwords("en"), tolower = TRUE, remove_punct = TRUE)

juba

## Generate unique id for this table
tab_id <- paste0("mytab_", session$token)


output$table <- DT::renderDT({

  ## Enable stateSave and configure callbacks to save and restore state 
  ## to/from sessionStorage
  options <- list(
    stateSave = TRUE, 

juba

library(tidyverse)
library(questionr)

## On recrée le tableau d'exemple
df <- tibble(
  producteur = c("Bénévole",
                "Rémunérée",
                "Rémunérée, Bénévole",
                "Bénévole, Rémunérée",
                "Rémunérée")

juba

#Sys.setenv(DEBUGME = "crrri")
#library(debugme)

library(promises)
library(crrri)
library(purrr)
library(dplyr)
library(progress)

juba

---
title: "test"
date: "19 septembre 2017"
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
library(knitr)
library(questionr)

juba

trelliscopejs examples with other widgets

Others in the series:

• https://bl.ocks.org/timelyportfolio/c73fe44ffff242f80210d5b8841ab9e2

scatterD3

Here is some code for trelliscopejs combined with scatterD3.

juba

Keybase proof

I hereby claim:

• I am juba on github.
• I am juba (https://keybase.io/juba) on keybase.
• I have a public key ASDAzg5CXE1U1vvPwsG0XS8_MsMPzhAsq3I6TNY4LI2I1Qo

To claim this, I am signing this object:

juba

license: gpl-3.0

juba

library(questionr)
library(ggplot2)

data(hdv2003)

ggplot(data=hdv2003, aes(y=age, x=sexe, fill=hard.rock)) + 
  geom_boxplot(position=position_dodge(width=2/3)) +
  geom_point(stat="summary", fun.y=mean, shape=21, position=position_dodge(width=2/3))