tclVarFun: Manipulate R variables and functions from tcl and back
In tcltk2: Tcl/Tk Additions

Description Usage Arguments Details Value Author(s) See Also Examples

These functions are intended to provide a better "duality" between the name of variables in both R and tcl, including for function calls. It is possible to define a variable with the same name in R and tcl (the content is identical, but copied and coerced in the two respective environments). It is also possible to get the value of a tcl variable from R, and to call a R function from within tcl. These functionnalities are provided in the tcltk package, but Tcl variable usually have different internal names as R equivalents.

makeTclNames(names, unique = FALSE)
tclFun(f, name = deparse(substitute(f)))
tclGetValue(name)
tclSetValue(name, value)
tclVarExists(name)
tclVarFind(pattern)
tclVarName(name, init = "", keep.existing = TRUE)

`names`	transform names so that they are valid for variables in Tcl.
`unique`	should these names be unique in the vector?
`f`	an R function. currently, do no support functions with arguments.
`name`	the name of a variable.
`value`	The value to place in a variable.
`pattern`	a pattern to search for.
`init`	initial value to use when creating the variable.
`keep.existing`	if the tcl variable already exist, should we keep its content?

These functions are similar to tclVar() from package tcltk, except for the following change: here, it is possible to propose a name for the created tcl variable, or to set or retrieve the content of a tcl variable that is not mirrored in R.

Most of these functions return a tclVar object.

Philippe Grosjean

tk2edit

## Not run: 
## These cannot be run by examples() but should be OK when pasted
## into an interactive R session with the tcltk package loaded

## Tcl functions and variables manipulation
tclVarExists("tcl_version")
tclVarExists("probably_non_existant")
tclVarFind("tcl*")

## Using tclVarName() and tclGetValue()...
## intented for better match between R and Tcl variables
Test <- tclVarName("Test", "this is a test!")
## Now 'Test' exist both in R and in Tcl... In R, you need to use
tclvalue(Test) # to retrieve its content
## If a variable already exists in Tcl, its content is preserved using
## keep.existing = TRUE
	
## Create a variable in Tcl and assign "just a test..." to it
tclSetValue("A_Variable", "just to test...")
## Create the dual variable with same name
A_Variable <- tclVarName("A_Variable", "something else?")
tclvalue(A_Variable) # Content of the variable is not changed!

## If you want to retrieve the content of a Tcl variable,
## but do not want to create a reference to it in R, use:
    
## Create a Tcl variable, not visible from R
tclSetValue("Another_Variable", 1:5)
tclGetValue("Another_Variable") # Get its content in R (no conversion!)
tclSetValue("Another_Variable", paste("Am I", c("happy", "sad"), "?"))
tclGetValue("Another_Variable") # Get its content in R (no conversion!)

## End(Not run)

Loading required package: tcltk
Warning message:
no DISPLAY variable so Tk is not available 
[1] TRUE
[1] FALSE
[1] "tcl_version"    "tcl_pkgPath"    "tcl_patchLevel" "tcl_platform"  
[5] "tcl_library"   
[1] "this is a test!"
[1] "just to test..."
[1] "1 2 3 4 5"
[1] "{Am I happy ?} {Am I sad ?}"