cách đưa hộp thoại select.file() vào mặt trước

Question

Tôi đang sử dụng hàm choose.dir() trong tập lệnh được chạy bằng rscript.exe trong Windows XP. Vấn đề là hộp thoại chọn thư mục không bật lên như một cửa sổ cấp cao nhất. Làm thế nào tôi có thể mang lại cuộc đối thoại với tiền cảnh?

Trong thời gian chờ đợi, tôi đã giải quyết được sự cố của mình bằng cách sử dụng tập lệnh hình ảnh cơ bản. Tất nhiên, điều này chỉ làm việc với các cửa sổ:

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

Sau khi tìm kiếm các tài liệu lưu trữ rhelp dường như câu trả lời là bạn không thể sử dụng choose.dir và file.choose trong một phiên không tương tác. Bạn có thể làm điều gì đó tương tự, vì list.files, file.info, file.access và files có thể được sử dụng để thu thập thông tin, bạn có thể hiển thị điều này bằng cách ghi vào thiết bị đồ họa và thực hiện cuộc gọi system() để hiển thị và readLines có thể được sử dụng để nhận dữ liệu nhập của người dùng.