knitr::opts_chunk$set(echo = TRUE) library(BMDK) library(magrittr) library(rpart)
dat <- read_bmdk(system.file('extdata', 'BMDK_train.txt', package = 'BMDK')) %>% clean_bmdk() %>% detectOutliers_bmdk() %>% filter_bmdk() %>% pickFeatures_bmdk() %>% removeFeatures_bmdk() %>% buildClassifer_bmdk() #%>% # validate_bmdk()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.