tools/heightweight.r

heightweight <- read.table(header=TRUE, con <- textConnection('
 sex  ageYear ageMonth heightIn weightLb
   f 11.91667      143     56.3     85.0
   f 12.91667      155     62.3    105.0
   f 12.75000      153     63.3    108.0
   f 13.41667      161     59.0     92.0
   f 15.91667      191     62.5    112.5
   f 14.25000      171     62.5    112.0
   f 15.41667      185     59.0    104.0
   f 11.83333      142     56.5     69.0
   f 13.33333      160     62.0     94.5
   f 11.66667      140     53.8     68.5
   f 11.58333      139     61.5    104.0
   f 14.83333      178     61.5    103.5
   f 13.08333      157     64.5    123.5
   f 12.41667      149     58.3     93.0
   f 11.91667      143     51.3     50.5
   f 12.08333      145     58.8     89.0
   f 15.91667      191     65.3    107.0
   f 12.50000      150     59.5     78.5
   f 12.25000      147     61.3    115.0
   f 15.00000      180     63.3    114.0
   f 11.75000      141     61.8     85.0
   f 11.66667      140     53.5     81.0
   f 13.66667      164     58.0     83.5
   f 14.66667      176     61.3    112.0
   f 15.41667      185     63.3    101.0
   f 13.83333      166     61.5    103.5
   f 14.58333      175     60.8     93.5
   f 15.00000      180     59.0    112.0
   f 17.50000      210     65.5    140.0
   f 12.16667      146     56.3     83.5
   f 14.16667      170     64.3     90.0
   f 13.50000      162     58.0     84.0
   f 12.41667      149     64.3    110.5
   f 11.58333      139     57.5     96.0
   f 15.50000      186     57.8     95.0
   f 16.41667      197     61.5    121.0
   f 14.08333      169     62.3     99.5
   f 14.75000      177     61.8    142.5
   f 15.41667      185     65.3    118.0
   f 15.16667      182     58.3    104.5
   f 14.41667      173     62.8    102.5
   f 13.83333      166     59.3     89.5
   f 14.00000      168     61.5     95.0
   f 14.08333      169     62.0     98.5
   f 12.50000      150     61.3     94.0
   f 15.33333      184     62.3    108.0
   f 11.58333      139     52.8     63.5
   f 12.25000      147     59.8     84.5
   f 12.00000      144     59.5     93.5
   f 14.75000      177     61.3    112.0
   f 14.83333      178     63.5    148.5
   f 16.41667      197     64.8    112.0
   f 12.16667      146     60.0    109.0
   f 12.08333      145     59.0     91.5
   f 12.25000      147     55.8     75.0
   f 12.08333      145     57.8     84.0
   f 12.91667      155     61.3    107.0
   f 13.91667      167     62.3     92.5
   f 15.25000      183     64.3    109.5
   f 11.91667      143     55.5     84.0
   f 15.25000      183     64.5    102.5
   f 15.41667      185     60.0    106.0
   f 12.33333      148     56.3     77.0
   f 12.25000      147     58.3    111.5
   f 12.83333      154     60.0    114.0
   f 13.00000      156     54.5     75.0
   f 12.00000      144     55.8     73.5
   f 12.83333      154     62.8     93.5
   f 12.66667      152     60.5    105.0
   f 15.91667      191     63.3    113.5
   f 15.83333      190     66.8    140.0
   f 11.66667      140     60.0     77.0
   f 12.33333      148     60.5     84.5
   f 15.75000      189     64.3    113.5
   f 11.91667      143     58.3     77.5
   f 14.83333      178     66.5    117.5
   f 13.66667      164     65.3     98.0
   f 13.08333      157     60.5    112.0
   f 12.25000      147     59.5    101.0
   f 12.33333      148     59.0     95.0
   f 14.75000      177     61.3     81.0
   f 14.25000      171     61.5     91.0
   f 14.33333      172     64.8    142.0
   f 15.83333      190     56.8     98.5
   f 15.25000      183     66.5    112.0
   f 11.91667      143     61.5    116.5
   f 14.91667      179     63.0     98.5
   f 15.50000      186     57.0     83.5
   f 15.16667      182     65.5    133.0
   f 15.16667      182     62.0     91.5
   f 11.83333      142     56.0     72.5
   f 13.75000      165     61.3    106.5
   f 13.75000      165     55.5     67.0
   f 12.83333      154     61.0    122.5
   f 12.50000      150     54.5     74.0
   f 12.91667      155     66.0    144.5
   f 13.58333      163     56.5     84.0
   f 11.75000      141     56.0     72.5
   f 12.25000      147     51.5     64.0
   f 17.50000      210     62.0    116.0
   f 14.25000      171     63.0     84.0
   f 13.91667      167     61.0     93.5
   f 15.16667      182     64.0    111.5
   f 12.00000      144     61.0     92.0
   f 16.08333      193     59.8    115.0
   f 11.75000      141     61.3     85.0
   f 13.66667      164     63.3    108.0
   f 15.50000      186     63.5    108.0
   f 14.08333      169     61.5     85.0
   f 14.58333      175     60.3     86.0
   f 15.00000      180     61.3    110.5
   m 13.75000      165     64.8     98.0
   m 13.08333      157     60.5    105.0
   m 12.00000      144     57.3     76.5
   m 12.50000      150     59.5     84.0
   m 12.50000      150     60.8    128.0
   m 11.58333      139     60.5     87.0
   m 15.75000      189     67.0    128.0
   m 15.25000      183     64.8    111.0
   m 12.25000      147     50.5     79.0
   m 12.16667      146     57.5     90.0
   m 13.33333      160     60.5     84.0
   m 13.00000      156     61.8    112.0
   m 14.41667      173     61.3     93.0
   m 12.58333      151     66.3    117.0
   m 11.75000      141     53.3     84.0
   m 12.50000      150     59.0     99.5
   m 13.66667      164     57.8     95.0
   m 12.75000      153     60.0     84.0
   m 17.16667      206     68.3    134.0
   m 20.83333      250     67.5    171.5
   m 14.66667      176     63.8     98.5
   m 14.66667      176     65.0    118.5
   m 11.66667      140     59.5     94.5
   m 15.41667      185     66.0    105.0
   m 15.00000      180     61.8    104.0
   m 12.16667      146     57.3     83.0
   m 15.25000      183     66.0    105.5
   m 11.66667      140     56.5     84.0
   m 12.58333      151     58.3     86.0
   m 12.58333      151     61.0     81.0
   m 12.00000      144     62.8     94.0
   m 13.33333      160     59.3     78.5
   m 14.83333      178     67.3    119.5
   m 16.08333      193     66.3    133.0
   m 13.50000      162     64.5    119.0
   m 13.66667      164     60.5     95.0
   m 15.50000      186     66.0    112.0
   m 11.91667      143     57.5     75.0
   m 14.58333      175     64.0     92.0
   m 14.58333      175     68.0    112.0
   m 14.58333      175     63.5     98.5
   m 14.41667      173     69.0    112.5
   m 14.16667      170     63.8    112.5
   m 14.50000      174     66.0    108.0
   m 13.66667      164     63.5    108.0
   m 12.00000      144     59.5     88.0
   m 13.00000      156     66.3    106.0
   m 12.41667      149     57.0     92.0
   m 12.00000      144     60.0    117.5
   m 12.25000      147     57.0     84.0
   m 15.66667      188     67.3    112.0
   m 14.08333      169     62.0    100.0
   m 14.33333      172     65.0    112.0
   m 12.50000      150     59.5     84.0
   m 16.08333      193     67.8    127.5
   m 13.08333      157     58.0     80.5
   m 14.00000      168     60.0     93.5
   m 11.66667      140     58.5     86.5
   m 13.00000      156     58.3     92.5
   m 13.00000      156     61.5    108.5
   m 13.16667      158     65.0    121.0
   m 15.33333      184     66.5    112.0
   m 13.00000      156     68.5    114.0
   m 12.00000      144     57.0     84.0
   m 14.66667      176     61.5     81.0
   m 14.00000      168     66.5    111.5
   m 12.41667      149     52.5     81.0
   m 11.83333      142     55.0     70.0
   m 15.66667      188     71.0    140.0
   m 16.91667      203     66.5    117.0
   m 11.83333      142     58.8     84.0
   m 15.75000      189     66.3    112.0
   m 15.66667      188     65.8    150.5
   m 16.66667      200     71.0    147.0
   m 12.66667      152     59.5    105.0
   m 14.50000      174     69.8    119.5
   m 13.83333      166     62.5     84.0
   m 12.08333      145     56.5     91.0
   m 11.91667      143     57.5    101.0
   m 13.58333      163     65.3    117.5
   m 13.83333      166     67.3    121.0
   m 15.16667      182     67.0    133.0
   m 14.41667      173     66.0    112.0
   m 12.91667      155     61.8     91.5
   m 13.50000      162     60.0    105.0
   m 14.75000      177     63.0    111.0
   m 14.75000      177     60.5    112.0
   m 14.58333      175     65.5    114.0
   m 13.83333      166     62.0     91.0
   m 12.50000      150     59.0     98.0
   m 12.50000      150     61.8    118.0
   m 15.66667      188     63.3    115.5
   m 13.58333      163     66.0    112.0
   m 14.25000      171     61.8    112.0
   m 13.50000      162     63.0     91.0
   m 11.75000      141     57.5     85.0
   m 14.50000      174     63.0    112.0
   m 11.83333      142     56.0     87.5
   m 12.33333      148     60.5    118.0
   m 11.66667      140     56.8     83.5
   m 13.33333      160     64.0    116.0
   m 12.00000      144     60.0     89.0
   m 17.16667      206     69.5    171.5
   m 13.25000      159     63.3    112.0
   m 12.41667      149     56.3     72.0
   m 16.08333      193     72.0    150.0
   m 16.16667      194     65.3    134.5
   m 12.66667      152     60.8     97.0
   m 12.16667      146     55.0     71.5
   m 11.58333      139     55.0     73.5
   m 15.50000      186     66.5    112.0
   m 13.41667      161     56.8     75.0
   m 12.75000      153     64.8    128.0
   m 16.33333      196     64.5     98.0
   m 13.66667      164     58.0     84.0
   m 13.25000      159     62.8     99.0
   m 14.83333      178     63.8    112.0
   m 12.75000      153     57.8     79.5
   m 12.91667      155     57.3     80.5
   m 14.83333      178     63.5    102.5
   m 11.83333      142     55.0     76.0
   m 13.66667      164     66.5    112.0
   m 15.75000      189     65.0    114.0
   m 13.66667      164     61.5    140.0
   m 13.91667      167     62.0    107.5
   m 12.58333      151     59.3     87.0
'))

close(con); rm(con)

# Remove outlier
heightweight <- subset(heightweight, ageYear<=18)

heightweight$ageYear <- round(heightweight$ageYear, 2)

pkgdir <- rprojroot::find_package_root_file()
save(heightweight, file = file.path(pkgdir, "data/heightweight.rda"))
wch/gcookbook documentation built on April 13, 2025, 10:12 p.m.