cómo llevar el diálogo choose.file() al primer plano

Question

Estoy usando la función choose.dir() en un script que se ejecuta con rscript.exe bajo Windows XP. El problema es que el diálogo de selección de directorio no aparece como una ventana de nivel superior. ¿Cómo puedo llevar el diálogo al primer plano?

Mientras tanto, resolví mi problema usando una secuencia de comandos visual básica. Por supuesto, esto sólo funciona con Windows:

tf <- tempfile(fileext = '.vbs') 
cat('Set folder = CreateObject("Shell.Application") _ 
     .BrowseForFolder(0, "Please choose a folder" _ 
     , &H0001, 17) 
     Wscript.Echo folder.Self.Path 
', file = tf) 
tail(shell(paste('Cscript', tf), intern = T), 1) 

Answer 1

Después de buscar los archivos rhelp parece que la respuesta es que no se puede utilizar choose.dir y file.choose en una sesión no interactiva. Es posible que pueda hacer algo similar, ya que list.files, file.info, file.access y files se pueden usar para recopilar información, puede mostrar esto escribiendo en un dispositivo gráfico y ejecutando una llamada al sistema() para que se muestre y readLines puede utilizado para obtener la entrada del usuario.