library(testthat) library(weaana) library(dplyr) library(magrittr) test_check("weaana")