R gWidgets remove parameters and passing arguments -



R gWidgets remove parameters and passing arguments -

i’m new r world , i’m having difficulties working gwidgets , hope out there can help me. first of r version 2.15.2., , i’m using windows 7 32-bit.

i want create gui input/output , selection (yes, no), if user selects (using gradio) “yes”, display set of parameters, if “no”, should disappear (those parameters), or grayness out. , finally, if user click ok button, pass parameters utilize (later on) phone call function. here questions:

do have thought how can remove parameters when user selects “no”, right now, if click no, prints want, when click “yes” again, displays 3 parameters. do know how can pass arguments when user click “ok”, later when click ok, phone call (or source) function in different r code

many in advance help

cesar

p.s. below code:

require(gwidgets) options("guitoolkit"="rgtk2") #options(expressions=500000) w <- gwindow("") g <- ggroup(horizontal = false, container = w) glabel("input/output", container = g) inputfiledir <- gfilebrowse (text = "select file...", type = "open", quote = false, filter = list("text file" = list(patterns = c("*.txt"))), container = g) svalue(inputfiledir) outputfiledir <- gfilebrowse (text = "input file name...", type = "save", quote = false, filter = list("text file" = list(patterns = c("*.txt"))), container = g) svalue(outputfiledir) glabel("direction?", container = g) dirselec <- c("yes","no") rbf <- function(h,...){ if (svalue(h$obj, index=true) == 1){ print ( "define handler here" ) glabel("meridional (raster file):", container = g) fieldconstraindir_v <- gedit("", container = g, default = 0) svalue(fieldconstraindir_v) glabel("zonal (raster file):", container = g) fieldconstraindir_u <- gedit("", container = g, default = 0) svalue(fieldconstraindir_u) glabel("max. angle:", container = g) maxang <- gedit("", width = 3, initial.msg = "paste path raster file (no extensions)", default = 0, container = g) svalue(maxang) }else { #(svalue(h$obj, index=true) == 2) print ( "when user click no, needs go or grayness out" ) } } rb <- gradio(dirselec, container = g) selected = svalue(rb, index=true) <- 2 rbh <- addhandlerclicked(rb, handler = rbf) bg <- ggroup(container = g) addspring(bg) onok <- function(h,...){ print(svalue(inputfiledir)) #chartr("\\", "/", print(svalue(inputfiledir))) print(svalue(outputfiledir)) print(svalue(fieldconstraindir_v)) print(svalue(fieldconstraindir_u)) print(svalue(maxang)) } gbutton(" ok ", container = bg, handler = onok) gbutton(" cancel ", container=bg, handler = function(h,...) dispose(w))

you have various options:

you can place parameters gexpandgroup widget , phone call visible<- method on this. toggle showing them.

within gwidgetsrgtk2, can create widgets in (child) container not attached parent container (no cont=... in constructor), add(parent, child) add together , delete(parent, child) remove. shouldn't delete widgets in rm sense, remove them screen

you can place parameters container , phone call enabled<- false "gray" them out.

the first 2 may require screen size management.

in cases, kid controls still settable , readable during program, should have default values there or checking when utilize them.

as passing parameters way within r set command widgets list, l. idiom

out <- sapply(l, svalue)

bundles them list can passed function. do.call function makes easy work lists arguments.

r gwidgets

Comments

Post a Comment

Popular posts from this blog

javascript - mongodb won't find my schema method in nested container -

javascript - mongodb won't find my schema method in nested container - i trying access method of schema stored within mixed container. here situation : have cases model can many different things, have schema each of these things stored in "casecontent" mixed property. var caseschema = mongoose.schema({ casecontent : {}, object : {type:string, default : "null"}, collision : {type : boolean, default : false} }); the casecontent property filled model of 1 of schemas, 1 exemple : var treeschema = new mongoose.schema({ applecount : {type : number, default : 3} }); treeschema.methods.dostuff = function (data) { console.log('hey, listen'); homecoming true; }; then, want utilize method of schema original container : caseschema.methods.dostuff = function (data) { if (this.casecontent.dostuff !== undefined) { this.casecontent.dostuff(); console.log('it worked'); } else { ...
Read more

Hibernate criteria by a list of natural ids -

Hibernate criteria by a list of natural ids - i trying create hibernate criteria using list of natural ids. saw illustration here http://docs.jboss.org/hibernate/core/3.5/reference/en-us/html/querycriteria.html#query-criteria-naturalid shows illustration querying single record: session.createcriteria(user.class) .add(restrictions.naturalid() .set("name", "gavin") .set("org", "hb")); is there improve way create criteria list of natural ids illustration below? junction junction = restrictions.disjunction() .add(restrictions.naturalid() .set("name", "gavin") .set("org", "hb")) .add(restrictions.naturalid() .set("name", "jdoe") .set("org", "rh")); session.createcriteria(user.class) .add(junction); thanks. in experience, no. reason due limitations of sql in implementations. when seek phrase in sql gets...
Read more

ios - Lagging ScrollView with UIWebview inside -

ios - Lagging ScrollView with UIWebview inside - i have uiwebview within uiscrollview lot of content. when content loaded uiwebview big, starts lag. does know how solve issue? maintain in mind lags when uiwebview's height becomes considerably big. thank in advance! if read documentation on uiwebview , states not embed uiwebview uitableview or uiscrollview . doing leads unexpected behaviour, , think experiencing first hand. sorry bearer of bad news. update - specific warning apple docs: the documentation addresses issue specifically. important: should not embed uiwebview or uitableview objects in uiscrollview objects. if so, unexpected behavior can result because touch events 2 objects can mixed , wrongly handled. apple reference on uiwebview . update 2: after doing few searches (search link, same posted in comments), came across this answer, may provide insight. monitors content offset in both uiscrollview , uiwebview via delegates, , cle...
Read more