knitr::opts_chunk$set(echo = TRUE)
Network analysis in test results in R
# Install from GitHub # install.packages('devtools') devtools::install_github('Wences91/testnet')
Read data.
# import data answers <- read.delim('data/answers.tsv', stringsAsFactors = FALSE, check.names = FALSE) categories <- read.delim('data/categories.tsv', header = FALSE, colClasses = c('character'), stringsAsFactors = FALSE, check.names = FALSE) c_answers <- read.delim('data/correct_answers.tsv', header = FALSE, colClasses = c('character'), stringsAsFactors = FALSE, check.names = FALSE)
Obtain edges and create co-fails network.
edges <- testnet::obtain_edges(answers, c_answers, avoid = c('13', '64', '47')) tm_net <- testnet::co_fails(edges)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.