search for: fev0

Displaying 1 result from an estimated 1 matches for "fev0".

Did you mean: fe80
2010 Dec 22
1
Seeking feedback on my first attempt at R programming
...01 3.90   104 P 2.24 3.01   105 P 2.25 2.47 107 P 1.65 1.99   111 P 1.95 <NA>   112 P 3.05 3.26 114 P 2.75 2.55   115 P 1.60 2.20   117 P 2.77 2.56 119 P 2.06 2.90   122 P 1.71 <NA>   123 P 3.54 2.92 ")   fev <- data.frame(scan(connection,  list(patno = 0, trtgrp = "", fev0 = 0, fev6 = 0), na.strings="<NA>"))   fev <- within(fev,trtgrp <- factor(trtgrp, labels = c("ABC-123","Placebo"))) fev <- within(fev,chg <- fev6 - fev0)   summaryfn <- function(x)  data.frame(n=sum(complete.cases(x)),mean=mean(x),std.dev=sd(x), t.v...