search for: dhhs

...heir investment into R: Ideally there should be enough staff who can judge and test such bugs and bug fixes? --> I'm BCC'ing this to one place at least. Best, Martin Maechler ETH Zurich > On Thu, Nov 17, 2016 at 2:28 PM, Laviolette, Michael < > Michael.Laviolette at dhhs.nh.gov> wrote: >> The packages "readxl" and "haven" (and possibly others) >> no longer access files on shared network drives. The >> problem appears to be in the normalizePath() >> function. The file can be read from a local drive or b...

...be fixed in the same way Michael found, namely, set the environment variables to use the local mapping rather than the network share. But ideally, the fix would be to treat Windows network paths correctly. Best, Evan On Wed, Nov 30, 2016 at 7:16 AM, Laviolette, Michael < Michael.Laviolette at dhhs.nh.gov> wrote: > In researching another issue, I discovered a workaround: the network drive > folder needs to be mapped to the local PC. > > setwd("//Hzndhhsvf2/data/OCPH/EPI/BHSDM/Group/Michael Laviolette/Stat > tools") > df1 <- readxl::read_excel("addrlist-...

...l" and "haven" (and possibly others) no longer access files on shared network drives. The problem appears to be in the normalizePath() function. The file can be read from a local drive or by functions that don't call normalizePath(). The error thrown is Error: path[1]="\\Hzndhhsvf2/data/OCPH/EPI/BHSDM/Group/17.xls": The system cannot find the file specified Here's my session: library(readxl) library(XLConnect) # attempting to read file from network drive df1 <- read_excel("//Hzndhhsvf2/data/OCPH/EPI/BHSDM/Group/17.xls") # pathname is fully qualifie...

Hello--I'm doing a simple crosstab using dcast: rawfreq <- dcast(nh11brfs, race3~CHCCOPD, length) with the results race3 Yes No NA 1 White non-Hispanic 446 5473 21 2 Other non-Hispanic 29 211 0 3 Hispanic 6 81 1 4 <NA> 10 83 1 How would I modify this call to exclude all missing values; that is, to obtain race3

...he first path after the single backslash as an actual directory, rather than as the name of the share? -- Evan Cortens, PhD Institutional Analyst - Office of Institutional Analysis Mount Royal University 403-440-6529 On Thu, Nov 17, 2016 at 2:28 PM, Laviolette, Michael < Michael.Laviolette at dhhs.nh.gov> wrote: > The packages "readxl" and "haven" (and possibly others) no longer access > files on shared network drives. The problem appears to be in the > normalizePath() function. The file can be read from a local drive or by > functions that don't call...

My data frame consists of character variables, factors, and proportions, something like c1 <- c("A", "B", "C", "C") c2 <- factor(c(1, 1, 2, 2), labels = c("Y","N")) x <- c(0.5234, 0.6919, 0.2307, 0.1160) y <- c(0.9251, 0.7616, 0.3624, 0.4462) df <- data.frame(c1, c2, x, y) pct <- function(x) round(100*x, 1) I want to

...results are getting out of order after I do the following command: count = result.inject({}) { |hsh, row| hsh[row[''name'']] = row[''count''].to_i; hsh } Why? Here are more specifics: My complete method is this (based off of acts_as_taggable code - not'' DHHs, but the original one): def self.sql_to_count_plays(lookback) sql = ["SELECT t.name as name, COUNT(*) as count FROM histories h, tags t WHERE h.tag_id = t.id AND created_on > ? GROUP BY tag_id ORDER BY...

In researching another issue, I discovered a workaround: the network drive folder needs to be mapped to the local PC. setwd("//Hzndhhsvf2/data/OCPH/EPI/BHSDM/Group/Michael Laviolette/Stat tools") df1 <- readxl::read_excel("addrlist-4-MikeL.xls", 2) # fails, throws same error df2 <- readxl::read_excel("Z:/Stat tools/addrlist-4-MikeL.xls", 2) # works -----Original M...

...type) 2. If I don't include anything in the ... (i.e. I don't ask for robust=TRUE in the call), then it works fine. Any help is greatly appreciated. Thank you, Hormuzd Katki Hormuzd Katki Biostatistics Branch, Division of Cancer Epidemiology and Genetics National Cancer Institute, NIH, DHHS 6120 Executive Blvd. Room 8044 MSC 7244 Rockville, MD 20852-4910 301-594-7818 (voice) 301-402-0081 (fax) katkih at mail.nih.gov

[This email is either empty or too large to be displayed at this time]

...nd the file specified > I have had the same problem for months. Have you found a solution? Maurice O. Maurice Haynes, Ph.D. Statistician, Child and Family Research Section Laboratory for Comparative Ethology Eunice Kennedy Shriver National Institute of Child Health and Human Development NIH, DHHS 6705 Rockledge Drive, Suite 8030 Bethesda, Maryland 20892 Phone: 301-496-8180 E-mail: mh192j@nih.gov<mailto:mh192j@nih.gov> [[alternative HTML version deleted]]

I'm having difficulty overlaying maps when writing to a file graphics device. My command sequence has the structure plot(map1) par(new = T) plot(map2) On the screen device, it works fine. When I attempt something like png(file = "map.png") plot(map1) par(new = T) plot(map2) dev.off() only the last map appears, the previous ones having been cleared. Can someone clarify? Thanks,

I'm trying to use sqldf to query for the earliest date of a blood test when patients have had multiple tests in a given year. My query looks like this: test11 <- sqldf("select CHILD_ID, min(SAMP_DATE) from lab group by CHILD_ID having extract (year from SAMP_DATE) = 2011") SAMP_DATE has class "date." I get the error

Hi everybody. After DHHs talk at RailsConf yesterday, it''s essential that some of you can rectify this patch for ruby on Rails Please help me an have a look at http://dev.rubyonrails.org/ticket/9587 Thanks! Jesper Rønn-Jensen blog: www.justaddwater.dk ===== ActiveRecord::Errors has a placeholder (@@default_err...

I'm trying to use the survey package to calculate a risk difference with confidence interval for binge drinking between sexes. Variables are X_RFBING2 (Yes, No) and SEX. Both are factors. I can get the group prevalences easily enough with result <- svyby(~X_RFBING2, ~SEX, la04.svy, svymean, na.rm = TRUE) and then extract components from the svyby object with SE() and coef() to do the

Dear R community I am using the gee package to run logistics regression on paired cases from a panel sample. We are getting request from a reviewer to use sample weights to account for different level of attrition. After searching the documentation I am unable to find a way to incorporate sample weights into the gee formula. I found a way to incorporate precision weight but I understand that I

Hi all: Can someone advice me on how to hold the residuals Mean sq value on a string so it can be used in other calculations. I was trying something like this: Msquare<-dfr$Mean sq but fails..Thanks dfr <- read.table(textConnection("percentQ Efficiency 1.565 0.0125 1.94 0.0213 0.876 0.003736 1.027 0.006 1.536 0.0148 1.536 0.0162 2.607 0.02 1.456 0.0157 2.16 0.0103

I'm studying the calibration function in the survey package in preparation for raking some survey data. Results from the rake function below agree with other sources. When I run calibrate, I get a warning message and the M and F weights seem to be reversed. Even allowing for that, the deviation between calibrated and raked weights is much more than I expected. I see that in the calibrate