The R Project SVN R-packages

Rev

Rev 2 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed


R : Copyright 2001, The R Development Core Team
Version 1.3.0 Under development (unstable) (2001-02-19)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type `license()' or `licence()' for distribution details.

R is a collaborative project with many contributors.
Type `contributors()' for more information.

Type `demo()' for some demos, `help()' for on-line help, or
`help.start()' for a HTML browser interface to help.
Type `q()' to quit R.

> library(foreign)
> pc5 <- read.dta("pc5.dta")
> summary(pc5)
      age             alb           alkphos         ascites      
 Min.   :26.28   Min.   :1.960   Min.   :   -9   Min.   :-9.000  
 1st Qu.:42.71   1st Qu.:3.330   1st Qu.:  423   1st Qu.: 0.000  
 Median :50.47   Median :3.570   Median : 1009   Median : 0.000  
 Mean   :50.45   Mean   :3.543   Mean   : 1525   Mean   :-2.074  
 3rd Qu.:56.99   3rd Qu.:3.820   3rd Qu.: 1677   3rd Qu.: 0.000  
 Max.   :78.44   Max.   :4.640   Max.   :13862   Max.   : 1.000  
      bili             chol            edema            edemarx       
 Min.   : 0.300   Min.   :  -9.0   Min.   :0.00000   Min.   :0.00000  
 1st Qu.: 0.700   1st Qu.:  -9.0   1st Qu.:0.00000   1st Qu.:0.00000  
 Median : 1.200   Median : 256.0   Median :0.00000   Median :0.00000  
 Mean   : 2.688   Mean   : 245.8   Mean   :0.09256   Mean   :0.07815  
 3rd Qu.: 3.000   3rd Qu.: 346.0   3rd Qu.:0.00000   3rd Qu.:0.00000  
 Max.   :28.000   Max.   :1775.0   Max.   :1.00000   Max.   :1.00000  
     hepmeg            time          plate          protime     
 Min.   :-9.000   Min.   :  41   Min.   : -9.0   Min.   : 9.00  
 1st Qu.: 0.000   1st Qu.:1434   1st Qu.:181.0   1st Qu.:10.00  
 Median : 0.000   Median :1487   Median :249.0   Median :10.60  
 Mean   :-1.750   Mean   :1760   Mean   :252.0   Mean   :10.67  
 3rd Qu.: 1.000   3rd Qu.:2153   3rd Qu.:321.0   3rd Qu.:11.00  
 Max.   : 1.000   Max.   :4795   Max.   :721.0   Max.   :18.00  
      sex              sgot           spiders           stage        
 Min.   :-9.000   Min.   : -9.00   Min.   :-9.000   Min.   :-9.0000  
 1st Qu.: 0.000   1st Qu.: 44.20   1st Qu.: 0.000   1st Qu.: 1.0000  
 Median : 1.000   Median : 88.35   Median : 0.000   Median : 3.0000  
 Mean   :-1.434   Mean   : 88.22   Mean   :-1.914   Mean   : 0.1351  
 3rd Qu.: 1.000   3rd Qu.:130.20   3rd Qu.: 0.000   3rd Qu.: 3.0000  
 Max.   : 1.000   Max.   :457.25   Max.   : 1.000   Max.   : 4.0000  
      cens              rx               trig            copper      
 Min.   :0.0000   Min.   :-9.0000   Min.   : -9.00   Min.   : -9.00  
 1st Qu.:0.0000   1st Qu.: 1.0000   1st Qu.: -9.00   1st Qu.: 10.00  
 Median :0.0000   Median : 1.0000   Median : 85.00   Median : 48.00  
 Mean   :0.2443   Mean   :-0.9788   Mean   : 81.44   Mean   : 65.26  
 3rd Qu.:0.0000   3rd Qu.: 2.0000   3rd Qu.:126.00   3rd Qu.: 88.00  
 Max.   :1.0000   Max.   : 2.0000   Max.   :598.00   Max.   :588.00  
       id            first             late              t0        
 Min.   :  1.0   Min.   :0.0000   Min.   :0.0000   Min.   :   0.0  
 1st Qu.: 99.5   1st Qu.:0.0000   1st Qu.:0.0000   1st Qu.:   0.0  
 Median :195.0   Median :0.0000   Median :0.0000   Median :   0.0  
 Mean   :199.6   Mean   :0.3657   Mean   :0.3657   Mean   : 543.8  
 3rd Qu.:302.5   3rd Qu.:1.0000   3rd Qu.:1.0000   3rd Qu.:1487.0  
 Max.   :418.0   Max.   :1.0000   Max.   :1.0000   Max.   :1487.0  
