Loading Data

To prepare for loading the data, column names are specified based on the ‘Attribute Information’ section at https://archive.ics.uci.edu/ml/machine-learning-databases/bridges/bridges.names:

bridge_fields <- c('IDENTIF', 'RIVER', 'LOCATION', 'ERECTED', 'PURPOSE', 'LENGTH', 'LANES', 'CLEAR-G', 'T-OR-D', 'MATERIAL', 'SPAN', 'REL-L', 'TYPE')

The data is then read in from https://archive.ics.uci.edu/ml/machine-learning-databases/bridges/bridges.data.version2:

pgh_bridges <- read.table('https://archive.ics.uci.edu/ml/machine-learning-databases/bridges/bridges.data.version2', header=FALSE, sep=",", col.names = bridge_fields)

Creating subset

A new data.frame is then constructed with 5 colums from pgh_bridges:

my_bridges <- pgh_bridges[ , c('RIVER', 'TYPE', 'MATERIAL', 'LANES', 'SPAN')]

Results

The resulting data.frame:

head(my_bridges)
##   RIVER TYPE MATERIAL LANES   SPAN
## 1     M WOOD     WOOD     2  SHORT
## 2     A WOOD     WOOD     2  SHORT
## 3     A WOOD     WOOD     1      ?
## 4     A WOOD     WOOD     2  SHORT
## 5     M WOOD     WOOD     2      ?
## 6     A WOOD     WOOD     2 MEDIUM