У меня есть код, который обрезает изображение, но когда я помещаю его в функцию, он выдает сообщение об ошибке Error in NextMethod() : object 'min.x' not found.
Вот небольшой воспроизводимый пример:
dog<-load.image("https://images.all-free-download.com/images/graphiclarge/hound_54346.jpg")
# this works
start = 0
plot(as.cimg(dog[start:170,50:200]))
# this doesn't work
get_side_profile<-function(dog_image){
min.x<-0
return(as.cimg(dog_image[min.x:170,50:200]))
}
get_side_profile(dog)
Я хочу, чтобы это было функцией, потому что мне нужно обрезать несколько изображений. У меня есть переменная min.x, чтобы выяснить, где начать обрезку. Код для min.x не отображается.
Любой совет приветствуется.