search for: ihok

This is a best practices / style question. The way I use RODBC is I something like this: > foo <- sqlQuery(db, "select * from foo") > apply(foo, 1, function{...}) That is, I use apply to iterate over each result -- row -- in the RODBC-produced dataframe. Is this how one generally wants to do this? My concern is that when apply iterates over the rows, it uses as.matrix()

I know that if I have a function that returns multiple values, I should do return(list(foo, bar)). But what do I do on the recieving end? fn <- function(x) { return(list(foo, bar)) } I know that at this point I could say values.list <- fn(x) and then access values.list[1] values.list[2] But that's hideous. I'd rather be able to say something like list(local_foo, local_bar)

In R 2.9.2, > URLdecode(c("a%20b", "b%20c")) [1] "a b" Warning message: In charToRaw(URL) : argument should be a character vector of length 1 all but the first element will be ignored Could URLdecode be modified to actually process all elements of the vector, not just the first? Thanks in advance

The following three calls all produce the same result (my machine is in EST): > as.POSIXct(0, tz="", origin=ISOdatetime(1970,1,1,10,0,0)) [1] "1970-01-01 10:00:00 EST" > as.POSIXct(0, tz="EST", origin=ISOdatetime(1970,1,1,10,0,0)) [1] "1970-01-01 10:00:00 EST" > as.POSIXct(0, tz="GMT", origin=ISOdatetime(1970,1,1,10,0,0)) [1]

...Platform: Other URL: http://at-sciences.com/storyswap/StorySwap.swf OS/Version: All Status: NEW Severity: enhancement Priority: medium Component: plugin AssignedTo: swfdec at lists.freedesktop.org ReportedBy: ihok at hotmail.com QAContact: swfdec at lists.freedesktop.org Compare http://at-sciences.com/storyswap/StorySwap.swf under swfdec 0.5.3 and Flash 9.0 r47: 1) the scrolling photos on the right are jerky under swfdec, and scroll more smoothly under Flash. 2) the menus on the left don't...

(Using BRugs 0.7-5, R 2.14.2 32-bit on 64-bit Windows 7, OpenBUGS 3.2.1) 1. BRugs crashes R for me as follows. Sorry about the lack of detail; please let me know if / how to supply a more useful bug report on this issue. fit <- BRugsFit(...) # BRugs and OpenBUGS runs fine, the parameter estimates are reasonable # across 3 chains samplesBgr("beta") # crash

...and given enthusiastic people contributing/writing on it/modifying it (etc...), also could emerge as talking points for some really pithy discussions about using R for all levels of users. /Arin Basu >Message: 17 >Date: Sun, 08 Jan 2006 15:12:57 -0500 > From: "Jack Tanner" <ihok@hotmail.com> >Subject: [R] Wikis etc. >To: r-help@stat.math.ethz.ch >Cc: phgrosjean@sciviews.org >Message-ID: <BAY102-F268BA8F5347CA44DD7E38CA230@phx.gbl> >Content-Type: text/plain; format=flowed > >Philippe's idea to start a wiki that grows out of the content on &...

...fied Platform: Other URL: http://www.puropittsburgh.com/gallery/index.swf OS/Version: All Status: NEW Severity: normal Priority: medium Component: plugin AssignedTo: swfdec at lists.freedesktop.org ReportedBy: ihok at hotmail.com QAContact: swfdec at lists.freedesktop.org Using swfdec-mozilla.x86_64 0.5.3 on Fedora 7, no luck rendering this: http://www.puropittsburgh.com/gallery/index.swf -- Configure bugmail: http://bugs.freedesktop.org/userprefs.cgi?tab=email ------- You are receiving this ma...

I have a named vector: > z <- c(1, 2, 3, 2) > names(z) <- c("a","b","c","b") > f <- c("b","c") I want to know the index in z of the first occurrence of each of the values in f. One implementation is > sapply(f, function(x) which(names(z)==x)[1]) b c 2 3 Is which() smart enough to stop when it finds in z the

