similar to: Simultaneous Comparison of Factor Structures

Hi, i need to recognize itemization structures in strings which follow the format: "digit-digit-dot" like e.g. 1. 2. 19. 211. Given the string " This happened in the 21. century." (the dot behind 21 is used in German instead of 21st) I want know where the dots are but I do not want the 21.-dot to be returned as well. I am not good at regular expressions. How

> Hi folks, > My SMB server is a Helios Ethershare 3.1 on a Tru64 Alpha machine. > We are now integrating more and more gentoo-Linux Servers. These are the > SMB Clients. > > On Obelix (one of our gentoo-Servers) I can mount the SMB Volume from the > Ethershare Server. > obelix nc4smb # whoami > root > obelix # mount -t smbfs -o username=m.heckmann

Hello all, I'm trying to replicate a confirmatory factor analysis done in Amos. The idea is to compare a one-factor and a two-factor model. I get the following warning message when I run either model: "Could not compute QR decomposition of Hessian. Optimization probably did not converge." I have no idea what to do here. I believe posters reported the same problem. It seems

Happy New Year, all! I want to do calculations on each element of a list l, but i want the returned list element to be named differently after the calculation. Is it possible to do the renaming somehow within the lapply call? l <- list(a=NA, b=NA) lapply(l, function(x) {names(x) <- "new name"; return(x) }) This does not work, any ideas? TIA

Is there a blank space escape sequence in R, i.e. something like \sp etc. to produce a blank space? TIA Mark ??????????????????????????????????????? Mark Heckmann Blog: www.markheckmann.de R-Blog: http://ryouready.wordpress.com

In The following code, the table handler is executed twice when the button is pressed (from the 2nd pressing on). I want it to be executed only once. Does someone know, why this happens and how I can change it? library(gWidgets) w <- gwindow() b <- gbutton("press", cont=w) tbl <- gtable(1:10, cont=w) addhandlerclicked(b, handler=function(h, ...){

I have a vector and need to count how many data points fall inside each bin: dat <- rnorm(100) breaks <- -3:3 table((cut(dat, breaks))) (-3,-2] (-2,-1] (-1,0] (0,1] (1,2] (2,3] 3 13 42 30 12 0 if I reverse the breaks vector, the results remains the same: breaks <- rev(breaks) table((cut(dat, breaks))) (-3,-2] (-2,-1] (-1,0] (0,1] (1,2]

When using a gtkDrawingArea as a Cairo device I very often encounter the error: "figure margins too large" Even for the below "getting started" example from http://www.ggobi.org/rgtk2/ this is the case. > win = gtkWindow() > da = gtkDrawingArea() > win$add(da) > asCairoDevice(da) [1] TRUE > plot(1:10) Fehler in plot.new() : Grafikr?nder zu gro? > Also

I would like to split a string into words at its blanks but also to preserve all blanks. Example: c(" some words to split ") should become c(" ", "some", " ", " words", " ", "to" , " ", "split", " ") I was not able to achieve this via strsplit() . But I am not familiar with regular

I noticed that the argument names after the dots argument are not partially matched. foo <- function(one, two, ...){ one + two } > foo(o=1, t=2) [1] 3 foo <- function(one, ..., two){ one + two } > foo(o=1, t=2) Fehler in one + two : 'two' fehlt Can someone explain me the reason for this behavior? THX Mark ???????????????????????????????????? Mark Heckmann Blog:

Hi R-experts, suppose I have a list with containing data frame elements: [[1]] (Intercept) y1 y2 y3 y4 -6.64 0.761 0.383 0.775 0.163 [[2]] (Intercept) y2 y3 -3.858 0.854 0.834 Now I want to put them into ONE dataframe like this: (Intercept) y1

I am not too familiar with Cairo and RGtk2 and have the following problem: I have a container with two GTK drawing areas converted into Cairo devices. I know that I can set the current drawing context e.g. using dev.set(). But this is tedious. How can I set the context using the objects da1 or da2? w <- gtkWindow() w$setSizeRequest(400, 400) vbox <- gtkVBox() da1 <- gtkDrawingArea()

I try to overlay a plot inside a gtkDrawingArea with a button (or any other widget). I tried to put both into a gtkFixed container. But this does not work, no printing occurs. Does someone know a solution? What I tried: w <- gtkWindow() w$setSizeRequest(400,400) fx <- gtkFixed() da <- gtkDrawingArea() fx$put(da, 100, 100) asCairoDevice(da) par(mar=c(0,0,0,0)) plot(1:10) btn.1

I want to assign a default handler to a toolbar button and change the handler later. The addhandlerclicked() method does not apply to a gAction Object, I think... defHandler <- function(h, ...) print("default") w <- gwindow() aTest <- gaction(label="Test", icon="open", handler=defHandler) tblList = list( test = aTest ) toolBar = gtoolbar(tblList,

I have a nested list l like: l <- list(A=c(1,2,3), B=c("a", "b")) l <- list(l,l, list(l,l)) I want the list to be unlisted, but not on the lowest level of each "branch". I want the lowest level of each list branch to remain as it is. So unlist or unlist(rec=F) do not work here as the level of nesting may differ on the elements. The result should look like:

Dear list, When playing around with the "[" method for S4 classes I noticed that it gets called twice in my example. setClass("testClass", representation(a="character")) setMethod("[", signature(x = "testClass", i = "ANY", j="ANY"), function (x, i, j, ..., drop){ print("void function")

I want to plot a multiline annotation including a mathematical expression using grid graphics (grid.text). This works fine for a single line, but the math expression is misplaced when I insert a line break ("\n" escape sequence): grid.text(expression(paste("Some words here\n more ", sigma))) Does someone have an idea how to fix that? TIA! Mark

Hi, how can I omit the box drawn from the starting position to the current position of the mouse when clicking and it over a GTK graphics object? I have seen that in the 'playwith' package the box changes to an arrow when using the 'pan' button. But I do not find the corresponding line in the code to implement that. library(gWidgets)

Hello, using the <<- assignment operator I do not understand why the following does not work. l <<- list() l list() l$arg1 <<- "test" error in l$arg1 <<- "test" : Objekt 'l' not found ?"<<-" says: "The operators <<- and ->> cause a search to made through the environment for an existing definition of the

Hi, I posted this a week ago on r-help but did not get an answer. So I hope that someone here can help me: I want to define some options for my package the user may change. It would be convenient if the changes could be saved when terminating an R session and recovered automatically on the next package load. Is that possible and if yes, is the standard way to implement this? Thanks, Mark