aboutsummaryrefslogtreecommitdiff
path: root/inst/GUI/gdf-test.R
diff options
context:
space:
mode:
Diffstat (limited to 'inst/GUI/gdf-test.R')
-rw-r--r--inst/GUI/gdf-test.R12
1 files changed, 0 insertions, 12 deletions
diff --git a/inst/GUI/gdf-test.R b/inst/GUI/gdf-test.R
deleted file mode 100644
index b1ec20ae..00000000
--- a/inst/GUI/gdf-test.R
+++ /dev/null
@@ -1,12 +0,0 @@
-w <- gwindow("gdf test")
-g <- ggroup(horizontal=FALSE, cont=w)
-d <- gdf(data.frame(a=c(1.1, 2.2, 3.3), b= c("one", "two", "three"), stringsAsFactors=FALSE),
- name = "Test for editing character columns", cont=g)
-size(d) <- c(400,400)
-gbutton("Change [1,2]", handler=function(h,...) {
- d[1,2] <- "test"
-}, container=g)
-gbutton("Value of [1,2]", handler=function(h,...) {
- galert(d[1,2], parent=d)
-}, cont=g)
-visible(w) <- TRUE

Contact - Imprint