I'd like to have something like seq() where I can pass in a length of the desired sequence and a right limit so that the sequence goes up to the limit and then starts again from 1. # works now seq(from=2, length.out=3) [1] 2 3 4 # what I want seq(from=2, length.out=3, rlimit=3) [1] 2 3 1 # additional examples of what I want seq(from=2, length.out=4, rlimit=3) [1] 2 3 1 2 seq(from=2,

What's the difference between t.test(x, y) and pairwise.t.test()? Is it just that the former takes two vectors, whereas the latter takes a vector and a factor?

Is the following a bug with stem() or is there something else that I am missing? I ran stem() on the vector x below and got stem(x-10) instead of stem(x). If I subtract 1 from x, I get a correct answer. If I add 1 to x, I still get a wrong answer. If I add 10 to x, I get a correct answer. I'm not sure what to make of this, other than to think it is a bug. Can anyone tell me if this is a bug?

> a <- sqlQuery(irrdb, "select count(field) from mytable where field = 1") > print(a) count(field) 1 8 > paste(a) [1] "as.integer(8)" Why the as.integer() representation? I later pass the result into this write.html.table(), and what I get is rows of as.integer()... when all I want is the integer itself. as.integer(31) as.integer(21)

...gt; Emacs+ Ess On Windows => Tinn-R ------------------------------------------------------------- MSc. Rodrigo Aluizio Centro de Estudos do Mar/UFPR Laborat?rio de Micropaleontologia ------------------------------ Message: 19 Date: Sun, 30 Aug 2009 15:40:51 +0000 (UTC) From: Jack Tanner <ihok@hotmail.com> Subject: [R] RConsole processing crashes Rgui.exe To: r-help@stat.math.ethz.ch Message-ID: <loom.20090830T173453-613@post.gmane.org> Content-Type: text/plain; charset=us-ascii Using R 2.9.2 on Windows XP SP3. 1. Edit ~/Rconsole, and set font = TT Bitstream Vera Sans Mono 2...

> write.table(NULL) Error in which(unlist(lapply(x, function(x) is.character(x) || is.factor(x)))) : argument to "which" is not logical Is this correct behavior? It seems harsh to abort an entire run just because one of the tables you generated happened to be NULL. -JT

Under WinXP, I have a system DSN called foo. It has stored username/password information. (I can click Configure in ODBC Administrator and then Test Data Source connects to MySQL without me re-entering data.) Using RODBC, I can connect to the same database. But when I do odbcConnect("foo"), I get a window that requires me to re-enter username/password information. It seems like

I'm writing SQL queries, and it's very handy to be able to use sQuote for string parameter values. It makes me wish that I could use an sQuote-like function for enclosing column names and other identifiers in backticks, i.e., select `foo` from `table`. Obviously I can do this with paste(), I'm just asking for syntactic sugar. Oh, a buglet: the sQuote help page, See Also section, the

I know it's conventional to report bugs to the maintainer, but I'm not sure which package actually contains this bug(s), so I apologize for sending this to the list at large. I see the bug under both R 2.1.1, and R 2.2.1. (I sent a related message a while ago, but this one has more detail.) library(MASS) library(nlme) fit.model <- function(il, model.family) { cs <-

There's a funny inconsistency in how t.test handles paired=T or paired=F. If x and y parameters are lists, paired=F works, but paired=T doesn't. > lg=read.csv("my.csv") > a = subset(lg, condition=="a")["score"] > b = subset(lg, condition=="b")["score"] > t.test(a,b) > t.test(a,b, paired=TRUE) Error in `[.data.frame`(y, yok)

Apologies for the noob question. I need to split setting up a plot and drawing it into two functions. One determines the properties of a plot (data, axis, labels, etc.), and the other plots it (using a preferred device, image dimensions, etc.). get.props = function() { list(x=x, y=y, xlab="foo", ylab="bar") } myplot = function() { props = get.props() plot(props) #