search for: q2

The following dummy data frame has factor Q (with 2 levels) nesting factor P (with levels p1 and p2 nested under q1, and p3 and p4 nested under q2), but both crossing the random variate s, which has 8 levels. The dependent measure is dv. > # The data frame: > testnest dv s P Q 1 1 s1 p1 q1 2 2 s2 p1 q1 3 1 s3 p1 q1 4 2 s4 p1 q1 5 1 s5 p1 q1 6 3 s6 p1 q1 7 3 s7 p1 q1 8 4 s8 p1 q1 9 2 s1 p2 q1 10 3 s2 p2 q1...

...n the common column, and insert a 0 if one is missing. I made a function to perform the following, and I know it may not that quite welly written, but it works. Any suggestions are welcome, many thanks. Anthony > q1 = data.frame(a=1,b=2,c=3,row.names="q1") a b c q1 1 2 3 > q2 = data.frame(d=4,b=1,a=4, row.names="q2") d b a q2 4 1 4 -> myJoinColumns(q1,q2) a b c d q1 1 2 3 0 q2 4 1 0 4 myJoinColumns <- function(q1,q2){ allNames = sort(union(colnames(q1),colnames(q2))) for (i in 1:length(allNames)){ t1 = which(colnames(q1) == allNames...

InDATA <-read.table("C:/Data/May 2004/season.txt",header=T) X <- decompose(InDATA) print(X) Period Connections Q1 67519 Q2 69713 Q3 68920 Q4 69452 Q1 70015 Q2 59273 Q3 57063 Q4 65596 Q1 73527 Q2 58586 Q3 69522 Q4 60091 Q1 51686 Q2 63490 Q3 55702 Q4 53200 Q1 51033 Q2 48175 Q3 52709 Q4 50106 Q1 50855 Q2 43466 Q3 48190 Q4 41702 Q1 48747 Q2 51441 Q3 42537 Q4 49145 Q1 41457 Q2 39306 Q3 43121 Q4...

sample report data that i want to forecast quarter quarter_index Revenue 2007 Q1 1 $3,856,799 2007 Q2 2 $4,243,328 2007 Q3 3 $4,930,369 2007 Q4 4 $5,443,579 2008 Q1 5 $5,164,830 2008 Q2 6 $5,104,413 2008 Q3 7 $5,713,240 2008 Q4 8 $6,509,331...

sample report data that i want to forecast quarter quarter_index Revenue 2007 Q1 1 $3,856,799 2007 Q2 2 $4,243,328 2007 Q3 3 $4,930,369 2007 Q4 4 $5,443,579 2008 Q1 5 $5,164,830 2008 Q2 6 $5,104,413 2008 Q3 7 $5,713,240 2008 Q4 8 $6,509,331...

hello&nbsp; &nbsp; &nbsp;I have some error by LMTP: Mar 09 13:26:42 imap-hibernate(q2 at a.com)<90154&gt;<BqpPNmWg7M9/AAAB&gt;: Error: Failed to unhibernate client: net_connect_unix(/var/run/dovecot/imap-master) failed: Permission denied Mar 09 13:26:42 imap-hibernate(q2 at a.com)<90154&gt;<BqpPNmWg7M9/AAAB&gt;: Info: net_connect_unix(/var/run/dovecot/ima...

Example: Will ts objects be obsolete or modified? > a [,1] 1983 Q1 2.747365190 1983 Q2 2.791594762 1983 Q3 -0.009953715 1983 Q4 -0.015059485 1984 Q1 -1.190061246 1984 Q2 -0.553031799 1984 Q3 0.686874720 1984 Q4 0.953911035> lag(a,4) [,1] 1983 Q1 NA 1983 Q2 NA 1983 Q3 NA 1983 Q4 NA 1984 Q1 2.747365190 1984 Q2 2.791594762 1...

...OOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?", "GOOG?"), PERIOD = c("Q4?2011", "Q3?2011", "Q2?2011", "Q1?2011", "Q4?2010", "Q3?2010", "Q2?2010", "Q1?2010", "Q4?2009", "Q3?2009", "Q2?2009", "Q1?2009", "Q4?2008", "Q3?2008", "Q2?2008", "Q1?2008", "Q4?2007&...

...lag is not doing what I assumed. > x <- zoo(11:21) > z <- zoo(1:10, yearqtr(seq(1959.25, 1961.5, by = 0.25)), frequency = 4) > x 1 2 3 4 5 6 7 8 9 10 11 11 12 13 14 15 16 17 18 19 20 21 > lag(x) 1 2 3 4 5 6 7 8 9 10 12 13 14 15 16 17 18 19 20 21 > z 1959 Q2 1959 Q3 1959 Q4 1960 Q1 1960 Q2 1960 Q3 1960 Q4 1961 Q1 1961 Q2 1961 Q3 1 2 3 4 5 6 7 8 9 10 > lag(z) 1959 Q1 1959 Q2 1959 Q3 1959 Q4 1960 Q1 1960 Q2 1960 Q3 1960 Q4 1961 Q1 1961 Q2 1 2 3 4 5 6...

Hi R-people, I have a question about lattice in general, and histogram specfically. How do you control the ordering of factors that controls the placement of the conditional panels. I have a dataset with factors that go 'Q1','Q2',"Q3','Q5' and of course I want the plot to place Question Q1 at the top and Question Q5 at the bottom of the graphical output. histogram() does the opposite as 5 is larger than 1. Similarly my 'AlertFormat' factor is a textual category, and I need the data to read from...

...ultiple transformations under that condition. The program below is simplified to demonstrate the goal. Its results are exactly what I want, but I would like to check the logical state of gender only once and create both (or any number of) scores at once. mystring<- ("id,group,gender,q1,q2,q3,q4 01,1,f,2,2,5,4 02,2,f,2,1,4,5 03,1,f,2,2,4,4 04,2,f,1,1,5,5 05,1,m,4,5,4, 06,2,m,5,4,5,5 07,1,m,3,3,4,5 08,2,m,5,5,5,4") mydata<-read.table(textConnection(mystring),header=TRUE,sep=",",row.name s="id") mydata #Create score1 so that it differs for...

...9;m building a rails app for hosting multi-page surveys. I set up questionnaire, question, and question_component models. Now I''m initializing them with some data. survey.rb q1 = Question.new "q1" q1.quote "Welcome to a test of the new interviewing system." q2 = Question.new "q2" q2.quote "Do you like pie?" q2.single 1 => "Yes", 2 => "No" q2.validation_block = Proc.new { [1,2].include? @interview.answers["2"] } questionnaire.questions.concat [q1, q2] -- Real-life questionnaires can be tho...

...ep=":") q$grp <- ordered(q$grp, levels=unique(q$grp)) q$dcol <- unlist(sapply(q$D,function(x) switch(x,"D1"="orange","D2"="blue","D3"="red", "D4"="seagreen", "D5"="black"))) q2 <- q[order(q$G,q$D,q$a,q$t),] ref3 <- subset(q2, !duplicated(a)) xyplot(b~t|G,data=q2,groups=grp,type="l",as.table=T, layout=c(3,1), par.strip.text = list(lines = 2), panel=panel.superpose, panel.groups=function(x=x,y=y,subscripts=subscripts,groups=groups,...,group.number)...

hi, for example, I have an string "q1 q2 q3". how can I encode it in rails to produce the result like "q1%20q2%20q3". Thanks! Best Regards, Zhenjian -------------- next part -------------- An HTML attachment was scrubbed... URL: http://wrath.rubyonrails.org/pipermail/rails/attachments/20060717/3824f992/attachment.html

q1 = Question.find(1) q2 = Question.find(1) Now, we find q1.__id__ != q2.__id__. It appears the two aliases are not kept in sync: q1.name => ''old name'' q2.name = ''new name'' q2.save! q1.name => ''old name'' q2.name =&gt...

I have the initial matrice: > *data.frame(Subject=rep(100:101, each=4), Quarter=rep(paste("Q",1:4, sep=""),2), Boolean = rep(c("Y","N"),4))* Subject Quarter Boolean 1 100 Q1 Y 2 100 Q2 N 3 100 Q3 Y 4 100 Q4 N 5 101 Q1 Y 6 101 Q2 N 7 101 Q3 Y 8 101 Q4 N ... > And I would like to group the Subject by Quarter using as a result in the table the value of the third variable (Boolean). The fina...

.....1 2010-02-19 TRUE 2010-02-22 FALSE 2010-02-23 FALSE 2010-02-24 FALSE 2010-02-25 FALSE 2010-02-26 FALSE > I want to build a xts that records the dates that there is a change. If TRUE -> FALSE it is "down" if FALSE -> TRUE it is "up" I can do it like this... q2 <- matrix(ncol=2, nrow = length(q1[,1])) for(i in 1:length(q1)){ if(q1[i-1,1]){ ## Last one was TRUE if(!q1[i, 1]){ ## Changed to FALSE q2[j,] = c(as.character(index(q1[i,1])), "SELL") j <- j+1 } }else{ ## Last one was FALSE if(q1[i, 1]){...

Greetings R users, I have been working on running plsda and I would like to have the R2 and Q2 values. I know the function R2 from the 'pls' package will generate both R2 and Q2 but they are for each separate class. Is there a way to get the cumulative R2 and Q2 for the whole model? R2(pls.new, estimate="all") Response: B (Intercept) 1 comps 2 comps train...

...Thanks to those who have helped in multiple circumstances. However, I wanted to post this question once more. I hope someone will read it and perhaps have some additional insight into what I may be able to do. Thank you, I have been working on running plsda and I would like to have the R2 and Q2 values. I know the function R2 from the 'pls' package will generate both R2 and Q2 but they are for each separate class. Is there a way to get the cumulative R2 and Q2 for the whole model? R2(pls.new, estimate="all") Response: B (Intercept) 1 comps 2 comps train...

Hello, I have a question on how to tabulate the time series data. I use RStudio, but if can be done in any other R editor, it should work in RStudio as well. > a1<-11:22 > a1ts<-ts(a1, frequency=4, start=c(1978,1)) > a1ts Qtr1 Qtr2 Qtr3 Qtr4 1978 11 12 13 14 1979 15 16 17 18 1980 19 20 21 22 If I click the variable "a1ts" on the