img.file <- file.path( R.home("doc"), "html", "logo.jpg" )
dat <- head(iris)
dat$Species <- as.character(dat$Species)
dat[c(1, 3, 5), "Species"] <- img.file
myft <- flextable( dat)
myft <- colformat_image(
myft, i = c(1, 3, 5),
j = "Species", width = .20, height = .15)
ft <- autofit(myft)
ft
Run the code above in your browser using DataLab