# Path to rds file
rdsfile <- system.file("extdata", "cm_vgg.rds", package="rTLsDeep")
# Read RDS fo;e
cm_vgg<-readRDS(rdsfile)
# Plot confusion matrix
gcmplot_vgg<-gcmplot(cm_vgg,
colors=c(low="white", high="#009194"),
title="densenet")
Run the code above in your browser using DataLab