netlogo - ¿Cómo puedo mover una tortuga lo más cerca posible de un parche determinado?

Tengo un solo parche azul y me gustaría mover una tortuga al parche vacío más cercano. La única manera que se me ocurre de hacer esto es usando el radio en un bucle, aumentando el tamaño del radio en uno cada vez, pero ¿hay una mejor manera?

globals [bluey]

to setup
  ca
  ask one-of patches [set pcolor blue set bluey self]
  ask n-of 250 patches [sprout 1]
end

to-report nearest-empty [#patch]
  report min-one-of 
         [other (patches with [not any? turtles-here])] of #patch
         [distance #patch]
end

to test
  setup
  ;the following fails if all patches occupied
  ;(can add a test for nobody)
  ask nearest-empty bluey [set pcolor red]
end