search for: invisible

Hi, I stumbled across the following (unexpected for me) behavior after replacing a return() statement in the middle of a function by invisible(). Example: foo <- function() { cat("before\n"); return(); cat("after\n")} >foo() before NULL foo2 <- function() { cat("before\n"); invisible(TRUE); cat("after\n")} >foo2() before after I expected invisible to have the same behavior as return,...

Evaluate the following example to get the behavior : --- anybody: patch ? --- tst.i <- function(x) { if(missing(x)) return(invisible()) else if(!is.numeric(x)) stop("x must be numeric") ## else invisible((x+3)^2) } tst.i()#-- should NOT print anything !! print(mode(tst.i()))#--gives "NULL" both in S-plus 3.4 and R 0.60 tst.i(1)# nothing (ok in R and S-plus) 1 + tst.i(1) #> 17 =-=-=-=-=-=-=-=-=-=-...

Suppose we have a function such as the following F <- function(f, x) f(x)+1 which runs function f and then transforms it. I would like the corresponding function which works the same except that unlike F returns an invisible result if and only if f does. Is there some way of determining whether f returns an invisible result or not? Thus we want this: f <- function(x) x g <- function(x) invisible(x) > F(f, 1) 2 > > F(g, 1) >

...to be called before calling the functions. ###plot.MFA2 Function plot.MFA2<- function (x, axes = c(1, 2), choix = "ind", ellipse = NULL, ellipse.par = NULL, lab.grpe = TRUE, lab.var = TRUE, lab.ind.moy = TRUE, lab.par = FALSE, habillage = "ind", col.hab = NULL, invisible = NULL, partial = NULL, lim.cos2.var = 0, chrono = FALSE, xlim = NULL, ylim = NULL, cex = 1, title = NULL, palette = NULL, new.plot = TRUE, ...) { res.mfa <- x if (!inherits(res.mfa, "MFA")) stop("non convenient data") if (is.null(palette))...

...it and improve it. It''s a bit rough around some of it''s edges, and I realize, that there still is much left to be done, but it has served me well already in my daily Rails work, and in getting my students up to speed. A blog entry (with link to the PDF) is here: http://blog.invisible.ch/ 2006/05/01/ruby-on-rails-reference/ and the source is in the SVN repository, right here: http:// invisible.ch/projects/browser/rails-seminar/doc Comments, additions, corrections & patches welcome! Jens-Christian -- InVisible GmbH http://www.invisible.ch http://blog.invisible.ch

{Nothing really harmful; R 1.1.0} dim(.) sets (or doesn't clear) the ``invisible flag'' for printing in certain circumstances: > dim(a <- cbind(1)) > does *not* print as it should : > dim(a) [1] 1 1 --- Question to the real "hackers" : How can I check this using R code alone (not using files), i.e. (how) can I ask an R expression if i...

Dear R Core devs, I wonder if it makes sense to make function file.rename return invisible? This is not a big issue, but when running in RMarkdown or knitr, this function will print results. I have to manually call invisible to hide the output from showing in the final document: ```r invisible(file.rename(...)) ``` Otherwise knitr will print: ``` file.rename(...) #> TRUE ``` If th...

...llowing components. threshold The x axis values. meanExcess The y axis values. Each value is a sample mean minus a value u. " So my question is, how can I see (or even export) threshold and meanExcess? Thanks, F -- View this message in context: http://r.789695.n4.nabble.com/Return-invisible-list-tp3652323p3652323.html Sent from the R help mailing list archive at Nabble.com.

I thought that invisible works like return() However, it appears that it doesn't exit a function. Is it supposed to work this way? funInvisible = function(){ invisible(10) cat('I was not expecting this to print\n') cat('because it occurs after the invisible return\n') } funInvisible() f...

Hi Team, After performing the gluster clean up and again doing gluster configuration the sub directories become invisible. Even after they are present the directories are invisible. If I create a new directory by the same name it will say the directory already exists. Thanks & Regards, Sangeeta Ramapure -------------- next part -------------- An HTML attachment was scrubbed... URL: <http://lists.gluster.o...

...osition in the file. This is a significant change of behavior from R-3.4.4. Below is a test case that I used to home in on the problem. --- p<-"test2.txt" cat("abcdefg hijklmn opqrstu",file=p) cat("read char after readline (h)\n") con <- file(p,"r") invisible(readLines(con,1)) print(readChar(con,1)) close(con) cat("read char after readline and seek (h)\n") con <- file(p,"r") invisible(readLines(con,1)) invisible(seek(con,seek(con))) print(readChar(con,1)) close(con) cat("read lines after readline (hijklmn)\n") con <...

...eta Ramapure > > > > *From:* Sangeeta Ramapure [mailto:sangeeta.ramapure at globallogic.com] > *Sent:* June 09, 2017 4:41 PM > *To:* 'gluster-users at gluster.org' > *Cc:* 'devarajan at ericsson.com' > *Subject:* After gluster clean up sub directories becomes invisible > > > > Hi Team, > > > > After performing the gluster clean up and again doing gluster > configuration the sub directories become invisible. Even after they are > present the directories are invisible. If I create a new directory by the > same name it will say the d...

Contrary to, say, Sys.setenv(), Sys.setlocale() returns it's value visibly. This means that if you for instance add: Sys.setlocale("LC_COLLATE", "C") to your .Rprofile file, it will print: [1] "C" at startup. The workaround is to wrap the call in invisible(), but I'd argue that any "setter" function should return invisibly. Some more details: > withVisible(Sys.setlocale("LC_COLLATE", "C")) $value [1] "C" $visible [1] TRUE > withVisible(Sys.setenv(FOO = "C")) $value [1] TRUE $visible [1]...

...ssue. Thanks & Regards, Sangeeta Ramapure *From:* Sangeeta Ramapure [mailto:sangeeta.ramapure at globallogic.com] *Sent:* June 09, 2017 4:41 PM *To:* 'gluster-users at gluster.org' *Cc:* 'devarajan at ericsson.com' *Subject:* After gluster clean up sub directories becomes invisible Hi Team, After performing the gluster clean up and again doing gluster configuration the sub directories become invisible. Even after they are present the directories are invisible. If I create a new directory by the same name it will say the directory already exists. Thanks & Regard...

Running "as.character" on a large POSIXct causes a segfault on my 2.11 (2010-04-22) install. Seems to crash at around 9e4 ... on OSX and Ubuntu at least. > invisible(as.character(Sys.time()+1:7e4)) > invisible(as.character(Sys.time()+1:8e4)) > invisible(as.character(Sys.time()+1:9e4)) Error: segfault from C stack overflow > invisible(as.character(Sys.time()+1:5e5)) Error: segfault from C stack overflow Thanks, Jeff > sessionInfo() R version 2.11...

...use client. After an unexpected system reboot, some files are disappeared from fuse mount point but still available on the bricks. The way it disappeared confusing me a lot. I can't see certain directories using ls -la but, at the same time, can cd into the missed directory. I can rename the invisible directory and it becomes accessible. When I renamed it back to the original name, it becomes invisible. I also tried to mount the same volume into another location and run ls hoping that selfheal will fix the problem. Unfortunately, it did not. Is there a way to bring our storage to normal? glus...

Hi, My samba server "linux-1" (samba-3.0.2-7.FC1) has suddenly become invisible from all windows client. The samba server is a member of the "RASKNO" workgroup and was visible when browsing the workgroup from windows clients a few weeks ago. The weird thing is that it is now invisible. The only changes has been regular updates of FC1. The symptoms is that I can se...

I think this is a more problematic buglet in (implicit/explicit) ``invisible behavior''). Try this (all versions of R from 0.49 to 0.60): test0 <- function() c(1,2) test <- function(two = FALSE) c(1, if(two) 2) testR <- function(two = FALSE) return(c(1, if(two) 2)) test0()# 1 2 as it should test() # <<<<<<<<<<<...

Dear R devel list I was wondering whether zip() contains a windows specific call to system(), as the argument "invisible" seems to be windows specific, yet is used anytime by zip: invisible(system2(zip, args, invisible = TRUE)) Indeed, calling zip() on Linux results in a warning message: > file.create("try") [1] TRUE > zip("try.zip", "try") adding: try (stored 0%...

I''m happy to announce a two day RubyOnRails Workshop in Switzerland, 27.-28. February 2006. Details can be found here: http://www.invisible.ch/static/47/ rubyonrailsschulung (german) cheers Jens-Christian -- InVisible GmbH, Langgr?tstrasse 172, 8047 Z?rich Phone: +41 44 401 09 30 http://www.invisible.ch http://not.invisible.ch -------------- next part -------------- A non-text attachment was scrubbed... Name: smime.p7s Type: appl...