> str(pc5)
`data.frame':   659 obs. of  24 variables:
 $ age    : num  58.8 56.4 56.4 70.1 54.7 ...
 $ alb    : num  2.60 4.14 4.14 3.48 2.54 ...
 $ alkphos: num  1718 7395 7395  516 6122 ...
 $ ascites: num  1 0 0 0 0 0 0 0 0 0 ...
 $ bili   : num  14.5  1.1  1.1  1.4  1.8 ...
 $ chol   : num  261 302 302 176 244 244 279 279 248 248 ...
 $ edema  : num  1 0 0 1 1 1 0 0 0 0 ...
 $ edemarx: num  1 0 0 0.5 0.5 0.5 0 0 0 0 ...
 $ hepmeg : num  1 1 1 0 1 1 1 1 1 1 ...
 $ time   : num   400 1487 4500 1012 1487 ...
 $ plate  : num  190 221 221 151 183 183 136 136 -9 -9 ...
 $ protime: num  12.2 10.6 10.6 12.0 10.3 ...
 $ sex    : num  1 1 1 0 1 1 1 1 1 1 ...
 $ sgot   : num  137.9 113.5 113.5  96.1  60.6 ...
 $ spiders: num  1 1 1 0 1 1 1 1 0 0 ...
 $ stage  : num  4 3 3 4 4 4 3 3 3 3 ...
 $ cens   : num  1 0 0 1 0 1 0 0 0 1 ...
 $ rx     : num  1 1 1 1 1 1 2 2 2 2 ...
 $ trig   : num  172 88 88 55 92 92 72 72 63 63 ...
 $ copper : num  156 54 54 210 64 64 143 143 50 50 ...
 $ id     : num  1 2 2 3 4 4 5 5 6 6 ...
 $ first  : num  0 1 0 0 1 0 1 0 1 0 ...
 $ late   : num  0 0 1 0 0 1 0 1 0 1 ...
 $ t0     : num     0    0 1487    0    0 ...
 - attr(*, "datalabel")= chr ""
 - attr(*, "time.stamp")= chr "14 Feb 1997 14:22"
 - attr(*, "formats")= chr  "%9.0g" "%9.0g" "%9.0g" "%9.0g" ...
 - attr(*, "var.labels")= chr  "" "" "" "" ...
> sun6 <- read.dta("sun6.dta")
> summary(sun6)
      age             alb           alkphos         ascites      
 Min.   :26.28   Min.   :1.960   Min.   :   -9   Min.   :  0.00  
 1st Qu.:42.71   1st Qu.:3.330   1st Qu.:  423   1st Qu.:  0.00  
 Median :50.47   Median :3.570   Median : 1009   Median :  0.00  
 Mean   :50.45   Mean   :3.543   Mean   : 1525   Mean   : 58.14  
 3rd Qu.:56.99   3rd Qu.:3.820   3rd Qu.: 1677   3rd Qu.:  1.00  
 Max.   :78.44   Max.   :4.640   Max.   :13862   Max.   :247.00  
      bili             chol           edema            edemarx       
 Min.   : 0.300   Min.   :  120   Min.   :0.00000   Min.   :0.00000  
 1st Qu.: 0.700   1st Qu.:  267   1st Qu.:0.00000   1st Qu.:0.00000  
 Median : 1.200   Median :  376   Median :0.00000   Median :0.00000  
 Mean   : 2.688   Mean   :20235   Mean   :0.09256   Mean   :0.07815  
 3rd Qu.: 3.000   3rd Qu.:65527   3rd Qu.:0.00000   3rd Qu.:0.00000  
 Max.   :28.000   Max.   :65527   Max.   :1.00000   Max.   :1.00000  
     hepmeg            time          plate          protime     
 Min.   :  0.00   Min.   :  41   Min.   :   62   Min.   : 9.00  
 1st Qu.:  0.00   1st Qu.:1434   1st Qu.:  195   1st Qu.:10.00  
 Median :  1.00   Median :1487   Median :  256   Median :10.60  
 Mean   : 58.46   Mean   :1760   Mean   : 2340   Mean   :10.67  
 3rd Qu.:  1.00   3rd Qu.:2153   3rd Qu.:  330   3rd Qu.:11.00  
 Max.   :247.00   Max.   :4795   Max.   :65527   Max.   :18.00  
      sex              sgot           spiders          stage       
 Min.   :  0.00   Min.   : -9.00   Min.   :  0.0   Min.   :  1.00  
 1st Qu.:  1.00   1st Qu.: 44.20   1st Qu.:  0.0   1st Qu.:  3.00  
 Median :  1.00   Median : 88.35   Median :  0.0   Median :  3.00  
 Mean   : 58.78   Mean   : 88.22   Mean   : 58.3   Mean   : 60.35  
 3rd Qu.:  1.00   3rd Qu.:130.20   3rd Qu.:  1.0   3rd Qu.:  4.00  
 Max.   :247.00   Max.   :457.25   Max.   :247.0   Max.   :247.00  
      cens              rx              trig             copper     
 Min.   :0.0000   Min.   :  1.00   Min.   :   33.0   Min.   :    4  
 1st Qu.:0.0000   1st Qu.:  1.00   1st Qu.:   91.5   1st Qu.:   47  
 Median :0.0000   Median :  2.00   Median :  143.0   Median :   84  
 Mean   :0.2443   Mean   : 59.23   Mean   :20468.2   Mean   :15778  
 3rd Qu.:0.0000   3rd Qu.:  2.00   3rd Qu.:65527.0   3rd Qu.:  396  
 Max.   :1.0000   Max.   :247.00   Max.   :65527.0   Max.   :65527  
       id            first             late              t0        
 Min.   :  1.0   Min.   :0.0000   Min.   :0.0000   Min.   :   0.0  
 1st Qu.: 99.5   1st Qu.:0.0000   1st Qu.:0.0000   1st Qu.:   0.0  
 Median :195.0   Median :0.0000   Median :0.0000   Median :   0.0  
 Mean   :199.6   Mean   :0.3657   Mean   :0.3657   Mean   : 543.8  
 3rd Qu.:302.5   3rd Qu.:1.0000   3rd Qu.:1.0000   3rd Qu.:1487.0  
 Max.   :418.0   Max.   :1.0000   Max.   :1.0000   Max.   :1487.0  
> str(sun6)
`data.frame':   659 obs. of  24 variables:
 $ age    : num  58.8 56.4 56.4 70.1 54.7 ...
 $ alb    : num  2.60 4.14 4.14 3.48 2.54 ...
 $ alkphos: num  1718 7395 7395  516 6122 ...
 $ ascites: int  1 0 0 0 0 0 0 0 0 0 ...
 $ bili   : num  14.5  1.1  1.1  1.4  1.8 ...
 $ chol   : int  261 302 302 176 244 244 279 279 248 248 ...
 $ edema  : int  1 0 0 1 1 1 0 0 0 0 ...
 $ edemarx: num  1 0 0 0.5 0.5 0.5 0 0 0 0 ...
 $ hepmeg : int  1 1 1 0 1 1 1 1 1 1 ...
 $ time   : int  400 1487 4500 1012 1487 1925 1487 1504 1487 2503 ...
 $ plate  : int  190 221 221 151 183 183 136 136 65527 65527 ...
 $ protime: num  12.2 10.6 10.6 12.0 10.3 ...
 $ sex    : int  1 1 1 0 1 1 1 1 1 1 ...
 $ sgot   : num  137.9 113.5 113.5  96.1  60.6 ...
 $ spiders: int  1 1 1 0 1 1 1 1 0 0 ...
 $ stage  : int  4 3 3 4 4 4 3 3 3 3 ...
 $ cens   : int  1 0 0 1 0 1 0 0 0 1 ...
 $ rx     : int  1 1 1 1 1 1 2 2 2 2 ...
 $ trig   : int  172 88 88 55 92 92 72 72 63 63 ...
 $ copper : int  156 54 54 210 64 64 143 143 50 50 ...
 $ id     : int  1 2 2 3 4 4 5 5 6 6 ...
 $ first  : int  0 1 0 0 1 0 1 0 1 0 ...
 $ late   : int  0 0 1 0 0 1 0 1 0 1 ...
 $ t0     : int  0 0 1487 0 0 1487 0 1487 0 1487 ...
 - attr(*, "datalabel")= chr ""
 - attr(*, "time.stamp")= chr "14 Sep 2000 10:40"
 - attr(*, "formats")= chr  "%9.0g" "%9.0g" "%9.0g" "%9.0g" ...
 - attr(*, "var.labels")= chr  "" "" "" "" ...
> q()