



I need help:

 

In DSC
2003 Working Papers (Draft Versions)

http://www.ci.tuwien.ac.at/Conferences/DSC-2003/

 

I found some code that I want to practice with. But I also
found, that the code was deprecated. Can anybody help me with this lines of
code, how can I

Re-write it with the new codification? Thanks.The code is:


 

textx
<- gtkText() ## Creates a widget by calling S_gtk_text_new

 

>
attributes(textx) ## Check its attributes

$class

[1]
"GtkText" "GtkWidget" "GtkObject"

 

>
textx$Insert(chars=xtxt, length= nchar(xtxt)) ## or

 

>
gtkTextInsert(textx, chars=xtxt, length= nchar(x)) ## both call the function
S_gtk_text_insert

 

textx
<- gtkText() ## Create a text box

textx$SetEditable(TRUE)
## Make it user-editable

 

x <-
sort(rnorm(10, 100,10)) ## create some data and a data frame

reg.frame
<- data.frame( y = round(x + rnorm(10,0,4)), x=round(x))

 

xtxt
<- paste(c("x", as.character(reg.frame$x)),
collapse="\n")

 

textx$Insert(chars=xtxt,
length= nchar(xtxt)) ## Insert the x values into the text box




      
	[[alternative HTML version deleted]]

