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. 11, 2020, 12:50 a.m.