hw1

## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

## Warning in rgl.init(initValue, onlyNULL): RGL: unable to open X11 display

## Warning: 'rgl.init' failed, running with 'rgl.useNULL = TRUE'.

## The following object is masked _by_ .GlobalEnv:
## 
##     bwght

## The following object is masked from package:wooldridge:
## 
##     bwght

## 'data.frame':    1388 obs. of  14 variables:
##  $ faminc  : num  13.5 7.5 0.5 15.5 27.5 7.5 65 27.5 27.5 37.5 ...
##  $ cigtax  : num  16.5 16.5 16.5 16.5 16.5 16.5 16.5 16.5 16.5 16.5 ...
##  $ cigprice: num  122 122 122 122 122 ...
##  $ bwght   : int  109 133 129 126 134 118 140 86 121 129 ...
##  $ fatheduc: int  12 6 NA 12 14 12 16 12 12 16 ...
##  $ motheduc: int  12 12 12 12 12 14 14 14 17 18 ...
##  $ parity  : int  1 2 2 2 2 6 2 2 2 2 ...
##  $ male    : int  1 1 0 1 1 1 0 0 0 0 ...
##  $ white   : int  1 0 0 0 1 0 1 0 1 1 ...
##  $ cigs    : int  0 0 0 0 0 0 0 0 0 0 ...
##  $ lbwght  : num  4.69 4.89 4.86 4.84 4.9 ...
##  $ bwghtlbs: num  6.81 8.31 8.06 7.88 8.38 ...
##  $ packs   : num  0 0 0 0 0 0 0 0 0 0 ...
##  $ lfaminc : num  2.603 2.015 -0.693 2.741 3.314 ...
##  - attr(*, "time.stamp")= chr "25 Jun 2011 23:03"

## [1] 212

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   0.000   0.000   0.000   2.087   0.000  50.000

##  int [1:212] 6 10 20 40 10 10 20 3 10 20 ...

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    1.00    8.00   10.00   13.67   20.00   50.00

##  int [1:1192] 12 6 12 14 12 16 12 12 16 12 ...
##  - attr(*, "na.action")= 'omit' int [1:196] 3 13 18 20 27 30 64 65 77 89 ...

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    1.00   12.00   12.00   13.19   16.00   18.00

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    0.50   14.50   27.50   29.03   37.50   65.00

## [1] 18.73928