首先，我使用以下代码读取图像： img<-rea…