search for: mrzung

Hi all; I want to print system.time whenever I execute any command. It takes too much time to type "system.time()" function to all command. is there any solution on it? And, apply(matrix,1,cumsum) command is too slow to some large matrix. is there any function like rowCumSums ? thank u! -- View this message in context:

hi, is there any way to erase the term "[1]"? for example, > a<-3+2 > a *[1]* 5 the term [1] in front of number 5. is there any way? -- View this message in context: http://r.789695.n4.nabble.com/erasing-1-tp4467628p4467628.html Sent from the R help mailing list archive at Nabble.com.

hi all, What I want to do is show a number with thousand expression. I dont know exactly the expression name but here is example. 1,000 10,000,000 is there a way to express a number like that? -- View this message in context: http://r.789695.n4.nabble.com/How-to-define-format-of-number-tp4555778p4555778.html Sent from the R help mailing list archive at Nabble.com.

Hi all; Now I'm developing web application by using rapache in ubuntu. My problem is that as users execute the application, the server PC cumulates memory. After users close or refresh the application page, the server PC memory is still cumulated. Now I'm renewing apache machine by manually in terminal. Is there any way to kill memory when users refresh or close the application page?

hi I'm making some program and it need to be hidden. it's not commercial purpose but it is educational, so i do want to hide the code of function. for example, if i made following function: a<-function(x){ y<-x^2 print(y) } i do not want someone to type "a" and take the code of the function. is there anyone who can help me? -- View this message in context:

hi, I use R - 2.15(32bit), and want to make a code to clear a console. Actually, I used to run following code to do that but after update the version of R from 2.14 to 2.15, it doesn't work. cls <- function (t) { require(RDCOMClient) wsh <- COMCreate("Wscript.Shell") wsh$SendKeys("\f") invisible(wsh) } cls() or cls <-

hi, i'm really in trouble to simulate some experiment. that is, it takes too much time to process the following code. following is short example, ------------------------------------------------------------------------------------------------------- p<-data.frame(a=rnorm(10),b=rnorm(10),c=rnorm(10),d=rnorm(10)) test<-data.frame(a=rnorm(1),b=rnorm(1),c=rnorm(1),d=rnorm(1))

hi, I know how to use the "for" loop function like: for(i in 1:ncol(mat)){ mat[i]<-b[i,2] } but, in this case r1<-b[1,1] r2<-b[2,1] r3<-b[3,1] r4<-b[4,1] * * * r3002<-b[3002,1] r3003<-b[3003,1] - must make vectors how should I make a efficient code for that? Is there anything in R like SAS MACRO function? Please help me. -- View this message in context:

hi, what I want to do is assigning following code to any object. k<-paste("thank") writeLines(strwrap(k, width = 80,indent = 7,exdent = 6)) To assign the "writeLines" code, I try this a<-writeLines(strwrap(k, width = 80,indent = 7,exdent = 6)) or assign(a,writeLines(strwrap(k, width = 80,indent = 7,exdent = 6))) but it doesn't work. is there any way to solve

hi I'm simulating some experiment by "for" function. The problem is that it takes too much time. for example, a<-list() for(i in 1:100000000){ a[[i]]<-i*1000 } is there anyway to speed up the process? I heard there is solution but i don't have idea. Can anyone help me? -- View this message in context:

hi, i'm trying to make gui function by "aDialog" FUN. What i want to do is adjusting the window size. my function is , aa<- aDialog(items=list( ps=numericItem(), number=numericItem(), term=numericItem() ), OK_handler=function(.) { # . is reference to dlg object values <- .$to_R() do.call("KOD",values) } ) how can i adjust the size of the window? Thanks~ -- View

Hi, I'm trying to make output of my function easier to see and more lovely. As u know, R output is not easy to see for beginner of study or anyone not expert so I want to transform the output into other form. Output of my function is just long text with some numerical result and table. Is there a way to solve it? Thanks. -- View this message in context:

hi, i'm trying to make "Tabbed Notebook Widget",but cannot install "tclRequire(Iwidgets)". I installed Activetcl but I don't know what can be the next step to execute "tclRequire(Iwidgets)". how can i do that? Thanks -- View this message in context: http://r.789695.n4.nabble.com/How-to-install-tclRequire-Iwidgets-tp4502775p4502775.html Sent from the R help

hi all: Following is simple example, for(i in 1:10000000){ a<-function(i){ #some function that has an error } } What I want to know is the way to find the error point in for-loop, What "i" makes the error. is there any way to solve it instead of debugging and finding an error manually? Thanks, -- View this message in context:

Hi, I saved an image and planed to open it whenever I want to load it. However, when I open it, It doesn't work. The code is following, and saved it as an image. .First<-function(){ require(tcltk) require(TeachingDemos) library(gWidgetstcltk) options(guiToolkit = "tcltk") win <- gwindow("Don't worry", visible = FALSE) } Error message is following, Error :