# NOT RUN {
file_path <- system.file("img", "example.png", package = "tkImgR")
tt <- tkImShow(file_path)
if (!identical(tcltk::tclRequire("Img", warn = FALSE),FALSE)){
file_path1 <- system.file("img", "example.jpg", package = "tkImgR")
tt <- tkImShow(file_path1)
}
# }
Run the code above in your browser using DataLab