search for: day2

I have the following function defined as below match.trace <- function(dfobj, distance, day1, day2) { day1 <- substitute(dfobj$day1); day1 day2 <- substitute(dfobj$day2) distance <- substitute(dfobj$distance) xx <- NULL for (i in 0:10) xx[i+1] <- with(dfobj, cor(Lag((day1-day1[1]),i), (day2-day2[1]), use='pair')) i <- match(max(xx), xx) with(dfobj, {...

...pendency with the data.frame below but not with an example (table 6.4) from Montgomery's DOE book. This is with R 1.3.0 on Debian GNU-Linux. Where have I gone wrong? > centerpts run sample CH50mg 1 day1 dev126 0.56 2 day1 dev126 0.70 3 day1 dev126 0.82 4 day1 dev126 0.72 5 day2 dev126 0.57 6 day2 dev126 0.60 7 day3 dev126 0.61 8 day3 dev126 0.64 9 day3 dev126 0.68 10 day3 dev126 0.68 11 day1 dev118 0.77 12 day1 dev118 0.80 13 day1 dev118 0.86 14 day2 dev118 0.71 15 day2 dev118 0.70 16 day3 dev118 0.77 17 day3 dev118 0.77 18 day3 dev118 0.77...

I would like to include this in a package. The S3 methods on R CMD check says * checking S3 generic/method consistency ... WARNING window: function(x, ...) window.chron: function(data, day1, hour1, day2, hour2, ...) See section 'Generic functions and methods' of the 'Writing R Extensions' manual. I have looked and can not figure it out. This function is for convience. What can I do to fix this? This is the first time I have tried this, so be easy, and explain it to to me and I...

...hod 1 -none- character series 1 -none- character frequency 1 -none- numeric call 3 -none- call asy.var.coef 1600 -none- numeric > resid(ar(logrvar, aic=TRUE)) NULL -- View this message in context: http://r.789695.n4.nabble.com/Question-from-day2-beginner-tp2293221p2293221.html Sent from the R help mailing list archive at Nabble.com.

Hi, I have a data.frame SAMPLES with columns: Site Site# Season Day1 Day2 Day3 Day1, Day2, Day3 are class "Date", the other columns are numeric or factor. I have a date "mydate" that may or may not be listed in my data.frame and I need to find that out. If "mydate" is there, I want to get the number of the data.frame row where it o...

...Pos100415,Pos100416,Trad100415...are all data frames I have one dataframe each day. For example, Pos100415 is "Pos" for day 15/04/2010. Now I need to access data.frames in my environment for a function, according to this following scheme: Pos100415 and Pos100416 (i.e. Pos(day1) and Pos(day2)), and Trad100416 (i.e. trad(day2)). I have absolutely no idea how to deal with this indexing problem in a generic manner. Note that all numbers will belong to the list "select". Not sur to be clear enough, but any help would be appreciated. TY

...e. Has anyone any instructions to install this package or help with my problem? Using this works.... > day<-c(1,2,3,4,5,6,7,8,9,10,11,12,13) > datfile<-c(16,23,39,37,45,34,NA,3,7,8,15,20,21) > for (i in 1:13) { + dat<-datfile + dat.ok <- !is.na(dat) + dat2<-dat[dat.ok] + day2<-day[dat.ok] + + dat.interp<-spline(day2,dat2,length(day)) + outt<-rep(NA,length(day)) + for (j in 1:length(dat.interp$x)) { + outt[j]<-dat.interp$y[j] + } } but this does not....? > day<-c(1,2,3,4,5,6,7,8,9,10) > datfile<-c(17,6,29,22,90,72,20,4,4,NA) > for (i...

...t.sam.dat.new", header = TRUE ) pvalue = read.table("Z:\\bruce.9.3.09.sample.stability.analysis\\urine\\all.urine.features.t.test.result", header = TRUE ) library(compositions) p = function(a,b){ y = pvalue[,a] if(y<0.01){ index = which(y, arr.ind=TRUE) day1 = raw_urine[index,3:7] day2 = raw_urine[index,b] graph = {matplot(raw_urine[index,1],day1,lwd = 3) matpoints(raw_urine[index,1],day2,lwd = 3, col="red")} print(graph) }} the above is my sample code in which i'm trying to output some graphs. but however, I can get return() to return value I want and all. But I j...

...# # before after # |==| # |---------| |---|==|--| # @day1 = Day.find(:all, :conditions => [ "id != ? and child_id = ? and startdate <= ? and enddate >= ?", self.id, self.child_id, self.startdate, self.enddate])[0] if (@day1) @day2 = @day1.clone if (@day1.startdate < self.startdate) @day1.enddate = self.startdate - 1 @day1.save else # day1 and self start on the same day, destroy day1. # # before after # |==| # |---------| |==|------|...

...s not an error. I'm pulling data from 2 sources for the model. for (i in 1:dim(dat2)[[1]]) { assign("modelb",i) <- lm(log(dat$flux) ~ dat$Tsoil_flux, subset = dat$chamber == dat2$chamber[i] & dat$year == dat2$year[i] & dat$doy >= dat2$day1[i] & dat$doy <= dat2$day2[i]) dat2$coef[i] <- coef(assign("modelb",i, sep = ""))[[2]] dat2$Rsq[i] <- summary(assign("modelb",i, sep = ""))[[9]] } I have also tried assign("modelb",1:i) #following the ?assign example paste("modelb", i, sep = "") &lt...

Can someone help me with the proper usage of the reshape function? Let's say I have a dataset with columns like this (wide format): Id Sex Group Test Day1 Day 2 Day 3... And I want to transpose this into something like this (thin): Id Sex Group Test Time Where the new column labeled time contains all the time variables (Day 1, Day 2, Day 3...) that were in the wide

Hi, If I have a data frame A with the following format: Day1 Day2 Day3 Day4 1 1979-11-02 1979-11-03 1979-11-04 <NA> 2 1979-12-06 <NA> <NA> <NA> 3 1979-12-13 1979-12-14 1979-12-15 1979-12-16 4 1979-12-20 <NA> <NA> <NA> And a date "1979-12-14...

Dear all, I have the following data in excel: day1 y 1 2 3 2 3 x1 0.2 0.3 0.4 0.3 0.2 x2 7 3.4 2 8 6 day2 y 2 4 3 2 2 x1 0.4 0.5 0.3 0.3 0.2 x2 7 8 9.1 6 5 I have the following problems: first of all, when I ask R to read the file (with the package xlsReadWrite and the command read.xls) it has a problem with the fact that the left most corner is labelled the same way, so in order for it to work I ne...

This patch adds support for symbol versions. It is based on what libvirt does. The generated syms file looks like: LIBNBD_1.0 { global: nbd_...; nbd_...; local: *; }; In a future stable 1.2 release, new symbols would go into a new section which would look like this: LIBNBD_1.2 { global: nbd_new_symbol; nbd_another_new_symbol; local: *; } LIBNBD_1.0; In my testing the

Hi, i did a mistake with my first post. I have to reshape data from this matrix: id x1 x2 x3 x4 day1 day2 day3 day4 day5 day6 day7 day8 day9 1 0.129 0.797 0.231 0.615 4 4 1 1 1 1 3 3 3 2 0.420 0.376 0.501 0.282 4 4 4 4 5 4 2 5 5 3 0.377 0.486 0.897 0.699 4 4 4 4...

...iated: shanko_date (at) yahoo dot com **** Content: Day1: Introduction to Ruby * Language Basics * Classes and Modules * Blocks * Dynamics and Reflection * Libraries and Tools Day2: Introduction to Ruby on Rails * Intro to MVC Architecture * Developing a simple Rails application * Views & Controllers * Layouts * ActiveRecord * ActionController filters Day3:...

Hi, I was just wondering if it is possible to cause a script to run (configured in the domu.cfg file) each time "xm create domu.cfg" is run, but before the machine is actually started? ie, I''d like to "setup" the disks for the VM before xen/qemu tries to use the devices and allocate to the domu. I''m using xen 4.1.3 on Debian testing, and using the xm

...========================================   means<-matrix(c(2.3, 2.0, 0.0, 3.0, 2.5, 40), nrow=2, byrow=TRUE) SEM<-matrix(c(0.3, 0.2, 0.0, 0.4, 0.3, 10), nrow=2, byrow=TRUE)   CIL<-means-SEM CIU<-means+SEM rname<-c("Gr1", "Gr2") cname<-c("day1", "day2", "day3") rownames(means)<-rname rownames(CIL)<-rname rownames(CIU)<-rname colnames(means)<-cname colnames(CIL)<-cname colnames(CIU)<-cname   library(gplots)      barplot2(means, beside = TRUE, angle = c(30, 45), density = c(-1, 10),         col = c("white&quo...

Hi, I am an R novice and I am trying to do something that it seems should be fairly simple, but I can't quite figure it out and I must not be using the right words when I search for answers. I have a dataset with a number of individuals and observations for each day (7 possible codes plus missing data) So it looks something like this Individual A, B, C, D Day1 1,1,1,1 Day 2 1,3,4,2 Day3

Here''s an intersting one: I have a client who wants to store hours of operation of a business for their RoR web app. I came up with a solution, but I really don''t like it. I have a MySQL table that has these fields monday_start, monday_end, tuesday_start, tuesday_end, etc., all as time fields. That''s all find and dandy. The kicker is, the client wants the hours to