2010-05-13 87 views

回答

12

我使用這樣做的函數,實際上已經把它放在{R目錄} \ etc \ Rprofile.site中,以便它始終可用。

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

要清除控制檯給

cls() 

附:該函數在第一次調用時不起作用,這就是爲什麼在Rprofile.site中聲明它之後立即調用該函數的原因。據我記得,你可能會被要求安裝一些程序,爲了這個工作。

+1

由於RCom已經停產,我認爲可能值得將其移植到PowerShell(在大多數Windows系統上可用)'cls < - function(){{ ComObject Wscript.Shell).SendKeys([string] [char] 12)「); }' – Antony 2016-06-20 21:56:31

1

我可能會大大忽略這一點,但很簡單,system("clear")更簡單的方法?當然,它只能在Linux/Unix環境中使用...

0

創建此功能:

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

然後調用它:

cls() 

作品有:

  • Windows
  • Linux
  • Mac
+2

這實際上並沒有清除控制檯。只需打印100個新行。 – 2014-01-26 04:46:45

+0

@Siddharth。你是對的。當我使用這個cls()時,意圖是擺脫先前的命令,這將它們推離屏幕的頂部。 – Contango 2014-01-27 07:49:28