```{r fig.width=10,echo=FALSE} library(png) library(grid) img <- readPNG("img/TripAdvisor-logo.png") grid.raster(img) ```