Displaying 1 result from an estimated 1 matches for "removecolumn".
Did you mean:
remove_column
2009 May 27
0
invisible columns
...tk2 -- if you are
> using gWidgetstcltk let me know and I'll find something similar) as
> follows:
>
> library(gWidgets)
> library(RGtk2) ## load in RGtk2 methods
> options(guiToolkit="RGtk2")
>
> t <- gtable(mtcars[1:5, 1:4], cont = gwindow())
>
> removeColumn <- function(t, col.num) {
> name <- names(t)[col.num]
> tbl <- getToolkitWidget(t)
> ## remove a column, but store old one first to add back
> col <- tbl$getColumn(col.num - 1) # 0- based
> tbl$removeColumn(col)
> return(list(name=name, col=col))
> }
>...