Format image paths as images in a flextable.
Usage
colformat_image(
x,
i = NULL,
j = NULL,
width,
height,
na_str = get_flextable_defaults()$na_str,
nan_str = get_flextable_defaults()$nan_str,
prefix = "",
suffix = ""
)
See also
Other cells formatters:
colformat_char()
,
colformat_date()
,
colformat_datetime()
,
colformat_double()
,
colformat_int()
,
colformat_lgl()
,
colformat_num()
,
set_formatter()
Examples
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
Sepal.Length
Sepal.Width
Petal.Length
Petal.Width
Species
5.1
3.5
1.4
0.2
4.9
3.0
1.4
0.2
setosa
4.7
3.2
1.3
0.2
4.6
3.1
1.5
0.2
setosa
5.0
3.6
1.4
0.2
5.4
3.9
1.7
0.4
setosa