search for: tea3rd

...http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example [2] http://adv-r.had.co.nz/Reproducibility.html [3] https://cran.r-project.org/web/packages/reprex/index.html -- Sent from my phone. Please excuse my brevity. On July 9, 2017 12:32:32 PM PDT, Thomas Adams <tea3rd at gmail.com> wrote: >Hello all, > >After more digging I was able to find out how to do this. The answer >came >from an example here: > >https://stackoverflow.com/questions/3541713/how-to-plot-two-histograms-together-in-r > > >yr_1997<-data.frame(bias=ann_bias$bi...

Hello! I am using probplot in the e1071 package and want to do something like the following, only with the the 2nd plot overlaying the first. I can't seem to make it work. Any suggestions? *library(e1071) **x <- rnorm(100, mean=5)* *y <- rnorm(100, mean=3)* *probplot(x, line=FALSE) * *probplot(y, line=FALSE) * *Regards,* *Tom* [[alternative HTML version deleted]]

...r<-'2016' bias<-rbind(yr_1997,yr_1998,yr_1999,yr_2000,yr_2001,yr_2002,yr_2003,yr_2004,yr_2005,yr_2006,yr_2007,yr_2008,yr_2009,yr_2010,yr_2011,yr_2012,yr_2013,yr_2014,yr_2015,yr_2016) histogram(~ bias | year, data=bias) Cheers! Tom On Sun, Jul 9, 2017 at 11:21 AM, Thomas Adams <tea3rd at gmail.com> wrote: > Hi all, > > I can not seem to get what I want using the Lattice package to generate an > array of histograms of > spatialgrid dataframe data. > > I can use the sp package and spplot to generate an array of maps that > display an array of spatialgri...

..._data, example_data$year), transform, obs = seq_along(year))) dcast(example_data, obs ~ year, value.var = "score") Best, Ista On Wed, Jul 5, 2017 at 2:16 PM, Thomas Adams <tea3rd at gmail.com> wrote: > Hi all: > > I'm struggling with getting my data re-formatted using functions in > reshape/reshape2 to get from: > > 1957 0.862500000 > 1958 0.750000000 > 1959 0.300000000 > 1960 0.287500000 > 1963 0.675000000 > 1964 0.937500000 > 196...

Hi all, I can not seem to get what I want using the Lattice package to generate an array of histograms of spatialgrid dataframe data. I can use the sp package and spplot to generate an array of maps that display an array of spatialgrid dataframe data -- that's good. I have:

Hi all: I'm struggling with getting my data re-formatted using functions in reshape/reshape2 to get from: 1957 0.862500000 1958 0.750000000 1959 0.300000000 1960 0.287500000 1963 0.675000000 1964 0.937500000 1965 0.025000000 1966 0.387500000 1969 0.087500000 1970 0.275000000 1973 0.500000000 1974 0.362500000 1976 0.925000000 1978 0.712500000 1979 0.337500000 1980 0.700000000 1981 0.425000000

...$year), > transform, > obs = seq_along(year))) > > dcast(example_data, > obs ~ year, > value.var = "score") > > Best, > Ista > > > On Wed, Jul 5, 2017 at 2:16 PM, Thomas Adams <tea3rd at gmail.com> wrote: >> Hi all: >> >> I'm struggling with getting my data re-formatted using functions in >> reshape/reshape2 to get from: >> >> 1957 0.862500000 >> 1958 0.750000000 >> 1959 0.300000000 >> 1960 0.287500000 >> 1963 0....

Hi again all, Several replied ASAP that I also needed reshape loaded and not just reshape2. Hmmm tried that and I had some output but not the correct format. What I need is to run simulations of time overlap between species as per the simulation program data input constraints: The basis for the simulations is a species by _time-use matrix in which species are arranged in rows, and time

I'm experiencing odd graphics device behavior running R 2.15.3 on Ubuntu. Regardless of what I try like: require(stats) plot(cars) lines(lowess(cars)) plot(sin, -pi, 2*pi) for example, the graphics device fills the entire screen with the graphic and a very large font. When I shrink the graphics device window, the lettering remains large and the line thicknesses stay quite thick. It may have

