search for: resultmat

...as.Date("2012-03-01"), length.out = 100, by = "1 month")))); rownames(RawData) <- "XYZ" CutOffDate <- as.Date("2012-09-01") NewDateSeries <- as.character(as.yearmon(seq(CutOffDate, to = as.Date("2025-01-01"), by = "1 month"))) ResultMat <- matrix(NA, 1, length(NewDateSeries)) colnames(ResultMat) <- NewDateSeries rownames(ResultMat) <- "Result" RawData ResultMat Now I need to pass the elements of 'RawData' to 'ResultMat' in following way: Consider the column 'Sep 2012' of 'ResultM...

...The particular data I have fill up the plotting area (stacked bar charts, going to 100% in each bar) 2) I've tried using "locator()" to position the legend. This only works, so far, if I am not using trying to divert output to another device -- like creating a PDF via pdf(); barplot(resultmat); dev.off(); so if I take out the pdf() and the dev.off() and just do this: barplot(resultmat); legend(locator(1),legend=l,fill=colors); it works, on the graphics display device window on screen. However, if I do this: pdf(onefile=FALSE); barplot(resultmat); legend(locator(1),legend=l,fill=color...

...wei.shape, scale = xwei.scale draw <- lapply(1:100, function(.x){ out<-rweibull(x, shape=xwei.shape, scale = xwei.scale) }) newx<- data.frame(draw) colnames(newx)<-paste("x", 1:100, sep = "") newmat<-data.matrix(newx) # matrix of coefficients rownum=2 colnum=100 ResultMat<-matrix(NA, ncol=colnum, nrow=rownum) rownum2=45 colnum2=100 ResultMat2<-matrix(NA, ncol=colnum2, nrow=rownum2) #loop through each column in the source matrix for (i in 1:100) { sel_col<-newmat[col(newmat)==i] {ResultMat[,i]<-coef(fitdistr(sel_col,"weibul...

Hi everyone, I'm having trouble applying the Cor() function to two matrices, both of which contain NAs. I am doing the following: a<-cor(m1, m2, use="complete.obs") ... and I get the following error message: Error in cor(m1, m2, use = "complete.obs") : no complete element pairs Does anyone know how I can apply a correlation, ignoring any NAs? Thanks, rcoder --