# NOT RUN {
logo <- read_x3p(system.file("csafe-logo.x3p", package="x3ptools"))
dim(logo$surface.matrix)
# }
# NOT RUN {
image_x3p(logo)
# }
# NOT RUN {
# transpose the image
logotp <- transpose_x3p(logo)
dim(logotp$surface.matrix)
# }
# NOT RUN {
image_x3p(logotp)
# }
Run the code above in your browser using DataLab