search for: dfc

...ughput)[names(throughput)=="Group.2"] <- "Partitioning" names(throughput)[names(throughput)=="x"] <- "Y" head(throughput) samples = 9 throughput$Time_group <- floor(throughput$Time/samples) + 1 # generate Time groups of "samples" dfc <- summarySE(throughput, measurevar="Y", groupvars=c("Time_group", "Partitioning")) last <- length(dfc$Time) dfc <- dfc[c(-1,-2,-(last-1),-last),] dfc$Time <- dfc$Time - min(dfc$Time) + 1 head(dfc) # mu + se error bar ggplot(dfc, aes(x=Time, y=Y, colour=Pa...

...ables that are not arguments of my function. As an example: here is a clustering function I wrote: cl <- function(dat, na.rm = TRUE, fm, cluster){ attach( dat , warn.conflicts = F) library(sandwich) library(lmtest) M <- length(unique(cluster)) N <- length(cluster) K <- fm$rank dfc <- (M/(M-1))*((N-1)/(N-K)) uj <- data.frame(apply(estfun(fm),2, function(x) data.frame(tapply(x, cluster, sum)) ) ); vcovCL <- dfc*sandwich(fm, meat=crossprod(uj)/N) coeftest(fm, vcovCL) } When I run my function, I get the message: Error in tapply(x, cluster, sum) : arguments must...

