library(stringr)
library(magick)
## Linking to ImageMagick 6.9.12.93
## Enabled features: cairo, fontconfig, freetype, heic, lcms, pango, raw, rsvg, webp
## Disabled features: fftw, ghostscript, x11
#2.1 My working directory of my running R
getwd()
## [1] "/Users/meiyaoli/My Drive/[01]-School-work/AU23-INFO201/Labs"
#2.2 See drawing
#2.3 abs path to current working directory
"/Users/meiyaoli/My Drive/[01]-School-work/AU23-INFO201"
## [1] "/Users/meiyaoli/My Drive/[01]-School-work/AU23-INFO201"
#3.2 relative path from current working directory
"../Pictures/Mayocat.jpg"
## [1] "../Pictures/Mayocat.jpg"
#3.3 display that image in RStudio
pic1 <- image_read("/Users/meiyaoli/My Drive/[01]-School-work/Pictures/Mayocat.jpg")
par(mar=c(0,0,0,0))
plot(pic1)

#3.4 display pdf in Rstudio
#install.packages("pdftools")
pdf1 <- image_read_pdf("/Users/meiyaoli/My Drive/[01]-School-work/AU23-MATH126/Calculus 3.pdf/")
par(mar=c(0,0,0,0))
plot(pdf1)