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')
ModelOriented/CorrGrapheR documentation built on Oct. 14, 2020, 9:48 p.m.