2010-05-13 32 views

Trả lời

12

Tôi sử dụng một chức năng để thực hiện điều đó và thực sự đã đặt nó trong {R directory} \ etc \ Rprofile.site để nó luôn có sẵn để sử dụng.

cls <- function() { 
     require(rcom) 
     wsh <- comCreateObject("Wscript.Shell") 
     comInvoke(wsh, "SendKeys", "\014") 
     invisible(wsh) 
} 
cls() 

Để xóa giao diện điều khiển cho

cls() 

T.B. Hàm này không hoạt động lần đầu tiên được gọi và đó là lý do tại sao tôi gọi hàm ngay sau khi khai báo nó trong Rprofile.site. Khi tôi nhớ lại, bạn có thể được yêu cầu cài đặt một số chương trình để làm việc này.

+1

Khi RCom đã ngừng hoạt động, tôi nghĩ có thể đáng giá khi chuyển sang PowerShell (hiện có trên hầu hết các hệ thống Windows) 'cls <- function() { \t hệ thống (" powershell -ExecutionPolicy Bypass -command (New-Object - ComObject Wscript.Shell) .SendKeys ([chuỗi] [char] 12) "); } ' – Antony

1

Tôi có thể thiếu điểm đáng kể, nhưng đơn giản là system("clear") một cách tiếp cận dễ dàng hơn? Tất nhiên, nó chỉ có thể được áp dụng trên môi trường Linux/Unix ...

0

Tạo chức năng này:

cls <- function() cat(rep("\n",100)) 

Sau đó gọi nó là:

cls() 

Hoạt động trên:

  • Windows
  • Linux
  • Mac
+2

Điều này không thực sự rõ ràng bảng điều khiển. Chỉ cần in 100 dòng mới. –

+0

@Siddharth. Bạn đúng. Khi tôi sử dụng cls(), ý định là để loại bỏ các lệnh trước đó, điều này đẩy chúng ra khỏi đầu màn hình. – Contango

Các vấn đề liên quan