...d == "smallsample") { if( any( class(fit) == "coxph" ) ){ ### this loop is the hack for survival analysis ### status <- fit$y[ , 2] n.events <- sum(status == max(status)) p <- length( coefficients( fit ) ) dfc <- n.events - p } else { dfc <- fit$df.residual } df <- dfc/((1 - (f/(m + 1)))/(1 - f) + dfc/df) } names(r) <- names(df) <- names(f) <- names fit <- list(call = call, call1 = object$call, call2 = object$call1,...

...urprised that my cast function wasn't working like before. What I did/want to do: 1) Melt a dataframe based on a vector specifying column names as measure.vars. Thats working so far: dfm <- melt(df, measure.vars=n, variable_name = "species", na.rm = FALSE) 2) Recast the dataframe: dfc <- cast(dfm, Var1 + Var2 + Var3 + Var4 ~ species,max) # with reshape dfc <- dcast(dfm, Var1 + Var2 + Var3 + Var4 ~ species,max) # with reshape2 but then I get (this is new to reshape2!) a warning message: In .fun(.value[0], ...) : no non-missing arguments to max; returning -Inf The result s...

R-helpers: I have a dataset that has 168 subjects and 12 variables. Some of the variables have missing data and I want to use the multiple imputation capabilities of the "mice" package to address the missing data. Given that mice only supports linear models and generalized linear models (via the lm.mids and glm.mids functions) and that I need to fit Cox models, I followed the previous

I read in a CSV file with Data <- read.csv(file="FileName.csv",head=TRUE,sep=",") the file containts strings in the 2nd and 3rd columns and each has about 1000 rows. I need to either loop through the strings there looking for strings that would trigger other logic or remove those rows and put them in another array and loop through them in the new array. I can't seem

Hi There, I get the following error from the code pasted below: Error in storage.mode(test) <- "logical" : object 'HGBmt12_Natl_Ave_or_Facility' not found library(RODBC) library(car) setwd("c://temp//cms") a07.connect <- odbcConnectAccess2007("DFC.accdb") sqlTables(a07.connect) ##provides list of tables## dataset <- sqlFetch(a07.connect,'Analysis File 2007-2009') #puts dfc data into table mydata str(dataset) #this works and gives correct values HGlt102009=dataset[,6] HGBL10_F_2007 =dataset[,11] HGmt122009=dataset[,7] HGBL12_...

...can run the model but I cant locate/produce much of anything beyond the predicted values and confusion matrix. I've been searching for more examples or documentation but cant seem to locate any specific to the program itself. I need to be able to find the Discriminant function coefficients (DFC) and Correlations between the DFC's and the variables (I believe these are referred to as the "total canonical structure" in SAS I ultimately want to graph the total canonical structure coefficients for the first 2 discriminant variables along with the groups scores calcu...

Hello, Have anybody a hint, how I could iterate over the vector below. So I'll wish only 8 iterations. Put the "range vector" in c() didn't help. for(i in c(1,2,3,4,5,11:20,21:50,51:100)) { sum(dfc[i,"cnt"]) # or similar actions } Thanks in advance Christian

Hello, I would like to reshape a dataframe into an array. This is kind a similar task as Excel performs with a Pivot table. To illustrate it: LOC <- factor(c(1,2,2,3,1,1)) SPEC1 <- c(0,0,23,0,12,11) SPEC2 <- c(1,2,0,0,0,4) df <- data.frame(LOC,SPEC1,SPEC2) # original dataframe a <-

...work, but produced some NAs where there was no reason for them. I debugged apply and found that some logical values are transformed to " TRUE" instead of "TRUE". I did not follow that up closer. Instead I worked around it by doing the string conversion myself and then call apply(dfc,1,All)

Package: logcheck-database Version: 1.2.37 Severity: normal Hello again, openntpd gives messages like these failry often: Apr 7 14:25:55 terminus ntpd[673]: peer 204.17.42.202 now invalid Apr 7 14:26:10 terminus ntpd[673]: peer 204.17.42.202 now valid I am not sure if this is something that an admin may find relevant but they happen fairly often and they do not offer a lot of info for me.

Package: logcheck-database Version: 1.2.36 Severity: wishlist Hello, I recently blew away my old logcheck-databse and lost a number of changes that i had made to postfix entries. The default database for postfix reports the following errors that do not seem to be important... Apr 2 13:00:19 terminus postfix/local[29516]: 574B9B3B9F: to=<doug at localhost>, relay=local, delay=13,

...where there was no reason for them. > I debugged apply and found that some logical values are > transformed to " TRUE" > instead of "TRUE". I did not follow that up closer. Instead I > worked around it > by doing the string conversion myself and then call apply(dfc,1,All) > > ______________________________________________ > R-devel@stat.math.ethz.ch mailing list > https://www.stat.math.ethz.ch/mailman/listinfo/r-devel > > ------------------------------------------------------------------------------ Notice: This e-mail message, togethe...

...where there was no reason for them. > I debugged apply and found that some logical values are > transformed to " TRUE" > instead of "TRUE". I did not follow that up closer. Instead I > worked around it > by doing the string conversion myself and then call apply(dfc,1,All) > > ______________________________________________ > R-devel@stat.math.ethz.ch mailing list > https://www.stat.math.ethz.ch/mailman/listinfo/r-devel > > ------------------------------------------------------------------------------ Notice: This e-mail message, togethe...

...q=E6]=AD=D5I =BC=86=C7=D9n=8F=EFv_l=CBR=A6A=AEt=DF=F6=F9=F3 =EE= =A6=CF =99=FB=DD=D3GA=B9?=CC,=8A=BF=99=A2Iw=FAP=B0k=F42=EDr=C0=DB%=B9J=F2=EC ?=B4=AF=CFY=D2a=CD.=AD=E9=D79w=8B=AF=B0=D5=A3=89=93=88=8E=E9LM=DA=B7z=85'= =ABd=94s=EF=A0j=9C=C8e=ABi=AC [?-|DJ=D6=E0-o=96=C7=B1F=F7g=B7G=88SZ=84P=C9 =C2=DFC=E0=DE=A9=97=CB=C4=CF=B4>=CB3d=B16=C6!=E3,5=C5=FE=BB=D2=CA=FB|=93=94= "=D0 =D8P =ADw p=A0N=D4=B5=D7h=E0=9E=D7YGk=E0=CE=85k.=B1=D1p=FB=EEC=B1l=C3=F6z=BF=DB=89=D3= 1=E8 b{=96_3=FD}=E1B=DD!=EA=AB=92=BD=B8=ABfB=A8-w=CDP=C4=AB=DEyf WH =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D...

...amp;K-t8K*2a;i$G#<QBkC-(CA3vDyh-Zns*ObtB-gwQAVMNdL7^fA2Ze!< zgN1?ct(BTn5J3+TD<GL-#C`3ORK08qqG&7+Dj1+7<NSr??iJb5rfWi|iXNM#j>3H^ zsu?YmRz~j+$*;A#=A!YLR%7mPAEx_)Qe`EDAgt8&Iv;psh+Xgm+9Mm!KfE`(%afmt zmB=6%l!&yL@C9}AhJI?OhY1%D52iAE+pv^tRc!Z6{CniWKnF1C-ln2I;m8?OKVXb; z-mNXML<+DFC|cBk9L#Z)VYp_#hE;H9hBqS=k&?-L;%CAKZfO^4r4<jFe-{tBcgup6 z3aJxRbcfZoHN<87SDOMFS{^fx>H>=+&XQ3O<bG1TQyTt;c66wQ2|BCI<g2ON{Qk@_ zcu-GU>Z0kpe#^ESYh#Cautr>VS!K@=`Q)iNfpS2e#@4bp5%x2DG7>;~F1!y4B&j># z0*9}9fSo=I1|@>zv%z%I26?rEPwCvH(k*_0;9g_xiV#{HZ`%|~jT>8|_FP$4Q}...

Hello list. I'm trying to rebuild the 2.6.9.67.0.20.EL kernel, but it fails even without modifications. How did I try it? Created a (non-root) build environment (not a mock ) Installed the kernel.scr.rpm and did a rpmbuild -ba --target=`uname -m` kernel-2.6.spec 2> prep-err.log | tee prep-out.log The build failed at the end: Processing files: kernel-xenU-devel-2.6.9-67.0.20.EL Checking