[R] function to avoid <<-

[Hadley Wickham]

At the top level do:

myenv <- new.env(parent = emptyenv())

Then in your functions do

myenv$x <- 50
myenv$x

etc

You also should not be using data() in that way. Perhaps you want
R/sysdata.rda. See http://r-pkgs.had.co.nz/data.html for more details.

Hadley

On Tue, Dec 2, 2014 at 2:28 AM, Karim Mezhoud <kmezhoud at gmail.com> wrote:
> Dear All,
>
> I am writing a GUIpackage that needs global variables.
> I had many warning message when I checked the code as for example:
> geteSet: no visible binding for global variable ‘curselectCases’
> I would like to write a function that creates a global place for Objects to
> be loaded as:
>
>
> Fun <- function(){
>
> Object <- 5
>
> Var2Global <- function(Object){
> .myDataEnv <- new.env(parent=emptyenv()) # not exported
> isLoaded <- function(Object) {
>     exists(Object, .myDataEnv)
> }
> getData <- function(Object) {
>     if (!isLoaded(Object)) data(Object, envir=.myDataEnv)
>     .myDataEnv[[Object]]
> }
> }
>
> }
>
> To avoid the use of:  Object <<- 5
>
> but it seems not working yet. Object == 5 is not a global variable after
> running Fun().
>
> Any Idea?
> Thanks
>   Ô__
>  c/ /'_;~~~~kmezhoud
> (*) \(*)   ⴽⴰⵔⵉⵎ  ⵎⴻⵣⵀⵓⴷ
> http://bioinformatics.tn/
>
>         [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.



-- 
http://had.co.nz/