similar to: Building a what list for scan to use

I have timstamped data like this: > sd[1:10,] Tstamp Density Mesh50 Mesh70 Mesh100 Mesh150 Mesh200 2 2009/02/27 07:00 30.5 0.7 10.7 21.4 32.8 41.6 3 2009/02/27 08:00 32.2 1.6 12.4 23.3 34.5 43.0 4 2009/02/27 09:00 32.7 4.8 13.0 24.0 35.1 43.5 5 2009/02/27 10:00 26.7 0.3 6.5 17.6 28.1 36.9 6 2009/02/27 11:00

plot.ts has an argument yax.flip, plot.zoo does not. Is there a way to make the yaxis flip in plot.zoo? I tried using a custom panel function: panel.yaxis<-function(...) { npnl<-parent.frame$panel.number if (npnl %% 2 == 0) { axis(side=3) } else { axis(side=2) } } This leads to a blank window. I am stuck with the intricacies of the plotting and axis

Reading a flat text file 138 Mbyte large into R with a combination of scan (to get the header) and read.table. After conversion of text time stamps to POSIXct and conversion of integer codes to factors I convert everything into one data frame and release the old structures containing the data by using rm(). Strangely, the rm() does not appear to reduce the used memory. I checked using

Hello! I've time stamp ('time') field in dataset ('dt') with values like "18:10", "19:43", .... I need to split time field into hour and minutes and add both as new columns to dataset. We are able to do it in bash+awk, but curious to stay within R codebase as much as possible. For now we are using such solution: tstamp <- strsplit(dt$time,

I have to decode raw vectors read from a connection like this: +++++++++++++++++++ fl<-file.choose() fb<-file.info(fl)$size fc<-file(fl) open(fc,open='rb') seek(fc,where=offset) dat<-readBin(fc,'raw',n=(fb-offset),size=1,signed=FALSE) close(fc) ++++++++++++++++++ The decoding performs a combination of a simple bitwise operator and a simple arithmatic operator on

Is there a way to make any of the write functions (.table or .csv) append to the same file? I get this warning message and do not know how to enable the appending. Warning messages: 1: In write.csv(names(Lbys)[c], fo, append = TRUE) : attempt to set 'append' ignored 2: In write.csv(Lbys[[c]], fo, append = TRUE) : attempt to set 'append' ignored Regards, Alex van der Spek

panel.lmline returns intercept and slope of y ~ x subsetted to the combination of conditioning factors given to xyplot in lattice. for instance: xyplot(Xvalues ~ log(Qvalues)|Tfac, data = df7, panel = panel.lmline) I am looking to find the equivalent formulation for lm() proper. If I do this: lmcal <- lm(Xvalues ~ log(Qvalues):Tfac, data = df7) Only one value of the intercept is returned.

Greetings - I'm battling POSIXct, as per the code below. My input is actually an XL file, but the weird results below correctly model what I am seeing in my program. Before I punt and use lubridate or timeDate, could anyone please help me understand why POSIXct forces my variable back to GMT? I suspect that I'm not properly coding the tzone value, but it does not throw an

I cannot figure out how to tune the minor tic marks on the date axis of a zoo plot. I read hundreds of CSV files from a zip archive transparently. The time/date strings I convert to POSIXct format, order them and then make a zoo object as there may be cases which have unequal time stamping. As follows: ###################### #Transform timestamps and reorder them dat <- transform(dat,

This replaces the build dependency on perl with one on awk which is already used in the build system and is much more ubiquitous than perl --- Makefile.in | 2 +- mkproto.awk | 39 +++++++++++++++++++++++++++++++++++++++ mkproto.pl | 48 ------------------------------------------------ 3 files changed, 40 insertions(+), 49 deletions(-) create mode 100644 mkproto.awk delete mode 100644

I use by() to generate a summary statistics like so: Lbys <- by(dat[Nidx], dat$LipTest, summary) where Nidx is an index vector with names picking out the columns in the data frame dat. This returns a list of character arrays (see below for str() output) where the columns are named correctly but the rownames are empty strings and the values are strings prepended with the summary

I have a fairly large set of data with the following attributes: >str(raw.data) `data.frame': 1429 obs. of 16 variables: $ TStamp :`POSIXlt', format: chr "2001-11-25 02:00:00" "2001-11-25 01:55:00" "2001-11-25 01:50:00" "2001-11-25 01:45:00" ... $ iPDT.AHU14.14: num 0.0122 0.0125 0.0120 0.0120 0.0122 ... $ iPDT.AHU14.15: num 0.0121

Hello. Me again. Have you tried to encode piano solo? Noticed high bitrate Opus gave? And there's also artefact at 15kHz which wasn't in the original audio. Visible with Spek program. Download FLAC and Opus both files, new link: http://www.filedropper.com/example_3 FLAC full: 1084 kbps; FLAC solo: 465 kbps. with --bitrate 160: Opus full: 158 kbps; Opus solo: 190 kbps. Included also Spek

Dear R Helpers, A few weeks ago I asked for some help on how to accomplish modifications to data in a set of data frames. As part of that request I mentioned that I realized that one way to accomplish my goal was to put the data frames together in a list but that I was looking for a way to do it with data frames and a loop because I "believe the better thing is to work df by df for my

I can get the interactions between factors like this: > idx=c(1,3,6,9) > jdx=idx > levels(interaction(idx,jdx,lex.order=TRUE)) [1] "1.1" "1.3" "1.6" "1.9" "3.1" "3.3" "3.6" "3.9" "6.1" "6.3" "6.6" "6.9" [13] "9.1" "9.3" "9.6"

Hi All! Please find code and the respective lists below. My problem: I specify the case that lilwin[[p]] is not an NA and want the code found in iwish to be returned ONLY for that case. Why do I get a list of length 2 (and why is NULL the first element)? I understand that the code below is quite senseless. I have run into a problem while working on a large project and wanted to simplify it in

I cannot understand why a function appears to be available to R (is.loaded('planckwR') returns TRUE) but the call with .C results in an error message: C symbol name 'planckwR' not in DLL for package <path to DLL file here> This is what I do: Loading a homebrewed DLL, compiled with MS VS97. The functions are all void, the C calling sequence is used and all arguments

Hi. I have a list where each object in the list has multiple parts. I'd like to take the mean of just one part of each object. Is it possible to do this with lapply? If not, can you recommend another function? Thanks. eric > x1 <- c(0,1,2,3) > x2 <- c(7,8) > x3 <- c(2,6,6,8) > x4 <- c(4,8) > > Lst1 <- list(label1 = x1,label2 = x2) > Lst2 <-

I am trying to add 2 stdev error bars to lattice type plots: panel.ebar<-function(x,y,dy=NULL,...) { panel.xyplot(x,y,...) panel.segments(x,y-dy,x,y+dy,...) } Then: xyplot(y~x|fc,data=dat,dy=dat$dy,panel=panel.ebar) This adds error bars but they are not conditioned on the factor fc. xyplot(y+I(y-dy)+I(y+dy)~x|fc,data=dat) This produces 3 series of points in different colors, conditioned

Hi, I just downloaded this and it says it's based on RC1 in the about box. Is that a typo or is the plug-in not updated? Olaf van der Spek Almere, Holland Olaf@XCC.TMFWeb.NL http://xcc.tiberian.com/ --- >8 ---- List archives: http://www.xiph.org/archives/ Ogg project homepage: http://www.xiph.org/ogg/ To unsubscribe from this list, send a message to 'vorbis-request@xiph.org'