...t=F) > points(qq.y$y, qq.y$x) > > I hope this is useful for you. > > Best Regards, > > Luisfo Chiroque > > PhD Student > IMDEA Networks Institute > > http://fourier.networks.imdea.org/people/~luis_nunez/ > > > El 4 abr 2016, a las 18:19, Thomas Adams <tea3rd at gmail.com> escribi?: > > Hello! > > I am using probplot in the e1071 package and want to do something like the > following, only with the the 2nd plot overlaying the first. I can't seem to > make it work. Any suggestions? > > *library(e1071) > **x <- rnorm(10...

..., plot=F) points(qq.y$y, qq.y$x) I hope this is useful for you. Best Regards, Luisfo Chiroque PhD Student IMDEA Networks Institute http://fourier.networks.imdea.org/people/~luis_nunez/ <http://fourier.networks.imdea.org/people/~luis_nunez/> > El 4 abr 2016, a las 18:19, Thomas Adams <tea3rd at gmail.com> escribi?: > > Hello! > > I am using probplot in the e1071 package and want to do something like the > following, only with the the 2nd plot overlaying the first. I can't seem to > make it work. Any suggestions? > > *library(e1071) > **x <- rnorm...

Hello all: I wrote a function: my.bastimeToSynoptic <- function(x) { f<-unlist(strsplit(as.character(x), " ")) hr<-unlist(strsplit(f[2], ":")) if(as.numeric(hr[1])<6) { synoptic<-"00" } else { synoptic<-as.integer(as.numeric(hr[1])/6)*6 } tdate<-paste(c(f[1],"

This does not use reshape/reshape2, but it is pretty straightforward. Assuming X is your example data: > Y <- split(X[, 2], X[, 1]) > vals <- sapply(Y, length) > pad <- max(vals) - vals > Y2 <- lapply(seq_along(Y), function(x) c(Y[[x]], rep(NA, pad[x]))) > names(Y2) <- names(Y) > X2 <- do.call(cbind, Y2) > X2[, 1:6] 1957 1958 1959

Given that we occasionally run into problems with comparing Excel results to R results, and other spreadsheet-induced errors, I thought this might be of interest. http://www.nextnewdeal.net/rortybomb/researchers-finally-replicated-reinhart-rogoff-and-there-are-serious-problems The punchline: "If this error turns out to be an actual mistake Reinhart-Rogoff made, well, all I can hope is that

...? ? ? O.O#.? ? ? ?#.O#.? with > /Software/Embedded Controllers)? ? ? ? ? ? ? ?.OO#.? ? ? ?.OO#.? > rocks...1k > --------------------------------------------------------------------------- > > > > > -- > Thomas E Adams, III1724 Sage Lane > Blacksburg, VA 24060 > tea3rd at gmail.com (personal) > tea at terrapredictions.org (work) > > 1 (513) 739-9512 (cell) > > > --------------------------------------------------------------------------- Jeff Newmiller The ..... ..... Go Live... DCN:<jdnewmil at dcn.davis....

...ch Engineer (Solar/Batteries O.O#. #.O#. with > /Software/Embedded Controllers) .OO#. .OO#. rocks...1k > ------------------------------------------------------------ > --------------- > -- Thomas E Adams, III 1724 Sage Lane Blacksburg, VA 24060 tea3rd at gmail.com (personal) tea at terrapredictions.org (work) 1 (513) 739-9512 (cell) [[alternative HTML version deleted]]

Thanks for the dput... #### reproducible example of split-apply-combine ### dta <- structure(list(date = structure(c(1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L, 11L, 12L, 13L, 14L, 15L, 16L, 17L, 18L, 19L, 20L, 5L, 6L, 7L, 8L, 9L, 10L, 11L, 12L, 13L, 14L, 15L, 16L, 17L, 18L, 19L, 20L, 21L, 22L, 23L, 24L, 7L, 8L, 9L, 10L, 11L, 12L, 13L, 14L, 15L, 16L), .Label = c("2012-01-25 18:00:00",

Hello all! I've been struggling with is for many hours today; I'm close to getting what I want, but not close enough... I have a dataframe consisting of two date-time columns followed by two numeric columns. what I need is the max value (in the first numeric column) based on the 2nd date-time column, which is essentially a factor. But, I want the result to provide both date-time values