similar to: Processing a large number of files

I've written a package to assist with using R in Hadoop Streaming. The main point of the package is to help make command-line runnable RScript files. I'd like to provide a demo RScript file, a demo data file (e.g. a plaintext file, not something already processed by R) , as well as demo bash shell scripts that demonstrate how to run the job from the command line and in a Hadoop

Hello! In the book Modern Applied Statistics with S (4th ed), section 5.6 the concept of the "average shifted histogram" or ASH is mentionend. Also it is mentioned in the same section "The code used is in the scripts for this chapter" (from figure caption 5.8, analysis of the geyser duration data). *However*, I have trouble finding the code for that function! Admittedly, I am a

I maintain the Devore5 package for R. This package provides the data sets from Jay Devore's text "Probability and Statistics for Engineering and the Sciences (5th ed)". I am having difficulty reproducing some logistic regression results from the textbook. Perhaps this is because I am not using the glm function correctly. The data from Example 13.5 (page 559 for those with a copy

https://bugs.freedesktop.org/show_bug.cgi?id=91632 Bug ID: 91632 Summary: Crash in nouveau Product: Mesa Version: unspecified Hardware: Other OS: All Status: NEW Severity: normal Priority: medium Component: Drivers/DRI/nouveau Assignee: nouveau at lists.freedesktop.org

This is an example from chapter 11 of the 6th edition of Devore's engineering statistics text. It happens to be a balanced data set in two factors but the calculations will also work for unbalanced data. I create a factor called 'cell' from the text representation of the Variety level and the Density level using '/' as the separator character. The coefficients for the linear

We're using Samba 3.0.21a-1 on a CentOS 4.2 server (kernel 2.6.9-22.0.2.ELsmp); everything works more or less fine, it's functioning as the PDC with an OpenLDAP back end (setup essentially straight from the Idealx.org playbook), etc. We're trying to mount Windows shares to back them up, and getting "permission denied" errors when trying to read certain files from those

Dear R Help Members, I am aware how to plot the LD1 vs LD2 from a lda in R, using the code: plot(baseline.systat.hat$x, col=baseline.systat.hat$class,pch=as.numeric(baseline.systat.hat$class)) However, I need to use the quadratic discriminant function, qda due to data properties. Is there a way to obtain the same sort of plot for from a qda object (and the output of predict qda). I have not

Hi folks, I tried to retain the Weibull distribution using the `nls' function and proceeding along the lines of the example provided in the `SSweibull' help (at least I thought so): t <- (1:200)/100 v <- pweibull(t, shape=3, scale=1) df <- data.frame(Time=t, Value=v) Asym <- 1.0; Drop <- 1.0; lrc <- 0; pwr <- 1 df.estimate <- nls(Value ~ SSweibull(Time,

I have copied the R FAQ pertaining to available packages into an EXCEL file. They take the following form - Design Regression modeling, testing, estimation, validation, graphics, prediction, and typesetting by storing enhanced model design attributes in the fit. Design is a etc. Devore5 Data sets and sample analyses from "Probability and Statistics for Engineering and the Sciences (5th

Hi, I need some help with running a recursive function. I like to run funlp2 recursively. When I try to run recursive function in another function named "calclp" I get this "Error: any(!dat2$norm_sd) >= 1 is not TRUE". I have never built a recursive function before so having trouble executing it in this case. I would appreciate any help or guidance to resolve this issue.

You seem to have a typo at this expression (and some others like it) Namely, you write any(!dat2$norm_sd) >= 1 when you possibly meant to write !( any(dat2$norm_sd) >= 1 ) i.e. I think your ! seems to be in the wrong place. HTH, Eric On Thu, Dec 14, 2017 at 3:26 PM, DIGHE, NILESH [AG/2362] < nilesh.dighe at monsanto.com> wrote: > Hi, I need some help with running a

My own typo ... whoops ... !( any(dat2$norm_sd >= 1 )) On Thu, Dec 14, 2017 at 3:43 PM, Eric Berger <ericjberger at gmail.com> wrote: > You seem to have a typo at this expression (and some others like it) > > Namely, you write > > any(!dat2$norm_sd) >= 1 > > when you possibly meant to write > > !( any(dat2$norm_sd) >= 1 ) > > i.e. I think your !

Hi, I accidently left out few lines of code from the calclp function. Updated function is pasted below. I am still getting the same error ?Error: !(any(data1$norm_sd >= 1)) is not TRUE? I would appreciate any help. Nilesh dput(calclp) function (dataset) { dat1 <- funlp1(dataset) recursive_funlp <- function(dataset = dat1, func = funlp2) { dat2 <- dataset %>%

Eric: Thanks for taking time to look into my problem. Despite of making the change you suggested, I am still getting the same error. I am wondering if the logic I am using in the stopifnot and if functions is a problem. I like the recursive function to stop whenever the norm_sd column has zero values that are above or equal to 1. Below is the calclp function after the changes you suggested.

The message is coming from your stopifnot() condition being met. On Thu, Dec 14, 2017 at 5:31 PM, DIGHE, NILESH [AG/2362] < nilesh.dighe at monsanto.com> wrote: > Hi, I accidently left out few lines of code from the calclp function. > Updated function is pasted below. > > I am still getting the same error ?Error: !(any(data1$norm_sd >= 1)) is > not TRUE? > > >

If you are trying to understand why the "stopifnot" condition is met you can replace it by something like: if ( any(dat2$norm_sd >= 1) ) browser() This will put you in a debugging session where you can examine your variables, e.g. > dat$norm_sd HTH, Eric On Thu, Dec 14, 2017 at 5:33 PM, Eric Berger <ericjberger at gmail.com> wrote: > The message is coming from

Eric: I will try and see if I can figure out the issue by debugging as you suggested. I don?t know why my code after stopifnot is not getting executed where I like the code to run the funlp2 function when the if statement is TRUE but when it is false, I like it to keep running until the stopifnot condition is met. When the stopifnot condition is met, I like to get the output from if statement

Your code contains the lines stopifnot(!(any(data1$norm_sd >= 1))) if (!(any(data1$norm_sd >= 1))) { df1 <- dat1 return(df1) } stop() "throws an error", causing the current function and all functions in the call stack to abort and return nothing. It does not mean to stop now and return a result. Does the function give

Hi, I am working on a package which requires separate documentation (tutorial documentation, really, with a lot of beautifully latexed equations), and does not use R-help. I am trying to make it so that my help function will automatically search R-help if the help topic isn't found in my documentation. The function looks something like this: help.pkg <- function(topic) { #

Hi, I am working on a package which requires separate documentation (tutorial documentation, really, with a lot of beautifully latexed equations), and does not use R-help. I am trying to make it so that my help function will automatically search R-help if the help topic isn't found in my documentation. The function looks something like this: help.pkg <- function(topic) { #