Re: [R] how to clear screen in R-console?

From: Philippe Grosjean <phgrosjean_at_sciviews.org>
Date: Mon 20 Feb 2006 - 05:38:41 EST

And here is a reworked version that checks if it is RGui, if WSH is started, etc. and that returns invisibly TRUE/FALSE:

# An R function to clear the screen on RGui: cls <- function() {

	if (.Platform$GUI[1] != "Rgui")
		return(invisible(FALSE))
	if (!require(rcom, quietly = TRUE)) # Not shown any way!
		stop("Package rcom is required for 'cls()'")
	wsh <- comCreateObject("Wscript.Shell")
	if (is.null(wsh)) {
		return(invisible(FALSE))
	} else {
		comInvoke(wsh, "SendKeys", "\014")
		return(invisible(TRUE))
	}

}
#cls() # test
# If you want to make sure that it worked (well, not 100% sure, but...) res <- cls()
if (res) cat("Console should be cleared now!\n")

Best,

Philippe Grosjean

P.S.: Gabor, I would like to include this function in the SciViews bundle. Would it be a problem for you?

..............................................<}))><........
  ) ) ) ) )
( ( ( ( ( Prof. Philippe Grosjean

  ) ) ) ) )
( ( ( ( ( Numerical Ecology of Aquatic Systems
  ) ) ) ) ) Mons-Hainaut University, Pentagone (3D08)
( ( ( ( ( Academie Universitaire Wallonie-Bruxelles
  ) ) ) ) ) 8, av du Champ de Mars, 7000 Mons, Belgium ( ( ( ( (
  ) ) ) ) ) phone: + 32.65.37.34.97, fax: + 32.65.37.30.54
( ( ( ( ( email: Philippe.Grosjean@umh.ac.be
  ) ) ) ) )
( ( ( ( ( web: http://www.umh.ac.be/~econum
  ) ) ) ) ) http://www.sciviews.org ( ( ( ( (
..............................................................

Gabor Grothendieck wrote:

> Here is a version that uses rcom instead of RDCOMClient.
> This has the advantage that rcom is on CRAN.
> 
> cls <- function() {
> 	require(rcom)
> 	wsh <- comCreateObject("Wscript.Shell")
> 	comInvoke(wsh, "SendKeys", "\014")
> 	invisible(wsh)
> }
> cls() # test
> 
> On 2/17/06, Gabor Grothendieck <ggrothendieck@gmail.com> wrote:
> 
>>Here is a translation of Norm Olsen's vbscript code into pure R.
>>This is intended for use with the Windows Rgui interface.
>>
>>cls <- function() {
>>       require(RDCOMClient)
>>       wsh <- COMCreate("Wscript.Shell")
>>       wsh$SendKeys("\014")
>>       invisible(wsh)
>>}
>>cls()  # invoke
>>
>>
>>
>>On 2/17/06, Marcus Leinweber <leinweber@neuro.mpg.de> wrote:
>>
>>>have already tried this?
>>>
>>>http://finzi.psych.upenn.edu/R/Rhelp02a/archive/55752.html
>>>
>>>m.
>>>
>>>
>>>
>>>>-----Original Message-----
>>>>From: r-help-bounces@stat.math.ethz.ch
>>>>[mailto:r-help-bounces@stat.math.ethz.ch] On Behalf Of Michael
>>>>Sent: Thursday, February 16, 2006 9:23 PM
>>>>To: Henrik Bengtsson
>>>>Cc: R-help@stat.math.ethz.ch
>>>>Subject: Re: [R] how to clear screen in R-console?
>>>>
>>>>I am actually using Rgui on Windows...
>>>>
>>>>What can I do?
>>>>
>>>>There is no way to programmatically clear screen?
>>>>
>>>
>>>______________________________________________
>>>R-help@stat.math.ethz.ch mailing list
>>>https://stat.ethz.ch/mailman/listinfo/r-help
>>>PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
>>>
>>
> 
> ______________________________________________
> R-help@stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
> 
>

______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Mon Feb 20 05:44:28 2006

This archive was generated by hypermail 2.1.8 : Mon 20 Feb 2006 - 14:08:46 EST