tests/testthat/test_plot.R

context('plot working properly')

df <- as.data.frame(datasets::Seatbelts)
df <- df[,1:(ncol(df)-1)]

expect_is(plot(corrgrapher(df)), 'visNetwork')
MrDomani/CorrGrapheR documentation built on Oct. 16, 2020, 6:16 a.m.