Assignment 607_Project_2_Wide_to_Long_Transform_Concrete_Blocks_Daniel_Thonn

Summary of Assignment This assignment involves Tidying and Transforming data

This Assignment requires the following:

1). R-Studio

The following R-packages are used: 1.tidyr 2.dplyr 3.ggplot2

Steps to reproduce: 1). Place file on local system: C:/mysqldata/Construction_Materials_Table_Wide_1d4.csv 2). run the R-Studio file: R_607_Project_2_Wide_to_Long_Daniel_Thonn_1b.Rmd

Setting up and Preparing the Environment

#install.packages("stringr")
#install.packages("tidyr")
#install.packages("dplyr")
#install.packages("plyr")
#library(stringr)
library(tidyr)
library(dplyr)
## 
## 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
#library(plyr)
#detach("package:plyr", unload=TRUE)
library(ggplot2)

Load the character names data into an R dataframe, cleanup, and convert to long format

# Load the data csv file to a vector
b <- read.csv(
              "C:/mysqldata/Construction_Materials_Table_Wide_1d4.csv",
              sep=",",
              na.strings = "",
              blank.lines.skip = TRUE,
                stringsAsFactors=FALSE)
list(b)
## [[1]]
##           Material.Category                              Materials.Type
## 1                AGGREGATES                 Crushed rock-including levy
## 2                AGGREGATES                 Crushed rock-excluding levy
## 3                AGGREGATES                Sand & gravel-including levy
## 4                AGGREGATES                Sand & Gravel-excluding levy
## 5                AGGREGATES             Coated roadstone-excluding levy
## 6       CEMENT AND CONCRETE                                      Cement
## 7       CEMENT AND CONCRETE                        Ready-mixed concrete
## 8       CEMENT AND CONCRETE                            Plasterboard etc
## 9       CEMENT AND CONCRETE                  Pre-cast concrete products
## 10      CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 11      CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 12      CEMENT AND CONCRETE                       Fibre Cement Products
## 13            CLAY PRODUCTS                                 All  Bricks
## 14            CLAY PRODUCTS                               Ceramic tiles
## 15            CLAY PRODUCTS                        Ceramic sanitaryware
## 16       TIMBER AND JOINERY             Imported sawn or planed wood   
## 17       TIMBER AND JOINERY                            Imported plywood
## 18       TIMBER AND JOINERY                                   Sawn Wood
## 19       TIMBER AND JOINERY                              Particle Board
## 20       TIMBER AND JOINERY                             Doors & windows
## 21           METAL PRODUCTS                 Fabricated structural steel
## 22           METAL PRODUCTS                             Doors & windows
## 23           METAL PRODUCTS                                  Screws etc
## 24           METAL PRODUCTS                  Other builders ironmongery
## 25           METAL PRODUCTS                     Central heating boilers
## 26           METAL PRODUCTS                       Central heating pumps
## 27           METAL PRODUCTS                    Taps & valves (domestic)
## 28           METAL PRODUCTS                          Metal sanitaryware
## 29           METAL PRODUCTS                                Copper pipes
## 30         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 31         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 32         PLASTIC PRODUCTS                                Sanitaryware
## 33         PLASTIC PRODUCTS                             Doors & windows
## 34         PLASTIC PRODUCTS                              Floor covering
## 35 OTHER BUILDING MATERIALS                           Asphalt products 
## 36 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 37 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 38 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 39 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 40 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 41 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 42 OTHER BUILDING MATERIALS                      Electric water heaters
## 43 OTHER BUILDING MATERIALS                           Kitchen furniture
##               X2009            X2010            X2011            X2012
## 1              96.1            100.0            105.1            105.3
## 2              94.4            100.0            108.4            108.3
## 3              95.9            100.0            101.7            109.6
## 4              95.4            100.0            102.0            111.2
## 5                ..            100.0            103.3            111.3
## 6             104.0            100.0            101.6            108.1
## 7             100.8            100.0            103.0            106.9
## 8                ..               ..               ..               ..
## 9             101.5            100.0            102.7            104.0
## 10            100.2            100.0            103.3            105.6
## 11             87.1            100.0            116.6            113.2
## 12               ..               ..               ..               ..
## 13             98.9            100.0            100.2            104.7
## 14             97.6            100.0            100.8               ..
## 15             97.2            100.0            108.9               ..
## 16             84.3            100.0            101.1             99.2
## 17             83.5            100.0            104.2            110.1
## 18             90.1            100.0            104.7            105.7
## 19             95.3            100.0            113.5            120.2
## 20             98.5            100.0            104.8            111.3
## 21             89.9            100.0            112.3            109.1
## 22             98.8            100.0            104.1            110.8
## 23               ..               ..               ..               ..
## 24               ..               ..               ..            105.2
## 25             96.8            100.0            103.6            104.7
## 26               ..               ..               ..               ..
## 27             96.4            100.0            106.8               ..
## 28               ..               ..               ..            111.2
## 29               ..               ..               ..               ..
## 30            100.2            100.0            104.2            108.1
## 31             99.8            100.0            102.8            105.2
## 32             99.1            100.0            101.2            103.0
## 33            100.0            100.0            102.5            104.3
## 34               ..               ..               ..               ..
## 35             93.5            100.0               ..               ..
## 36            102.4            100.0            106.6            114.0
## 37             97.8               ..               ..            110.5
## 38             99.2            100.0            107.0            114.5
## 39            100.8            100.0               ..               ..
## 40            102.4            100.0            100.0            103.1
## 41               ..               ..               ..               ..
## 42             97.2            100.0            104.0            107.4
## 43             98.3            100.0            102.8            106.8
##               X2013
## 1             102.0
## 2             105.4
## 3             115.5
## 4             116.2
## 5             111.4
## 6             109.1
## 7             108.7
## 8                ..
## 9             105.7
## 10            107.3
## 11            107.0
## 12               ..
## 13            107.1
## 14               ..
## 15               ..
## 16            102.1
## 17            110.4
## 18            107.5
## 19            126.6
## 20            110.2
## 21            103.8
## 22            110.5
## 23            102.2
## 24            107.0
## 25               ..
## 26               ..
## 27               ..
## 28            110.7
## 29               ..
## 30            111.8
## 31               ..
## 32            104.9
## 33            106.8
## 34               ..
## 35               ..
## 36            116.7
## 37            113.3
## 38            117.0
## 39               ..
## 40            103.5
## 41               ..
## 42            108.9
## 43            106.9
# Convert the input vector to a dataframe
df_Const_Matls_1 = data.frame(b)
list(df_Const_Matls_1)
## [[1]]
##           Material.Category                              Materials.Type
## 1                AGGREGATES                 Crushed rock-including levy
## 2                AGGREGATES                 Crushed rock-excluding levy
## 3                AGGREGATES                Sand & gravel-including levy
## 4                AGGREGATES                Sand & Gravel-excluding levy
## 5                AGGREGATES             Coated roadstone-excluding levy
## 6       CEMENT AND CONCRETE                                      Cement
## 7       CEMENT AND CONCRETE                        Ready-mixed concrete
## 8       CEMENT AND CONCRETE                            Plasterboard etc
## 9       CEMENT AND CONCRETE                  Pre-cast concrete products
## 10      CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 11      CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 12      CEMENT AND CONCRETE                       Fibre Cement Products
## 13            CLAY PRODUCTS                                 All  Bricks
## 14            CLAY PRODUCTS                               Ceramic tiles
## 15            CLAY PRODUCTS                        Ceramic sanitaryware
## 16       TIMBER AND JOINERY             Imported sawn or planed wood   
## 17       TIMBER AND JOINERY                            Imported plywood
## 18       TIMBER AND JOINERY                                   Sawn Wood
## 19       TIMBER AND JOINERY                              Particle Board
## 20       TIMBER AND JOINERY                             Doors & windows
## 21           METAL PRODUCTS                 Fabricated structural steel
## 22           METAL PRODUCTS                             Doors & windows
## 23           METAL PRODUCTS                                  Screws etc
## 24           METAL PRODUCTS                  Other builders ironmongery
## 25           METAL PRODUCTS                     Central heating boilers
## 26           METAL PRODUCTS                       Central heating pumps
## 27           METAL PRODUCTS                    Taps & valves (domestic)
## 28           METAL PRODUCTS                          Metal sanitaryware
## 29           METAL PRODUCTS                                Copper pipes
## 30         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 31         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 32         PLASTIC PRODUCTS                                Sanitaryware
## 33         PLASTIC PRODUCTS                             Doors & windows
## 34         PLASTIC PRODUCTS                              Floor covering
## 35 OTHER BUILDING MATERIALS                           Asphalt products 
## 36 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 37 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 38 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 39 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 40 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 41 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 42 OTHER BUILDING MATERIALS                      Electric water heaters
## 43 OTHER BUILDING MATERIALS                           Kitchen furniture
##               X2009            X2010            X2011            X2012
## 1              96.1            100.0            105.1            105.3
## 2              94.4            100.0            108.4            108.3
## 3              95.9            100.0            101.7            109.6
## 4              95.4            100.0            102.0            111.2
## 5                ..            100.0            103.3            111.3
## 6             104.0            100.0            101.6            108.1
## 7             100.8            100.0            103.0            106.9
## 8                ..               ..               ..               ..
## 9             101.5            100.0            102.7            104.0
## 10            100.2            100.0            103.3            105.6
## 11             87.1            100.0            116.6            113.2
## 12               ..               ..               ..               ..
## 13             98.9            100.0            100.2            104.7
## 14             97.6            100.0            100.8               ..
## 15             97.2            100.0            108.9               ..
## 16             84.3            100.0            101.1             99.2
## 17             83.5            100.0            104.2            110.1
## 18             90.1            100.0            104.7            105.7
## 19             95.3            100.0            113.5            120.2
## 20             98.5            100.0            104.8            111.3
## 21             89.9            100.0            112.3            109.1
## 22             98.8            100.0            104.1            110.8
## 23               ..               ..               ..               ..
## 24               ..               ..               ..            105.2
## 25             96.8            100.0            103.6            104.7
## 26               ..               ..               ..               ..
## 27             96.4            100.0            106.8               ..
## 28               ..               ..               ..            111.2
## 29               ..               ..               ..               ..
## 30            100.2            100.0            104.2            108.1
## 31             99.8            100.0            102.8            105.2
## 32             99.1            100.0            101.2            103.0
## 33            100.0            100.0            102.5            104.3
## 34               ..               ..               ..               ..
## 35             93.5            100.0               ..               ..
## 36            102.4            100.0            106.6            114.0
## 37             97.8               ..               ..            110.5
## 38             99.2            100.0            107.0            114.5
## 39            100.8            100.0               ..               ..
## 40            102.4            100.0            100.0            103.1
## 41               ..               ..               ..               ..
## 42             97.2            100.0            104.0            107.4
## 43             98.3            100.0            102.8            106.8
##               X2013
## 1             102.0
## 2             105.4
## 3             115.5
## 4             116.2
## 5             111.4
## 6             109.1
## 7             108.7
## 8                ..
## 9             105.7
## 10            107.3
## 11            107.0
## 12               ..
## 13            107.1
## 14               ..
## 15               ..
## 16            102.1
## 17            110.4
## 18            107.5
## 19            126.6
## 20            110.2
## 21            103.8
## 22            110.5
## 23            102.2
## 24            107.0
## 25               ..
## 26               ..
## 27               ..
## 28            110.7
## 29               ..
## 30            111.8
## 31               ..
## 32            104.9
## 33            106.8
## 34               ..
## 35               ..
## 36            116.7
## 37            113.3
## 38            117.0
## 39               ..
## 40            103.5
## 41               ..
## 42            108.9
## 43            106.9
df_Const_Matls_1b <- df_Const_Matls_1
#names(df_Const_Matls_1b)[names(df_Const_Matls_1b) == "X2009"] <- "2009"
#names(df_Const_Matls_1b)[names(df_Const_Matls_1b) == "X2010"] <- "2010"
#names(df_Const_Matls_1b)[names(df_Const_Matls_1b) == "X2011"] <- "2011"
#names(df_Const_Matls_1b)[names(df_Const_Matls_1b) == "X2012"] <- "2012"
#names(df_Const_Matls_1b)[names(df_Const_Matls_1b) == "X2013"] <- "2013"
#names(df_Const_Matls_1b)


# Convert wide dataframe into long dataframe
df_Const_Matls_1_long <- gather(df_Const_Matls_1,Year,Price_Index, X2009:X2013) %>% arrange(Material.Category)
#df_Const_Matls_1_long <- gather(df_Const_Matls_1b,Year,Price_Index, 2009:2013) %>% arrange(Material.Category)

list(df_Const_Matls_1_long)
## [[1]]
##            Material.Category                              Materials.Type
## 1                 AGGREGATES                 Crushed rock-including levy
## 2                 AGGREGATES                 Crushed rock-excluding levy
## 3                 AGGREGATES                Sand & gravel-including levy
## 4                 AGGREGATES                Sand & Gravel-excluding levy
## 5                 AGGREGATES             Coated roadstone-excluding levy
## 6                 AGGREGATES                 Crushed rock-including levy
## 7                 AGGREGATES                 Crushed rock-excluding levy
## 8                 AGGREGATES                Sand & gravel-including levy
## 9                 AGGREGATES                Sand & Gravel-excluding levy
## 10                AGGREGATES             Coated roadstone-excluding levy
## 11                AGGREGATES                 Crushed rock-including levy
## 12                AGGREGATES                 Crushed rock-excluding levy
## 13                AGGREGATES                Sand & gravel-including levy
## 14                AGGREGATES                Sand & Gravel-excluding levy
## 15                AGGREGATES             Coated roadstone-excluding levy
## 16                AGGREGATES                 Crushed rock-including levy
## 17                AGGREGATES                 Crushed rock-excluding levy
## 18                AGGREGATES                Sand & gravel-including levy
## 19                AGGREGATES                Sand & Gravel-excluding levy
## 20                AGGREGATES             Coated roadstone-excluding levy
## 21                AGGREGATES                 Crushed rock-including levy
## 22                AGGREGATES                 Crushed rock-excluding levy
## 23                AGGREGATES                Sand & gravel-including levy
## 24                AGGREGATES                Sand & Gravel-excluding levy
## 25                AGGREGATES             Coated roadstone-excluding levy
## 26       CEMENT AND CONCRETE                                      Cement
## 27       CEMENT AND CONCRETE                        Ready-mixed concrete
## 28       CEMENT AND CONCRETE                            Plasterboard etc
## 29       CEMENT AND CONCRETE                  Pre-cast concrete products
## 30       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 31       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 32       CEMENT AND CONCRETE                       Fibre Cement Products
## 33       CEMENT AND CONCRETE                                      Cement
## 34       CEMENT AND CONCRETE                        Ready-mixed concrete
## 35       CEMENT AND CONCRETE                            Plasterboard etc
## 36       CEMENT AND CONCRETE                  Pre-cast concrete products
## 37       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 38       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 39       CEMENT AND CONCRETE                       Fibre Cement Products
## 40       CEMENT AND CONCRETE                                      Cement
## 41       CEMENT AND CONCRETE                        Ready-mixed concrete
## 42       CEMENT AND CONCRETE                            Plasterboard etc
## 43       CEMENT AND CONCRETE                  Pre-cast concrete products
## 44       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 45       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 46       CEMENT AND CONCRETE                       Fibre Cement Products
## 47       CEMENT AND CONCRETE                                      Cement
## 48       CEMENT AND CONCRETE                        Ready-mixed concrete
## 49       CEMENT AND CONCRETE                            Plasterboard etc
## 50       CEMENT AND CONCRETE                  Pre-cast concrete products
## 51       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 52       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 53       CEMENT AND CONCRETE                       Fibre Cement Products
## 54       CEMENT AND CONCRETE                                      Cement
## 55       CEMENT AND CONCRETE                        Ready-mixed concrete
## 56       CEMENT AND CONCRETE                            Plasterboard etc
## 57       CEMENT AND CONCRETE                  Pre-cast concrete products
## 58       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 59       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 60       CEMENT AND CONCRETE                       Fibre Cement Products
## 61             CLAY PRODUCTS                                 All  Bricks
## 62             CLAY PRODUCTS                               Ceramic tiles
## 63             CLAY PRODUCTS                        Ceramic sanitaryware
## 64             CLAY PRODUCTS                                 All  Bricks
## 65             CLAY PRODUCTS                               Ceramic tiles
## 66             CLAY PRODUCTS                        Ceramic sanitaryware
## 67             CLAY PRODUCTS                                 All  Bricks
## 68             CLAY PRODUCTS                               Ceramic tiles
## 69             CLAY PRODUCTS                        Ceramic sanitaryware
## 70             CLAY PRODUCTS                                 All  Bricks
## 71             CLAY PRODUCTS                               Ceramic tiles
## 72             CLAY PRODUCTS                        Ceramic sanitaryware
## 73             CLAY PRODUCTS                                 All  Bricks
## 74             CLAY PRODUCTS                               Ceramic tiles
## 75             CLAY PRODUCTS                        Ceramic sanitaryware
## 76            METAL PRODUCTS                 Fabricated structural steel
## 77            METAL PRODUCTS                             Doors & windows
## 78            METAL PRODUCTS                                  Screws etc
## 79            METAL PRODUCTS                  Other builders ironmongery
## 80            METAL PRODUCTS                     Central heating boilers
## 81            METAL PRODUCTS                       Central heating pumps
## 82            METAL PRODUCTS                    Taps & valves (domestic)
## 83            METAL PRODUCTS                          Metal sanitaryware
## 84            METAL PRODUCTS                                Copper pipes
## 85            METAL PRODUCTS                 Fabricated structural steel
## 86            METAL PRODUCTS                             Doors & windows
## 87            METAL PRODUCTS                                  Screws etc
## 88            METAL PRODUCTS                  Other builders ironmongery
## 89            METAL PRODUCTS                     Central heating boilers
## 90            METAL PRODUCTS                       Central heating pumps
## 91            METAL PRODUCTS                    Taps & valves (domestic)
## 92            METAL PRODUCTS                          Metal sanitaryware
## 93            METAL PRODUCTS                                Copper pipes
## 94            METAL PRODUCTS                 Fabricated structural steel
## 95            METAL PRODUCTS                             Doors & windows
## 96            METAL PRODUCTS                                  Screws etc
## 97            METAL PRODUCTS                  Other builders ironmongery
## 98            METAL PRODUCTS                     Central heating boilers
## 99            METAL PRODUCTS                       Central heating pumps
## 100           METAL PRODUCTS                    Taps & valves (domestic)
## 101           METAL PRODUCTS                          Metal sanitaryware
## 102           METAL PRODUCTS                                Copper pipes
## 103           METAL PRODUCTS                 Fabricated structural steel
## 104           METAL PRODUCTS                             Doors & windows
## 105           METAL PRODUCTS                                  Screws etc
## 106           METAL PRODUCTS                  Other builders ironmongery
## 107           METAL PRODUCTS                     Central heating boilers
## 108           METAL PRODUCTS                       Central heating pumps
## 109           METAL PRODUCTS                    Taps & valves (domestic)
## 110           METAL PRODUCTS                          Metal sanitaryware
## 111           METAL PRODUCTS                                Copper pipes
## 112           METAL PRODUCTS                 Fabricated structural steel
## 113           METAL PRODUCTS                             Doors & windows
## 114           METAL PRODUCTS                                  Screws etc
## 115           METAL PRODUCTS                  Other builders ironmongery
## 116           METAL PRODUCTS                     Central heating boilers
## 117           METAL PRODUCTS                       Central heating pumps
## 118           METAL PRODUCTS                    Taps & valves (domestic)
## 119           METAL PRODUCTS                          Metal sanitaryware
## 120           METAL PRODUCTS                                Copper pipes
## 121 OTHER BUILDING MATERIALS                           Asphalt products 
## 122 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 123 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 124 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 125 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 126 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 127 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 128 OTHER BUILDING MATERIALS                      Electric water heaters
## 129 OTHER BUILDING MATERIALS                           Kitchen furniture
## 130 OTHER BUILDING MATERIALS                           Asphalt products 
## 131 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 132 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 133 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 134 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 135 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 136 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 137 OTHER BUILDING MATERIALS                      Electric water heaters
## 138 OTHER BUILDING MATERIALS                           Kitchen furniture
## 139 OTHER BUILDING MATERIALS                           Asphalt products 
## 140 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 141 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 142 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 143 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 144 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 145 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 146 OTHER BUILDING MATERIALS                      Electric water heaters
## 147 OTHER BUILDING MATERIALS                           Kitchen furniture
## 148 OTHER BUILDING MATERIALS                           Asphalt products 
## 149 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 150 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 151 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 152 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 153 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 154 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 155 OTHER BUILDING MATERIALS                      Electric water heaters
## 156 OTHER BUILDING MATERIALS                           Kitchen furniture
## 157 OTHER BUILDING MATERIALS                           Asphalt products 
## 158 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 159 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 160 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 161 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 162 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 163 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 164 OTHER BUILDING MATERIALS                      Electric water heaters
## 165 OTHER BUILDING MATERIALS                           Kitchen furniture
## 166         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 167         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 168         PLASTIC PRODUCTS                                Sanitaryware
## 169         PLASTIC PRODUCTS                             Doors & windows
## 170         PLASTIC PRODUCTS                              Floor covering
## 171         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 172         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 173         PLASTIC PRODUCTS                                Sanitaryware
## 174         PLASTIC PRODUCTS                             Doors & windows
## 175         PLASTIC PRODUCTS                              Floor covering
## 176         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 177         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 178         PLASTIC PRODUCTS                                Sanitaryware
## 179         PLASTIC PRODUCTS                             Doors & windows
## 180         PLASTIC PRODUCTS                              Floor covering
## 181         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 182         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 183         PLASTIC PRODUCTS                                Sanitaryware
## 184         PLASTIC PRODUCTS                             Doors & windows
## 185         PLASTIC PRODUCTS                              Floor covering
## 186         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 187         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 188         PLASTIC PRODUCTS                                Sanitaryware
## 189         PLASTIC PRODUCTS                             Doors & windows
## 190         PLASTIC PRODUCTS                              Floor covering
## 191       TIMBER AND JOINERY             Imported sawn or planed wood   
## 192       TIMBER AND JOINERY                            Imported plywood
## 193       TIMBER AND JOINERY                                   Sawn Wood
## 194       TIMBER AND JOINERY                              Particle Board
## 195       TIMBER AND JOINERY                             Doors & windows
## 196       TIMBER AND JOINERY             Imported sawn or planed wood   
## 197       TIMBER AND JOINERY                            Imported plywood
## 198       TIMBER AND JOINERY                                   Sawn Wood
## 199       TIMBER AND JOINERY                              Particle Board
## 200       TIMBER AND JOINERY                             Doors & windows
## 201       TIMBER AND JOINERY             Imported sawn or planed wood   
## 202       TIMBER AND JOINERY                            Imported plywood
## 203       TIMBER AND JOINERY                                   Sawn Wood
## 204       TIMBER AND JOINERY                              Particle Board
## 205       TIMBER AND JOINERY                             Doors & windows
## 206       TIMBER AND JOINERY             Imported sawn or planed wood   
## 207       TIMBER AND JOINERY                            Imported plywood
## 208       TIMBER AND JOINERY                                   Sawn Wood
## 209       TIMBER AND JOINERY                              Particle Board
## 210       TIMBER AND JOINERY                             Doors & windows
## 211       TIMBER AND JOINERY             Imported sawn or planed wood   
## 212       TIMBER AND JOINERY                            Imported plywood
## 213       TIMBER AND JOINERY                                   Sawn Wood
## 214       TIMBER AND JOINERY                              Particle Board
## 215       TIMBER AND JOINERY                             Doors & windows
##      Year      Price_Index
## 1   X2009             96.1
## 2   X2009             94.4
## 3   X2009             95.9
## 4   X2009             95.4
## 5   X2009               ..
## 6   X2010            100.0
## 7   X2010            100.0
## 8   X2010            100.0
## 9   X2010            100.0
## 10  X2010            100.0
## 11  X2011            105.1
## 12  X2011            108.4
## 13  X2011            101.7
## 14  X2011            102.0
## 15  X2011            103.3
## 16  X2012            105.3
## 17  X2012            108.3
## 18  X2012            109.6
## 19  X2012            111.2
## 20  X2012            111.3
## 21  X2013            102.0
## 22  X2013            105.4
## 23  X2013            115.5
## 24  X2013            116.2
## 25  X2013            111.4
## 26  X2009            104.0
## 27  X2009            100.8
## 28  X2009               ..
## 29  X2009            101.5
## 30  X2009            100.2
## 31  X2009             87.1
## 32  X2009               ..
## 33  X2010            100.0
## 34  X2010            100.0
## 35  X2010               ..
## 36  X2010            100.0
## 37  X2010            100.0
## 38  X2010            100.0
## 39  X2010               ..
## 40  X2011            101.6
## 41  X2011            103.0
## 42  X2011               ..
## 43  X2011            102.7
## 44  X2011            103.3
## 45  X2011            116.6
## 46  X2011               ..
## 47  X2012            108.1
## 48  X2012            106.9
## 49  X2012               ..
## 50  X2012            104.0
## 51  X2012            105.6
## 52  X2012            113.2
## 53  X2012               ..
## 54  X2013            109.1
## 55  X2013            108.7
## 56  X2013               ..
## 57  X2013            105.7
## 58  X2013            107.3
## 59  X2013            107.0
## 60  X2013               ..
## 61  X2009             98.9
## 62  X2009             97.6
## 63  X2009             97.2
## 64  X2010            100.0
## 65  X2010            100.0
## 66  X2010            100.0
## 67  X2011            100.2
## 68  X2011            100.8
## 69  X2011            108.9
## 70  X2012            104.7
## 71  X2012               ..
## 72  X2012               ..
## 73  X2013            107.1
## 74  X2013               ..
## 75  X2013               ..
## 76  X2009             89.9
## 77  X2009             98.8
## 78  X2009               ..
## 79  X2009               ..
## 80  X2009             96.8
## 81  X2009               ..
## 82  X2009             96.4
## 83  X2009               ..
## 84  X2009               ..
## 85  X2010            100.0
## 86  X2010            100.0
## 87  X2010               ..
## 88  X2010               ..
## 89  X2010            100.0
## 90  X2010               ..
## 91  X2010            100.0
## 92  X2010               ..
## 93  X2010               ..
## 94  X2011            112.3
## 95  X2011            104.1
## 96  X2011               ..
## 97  X2011               ..
## 98  X2011            103.6
## 99  X2011               ..
## 100 X2011            106.8
## 101 X2011               ..
## 102 X2011               ..
## 103 X2012            109.1
## 104 X2012            110.8
## 105 X2012               ..
## 106 X2012            105.2
## 107 X2012            104.7
## 108 X2012               ..
## 109 X2012               ..
## 110 X2012            111.2
## 111 X2012               ..
## 112 X2013            103.8
## 113 X2013            110.5
## 114 X2013            102.2
## 115 X2013            107.0
## 116 X2013               ..
## 117 X2013               ..
## 118 X2013               ..
## 119 X2013            110.7
## 120 X2013               ..
## 121 X2009             93.5
## 122 X2009            102.4
## 123 X2009             97.8
## 124 X2009             99.2
## 125 X2009            100.8
## 126 X2009            102.4
## 127 X2009               ..
## 128 X2009             97.2
## 129 X2009             98.3
## 130 X2010            100.0
## 131 X2010            100.0
## 132 X2010               ..
## 133 X2010            100.0
## 134 X2010            100.0
## 135 X2010            100.0
## 136 X2010               ..
## 137 X2010            100.0
## 138 X2010            100.0
## 139 X2011               ..
## 140 X2011            106.6
## 141 X2011               ..
## 142 X2011            107.0
## 143 X2011               ..
## 144 X2011            100.0
## 145 X2011               ..
## 146 X2011            104.0
## 147 X2011            102.8
## 148 X2012               ..
## 149 X2012            114.0
## 150 X2012            110.5
## 151 X2012            114.5
## 152 X2012               ..
## 153 X2012            103.1
## 154 X2012               ..
## 155 X2012            107.4
## 156 X2012            106.8
## 157 X2013               ..
## 158 X2013            116.7
## 159 X2013            113.3
## 160 X2013            117.0
## 161 X2013               ..
## 162 X2013            103.5
## 163 X2013               ..
## 164 X2013            108.9
## 165 X2013            106.9
## 166 X2009            100.2
## 167 X2009             99.8
## 168 X2009             99.1
## 169 X2009            100.0
## 170 X2009               ..
## 171 X2010            100.0
## 172 X2010            100.0
## 173 X2010            100.0
## 174 X2010            100.0
## 175 X2010               ..
## 176 X2011            104.2
## 177 X2011            102.8
## 178 X2011            101.2
## 179 X2011            102.5
## 180 X2011               ..
## 181 X2012            108.1
## 182 X2012            105.2
## 183 X2012            103.0
## 184 X2012            104.3
## 185 X2012               ..
## 186 X2013            111.8
## 187 X2013               ..
## 188 X2013            104.9
## 189 X2013            106.8
## 190 X2013               ..
## 191 X2009             84.3
## 192 X2009             83.5
## 193 X2009             90.1
## 194 X2009             95.3
## 195 X2009             98.5
## 196 X2010            100.0
## 197 X2010            100.0
## 198 X2010            100.0
## 199 X2010            100.0
## 200 X2010            100.0
## 201 X2011            101.1
## 202 X2011            104.2
## 203 X2011            104.7
## 204 X2011            113.5
## 205 X2011            104.8
## 206 X2012             99.2
## 207 X2012            110.1
## 208 X2012            105.7
## 209 X2012            120.2
## 210 X2012            111.3
## 211 X2013            102.1
## 212 X2013            110.4
## 213 X2013            107.5
## 214 X2013            126.6
## 215 X2013            110.2
df_Const_Matls_1a_long <- df_Const_Matls_1_long
df_Const_Matls_1a_long$Year <- gsub("X", "",df_Const_Matls_1_long$Year)
list(df_Const_Matls_1a_long)
## [[1]]
##            Material.Category                              Materials.Type
## 1                 AGGREGATES                 Crushed rock-including levy
## 2                 AGGREGATES                 Crushed rock-excluding levy
## 3                 AGGREGATES                Sand & gravel-including levy
## 4                 AGGREGATES                Sand & Gravel-excluding levy
## 5                 AGGREGATES             Coated roadstone-excluding levy
## 6                 AGGREGATES                 Crushed rock-including levy
## 7                 AGGREGATES                 Crushed rock-excluding levy
## 8                 AGGREGATES                Sand & gravel-including levy
## 9                 AGGREGATES                Sand & Gravel-excluding levy
## 10                AGGREGATES             Coated roadstone-excluding levy
## 11                AGGREGATES                 Crushed rock-including levy
## 12                AGGREGATES                 Crushed rock-excluding levy
## 13                AGGREGATES                Sand & gravel-including levy
## 14                AGGREGATES                Sand & Gravel-excluding levy
## 15                AGGREGATES             Coated roadstone-excluding levy
## 16                AGGREGATES                 Crushed rock-including levy
## 17                AGGREGATES                 Crushed rock-excluding levy
## 18                AGGREGATES                Sand & gravel-including levy
## 19                AGGREGATES                Sand & Gravel-excluding levy
## 20                AGGREGATES             Coated roadstone-excluding levy
## 21                AGGREGATES                 Crushed rock-including levy
## 22                AGGREGATES                 Crushed rock-excluding levy
## 23                AGGREGATES                Sand & gravel-including levy
## 24                AGGREGATES                Sand & Gravel-excluding levy
## 25                AGGREGATES             Coated roadstone-excluding levy
## 26       CEMENT AND CONCRETE                                      Cement
## 27       CEMENT AND CONCRETE                        Ready-mixed concrete
## 28       CEMENT AND CONCRETE                            Plasterboard etc
## 29       CEMENT AND CONCRETE                  Pre-cast concrete products
## 30       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 31       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 32       CEMENT AND CONCRETE                       Fibre Cement Products
## 33       CEMENT AND CONCRETE                                      Cement
## 34       CEMENT AND CONCRETE                        Ready-mixed concrete
## 35       CEMENT AND CONCRETE                            Plasterboard etc
## 36       CEMENT AND CONCRETE                  Pre-cast concrete products
## 37       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 38       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 39       CEMENT AND CONCRETE                       Fibre Cement Products
## 40       CEMENT AND CONCRETE                                      Cement
## 41       CEMENT AND CONCRETE                        Ready-mixed concrete
## 42       CEMENT AND CONCRETE                            Plasterboard etc
## 43       CEMENT AND CONCRETE                  Pre-cast concrete products
## 44       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 45       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 46       CEMENT AND CONCRETE                       Fibre Cement Products
## 47       CEMENT AND CONCRETE                                      Cement
## 48       CEMENT AND CONCRETE                        Ready-mixed concrete
## 49       CEMENT AND CONCRETE                            Plasterboard etc
## 50       CEMENT AND CONCRETE                  Pre-cast concrete products
## 51       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 52       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 53       CEMENT AND CONCRETE                       Fibre Cement Products
## 54       CEMENT AND CONCRETE                                      Cement
## 55       CEMENT AND CONCRETE                        Ready-mixed concrete
## 56       CEMENT AND CONCRETE                            Plasterboard etc
## 57       CEMENT AND CONCRETE                  Pre-cast concrete products
## 58       CEMENT AND CONCRETE              Blocks-bricks-tiles&flagstones
## 59       CEMENT AND CONCRETE                  Concrete re-inforcing bars
## 60       CEMENT AND CONCRETE                       Fibre Cement Products
## 61             CLAY PRODUCTS                                 All  Bricks
## 62             CLAY PRODUCTS                               Ceramic tiles
## 63             CLAY PRODUCTS                        Ceramic sanitaryware
## 64             CLAY PRODUCTS                                 All  Bricks
## 65             CLAY PRODUCTS                               Ceramic tiles
## 66             CLAY PRODUCTS                        Ceramic sanitaryware
## 67             CLAY PRODUCTS                                 All  Bricks
## 68             CLAY PRODUCTS                               Ceramic tiles
## 69             CLAY PRODUCTS                        Ceramic sanitaryware
## 70             CLAY PRODUCTS                                 All  Bricks
## 71             CLAY PRODUCTS                               Ceramic tiles
## 72             CLAY PRODUCTS                        Ceramic sanitaryware
## 73             CLAY PRODUCTS                                 All  Bricks
## 74             CLAY PRODUCTS                               Ceramic tiles
## 75             CLAY PRODUCTS                        Ceramic sanitaryware
## 76            METAL PRODUCTS                 Fabricated structural steel
## 77            METAL PRODUCTS                             Doors & windows
## 78            METAL PRODUCTS                                  Screws etc
## 79            METAL PRODUCTS                  Other builders ironmongery
## 80            METAL PRODUCTS                     Central heating boilers
## 81            METAL PRODUCTS                       Central heating pumps
## 82            METAL PRODUCTS                    Taps & valves (domestic)
## 83            METAL PRODUCTS                          Metal sanitaryware
## 84            METAL PRODUCTS                                Copper pipes
## 85            METAL PRODUCTS                 Fabricated structural steel
## 86            METAL PRODUCTS                             Doors & windows
## 87            METAL PRODUCTS                                  Screws etc
## 88            METAL PRODUCTS                  Other builders ironmongery
## 89            METAL PRODUCTS                     Central heating boilers
## 90            METAL PRODUCTS                       Central heating pumps
## 91            METAL PRODUCTS                    Taps & valves (domestic)
## 92            METAL PRODUCTS                          Metal sanitaryware
## 93            METAL PRODUCTS                                Copper pipes
## 94            METAL PRODUCTS                 Fabricated structural steel
## 95            METAL PRODUCTS                             Doors & windows
## 96            METAL PRODUCTS                                  Screws etc
## 97            METAL PRODUCTS                  Other builders ironmongery
## 98            METAL PRODUCTS                     Central heating boilers
## 99            METAL PRODUCTS                       Central heating pumps
## 100           METAL PRODUCTS                    Taps & valves (domestic)
## 101           METAL PRODUCTS                          Metal sanitaryware
## 102           METAL PRODUCTS                                Copper pipes
## 103           METAL PRODUCTS                 Fabricated structural steel
## 104           METAL PRODUCTS                             Doors & windows
## 105           METAL PRODUCTS                                  Screws etc
## 106           METAL PRODUCTS                  Other builders ironmongery
## 107           METAL PRODUCTS                     Central heating boilers
## 108           METAL PRODUCTS                       Central heating pumps
## 109           METAL PRODUCTS                    Taps & valves (domestic)
## 110           METAL PRODUCTS                          Metal sanitaryware
## 111           METAL PRODUCTS                                Copper pipes
## 112           METAL PRODUCTS                 Fabricated structural steel
## 113           METAL PRODUCTS                             Doors & windows
## 114           METAL PRODUCTS                                  Screws etc
## 115           METAL PRODUCTS                  Other builders ironmongery
## 116           METAL PRODUCTS                     Central heating boilers
## 117           METAL PRODUCTS                       Central heating pumps
## 118           METAL PRODUCTS                    Taps & valves (domestic)
## 119           METAL PRODUCTS                          Metal sanitaryware
## 120           METAL PRODUCTS                                Copper pipes
## 121 OTHER BUILDING MATERIALS                           Asphalt products 
## 122 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 123 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 124 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 125 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 126 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 127 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 128 OTHER BUILDING MATERIALS                      Electric water heaters
## 129 OTHER BUILDING MATERIALS                           Kitchen furniture
## 130 OTHER BUILDING MATERIALS                           Asphalt products 
## 131 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 132 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 133 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 134 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 135 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 136 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 137 OTHER BUILDING MATERIALS                      Electric water heaters
## 138 OTHER BUILDING MATERIALS                           Kitchen furniture
## 139 OTHER BUILDING MATERIALS                           Asphalt products 
## 140 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 141 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 142 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 143 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 144 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 145 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 146 OTHER BUILDING MATERIALS                      Electric water heaters
## 147 OTHER BUILDING MATERIALS                           Kitchen furniture
## 148 OTHER BUILDING MATERIALS                           Asphalt products 
## 149 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 150 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 151 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 152 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 153 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 154 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 155 OTHER BUILDING MATERIALS                      Electric water heaters
## 156 OTHER BUILDING MATERIALS                           Kitchen furniture
## 157 OTHER BUILDING MATERIALS                           Asphalt products 
## 158 OTHER BUILDING MATERIALS Insulating materials (thermal or acoustic) 
## 159 OTHER BUILDING MATERIALS                             Paint (aqueous)
## 160 OTHER BUILDING MATERIALS                         Paint (non-aqueous)
## 161 OTHER BUILDING MATERIALS            Lighting equipment for buildings
## 162 OTHER BUILDING MATERIALS                Lighting equipment for roads
## 163 OTHER BUILDING MATERIALS                  Electric heating apparatus
## 164 OTHER BUILDING MATERIALS                      Electric water heaters
## 165 OTHER BUILDING MATERIALS                           Kitchen furniture
## 166         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 167         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 168         PLASTIC PRODUCTS                                Sanitaryware
## 169         PLASTIC PRODUCTS                             Doors & windows
## 170         PLASTIC PRODUCTS                              Floor covering
## 171         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 172         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 173         PLASTIC PRODUCTS                                Sanitaryware
## 174         PLASTIC PRODUCTS                             Doors & windows
## 175         PLASTIC PRODUCTS                              Floor covering
## 176         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 177         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 178         PLASTIC PRODUCTS                                Sanitaryware
## 179         PLASTIC PRODUCTS                             Doors & windows
## 180         PLASTIC PRODUCTS                              Floor covering
## 181         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 182         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 183         PLASTIC PRODUCTS                                Sanitaryware
## 184         PLASTIC PRODUCTS                             Doors & windows
## 185         PLASTIC PRODUCTS                              Floor covering
## 186         PLASTIC PRODUCTS                  Pipes and fittings (rigid)
## 187         PLASTIC PRODUCTS               Pipes and fittings (flexible)
## 188         PLASTIC PRODUCTS                                Sanitaryware
## 189         PLASTIC PRODUCTS                             Doors & windows
## 190         PLASTIC PRODUCTS                              Floor covering
## 191       TIMBER AND JOINERY             Imported sawn or planed wood   
## 192       TIMBER AND JOINERY                            Imported plywood
## 193       TIMBER AND JOINERY                                   Sawn Wood
## 194       TIMBER AND JOINERY                              Particle Board
## 195       TIMBER AND JOINERY                             Doors & windows
## 196       TIMBER AND JOINERY             Imported sawn or planed wood   
## 197       TIMBER AND JOINERY                            Imported plywood
## 198       TIMBER AND JOINERY                                   Sawn Wood
## 199       TIMBER AND JOINERY                              Particle Board
## 200       TIMBER AND JOINERY                             Doors & windows
## 201       TIMBER AND JOINERY             Imported sawn or planed wood   
## 202       TIMBER AND JOINERY                            Imported plywood
## 203       TIMBER AND JOINERY                                   Sawn Wood
## 204       TIMBER AND JOINERY                              Particle Board
## 205       TIMBER AND JOINERY                             Doors & windows
## 206       TIMBER AND JOINERY             Imported sawn or planed wood   
## 207       TIMBER AND JOINERY                            Imported plywood
## 208       TIMBER AND JOINERY                                   Sawn Wood
## 209       TIMBER AND JOINERY                              Particle Board
## 210       TIMBER AND JOINERY                             Doors & windows
## 211       TIMBER AND JOINERY             Imported sawn or planed wood   
## 212       TIMBER AND JOINERY                            Imported plywood
## 213       TIMBER AND JOINERY                                   Sawn Wood
## 214       TIMBER AND JOINERY                              Particle Board
## 215       TIMBER AND JOINERY                             Doors & windows
##     Year      Price_Index
## 1   2009             96.1
## 2   2009             94.4
## 3   2009             95.9
## 4   2009             95.4
## 5   2009               ..
## 6   2010            100.0
## 7   2010            100.0
## 8   2010            100.0
## 9   2010            100.0
## 10  2010            100.0
## 11  2011            105.1
## 12  2011            108.4
## 13  2011            101.7
## 14  2011            102.0
## 15  2011            103.3
## 16  2012            105.3
## 17  2012            108.3
## 18  2012            109.6
## 19  2012            111.2
## 20  2012            111.3
## 21  2013            102.0
## 22  2013            105.4
## 23  2013            115.5
## 24  2013            116.2
## 25  2013            111.4
## 26  2009            104.0
## 27  2009            100.8
## 28  2009               ..
## 29  2009            101.5
## 30  2009            100.2
## 31  2009             87.1
## 32  2009               ..
## 33  2010            100.0
## 34  2010            100.0
## 35  2010               ..
## 36  2010            100.0
## 37  2010            100.0
## 38  2010            100.0
## 39  2010               ..
## 40  2011            101.6
## 41  2011            103.0
## 42  2011               ..
## 43  2011            102.7
## 44  2011            103.3
## 45  2011            116.6
## 46  2011               ..
## 47  2012            108.1
## 48  2012            106.9
## 49  2012               ..
## 50  2012            104.0
## 51  2012            105.6
## 52  2012            113.2
## 53  2012               ..
## 54  2013            109.1
## 55  2013            108.7
## 56  2013               ..
## 57  2013            105.7
## 58  2013            107.3
## 59  2013            107.0
## 60  2013               ..
## 61  2009             98.9
## 62  2009             97.6
## 63  2009             97.2
## 64  2010            100.0
## 65  2010            100.0
## 66  2010            100.0
## 67  2011            100.2
## 68  2011            100.8
## 69  2011            108.9
## 70  2012            104.7
## 71  2012               ..
## 72  2012               ..
## 73  2013            107.1
## 74  2013               ..
## 75  2013               ..
## 76  2009             89.9
## 77  2009             98.8
## 78  2009               ..
## 79  2009               ..
## 80  2009             96.8
## 81  2009               ..
## 82  2009             96.4
## 83  2009               ..
## 84  2009               ..
## 85  2010            100.0
## 86  2010            100.0
## 87  2010               ..
## 88  2010               ..
## 89  2010            100.0
## 90  2010               ..
## 91  2010            100.0
## 92  2010               ..
## 93  2010               ..
## 94  2011            112.3
## 95  2011            104.1
## 96  2011               ..
## 97  2011               ..
## 98  2011            103.6
## 99  2011               ..
## 100 2011            106.8
## 101 2011               ..
## 102 2011               ..
## 103 2012            109.1
## 104 2012            110.8
## 105 2012               ..
## 106 2012            105.2
## 107 2012            104.7
## 108 2012               ..
## 109 2012               ..
## 110 2012            111.2
## 111 2012               ..
## 112 2013            103.8
## 113 2013            110.5
## 114 2013            102.2
## 115 2013            107.0
## 116 2013               ..
## 117 2013               ..
## 118 2013               ..
## 119 2013            110.7
## 120 2013               ..
## 121 2009             93.5
## 122 2009            102.4
## 123 2009             97.8
## 124 2009             99.2
## 125 2009            100.8
## 126 2009            102.4
## 127 2009               ..
## 128 2009             97.2
## 129 2009             98.3
## 130 2010            100.0
## 131 2010            100.0
## 132 2010               ..
## 133 2010            100.0
## 134 2010            100.0
## 135 2010            100.0
## 136 2010               ..
## 137 2010            100.0
## 138 2010            100.0
## 139 2011               ..
## 140 2011            106.6
## 141 2011               ..
## 142 2011            107.0
## 143 2011               ..
## 144 2011            100.0
## 145 2011               ..
## 146 2011            104.0
## 147 2011            102.8
## 148 2012               ..
## 149 2012            114.0
## 150 2012            110.5
## 151 2012            114.5
## 152 2012               ..
## 153 2012            103.1
## 154 2012               ..
## 155 2012            107.4
## 156 2012            106.8
## 157 2013               ..
## 158 2013            116.7
## 159 2013            113.3
## 160 2013            117.0
## 161 2013               ..
## 162 2013            103.5
## 163 2013               ..
## 164 2013            108.9
## 165 2013            106.9
## 166 2009            100.2
## 167 2009             99.8
## 168 2009             99.1
## 169 2009            100.0
## 170 2009               ..
## 171 2010            100.0
## 172 2010            100.0
## 173 2010            100.0
## 174 2010            100.0
## 175 2010               ..
## 176 2011            104.2
## 177 2011            102.8
## 178 2011            101.2
## 179 2011            102.5
## 180 2011               ..
## 181 2012            108.1
## 182 2012            105.2
## 183 2012            103.0
## 184 2012            104.3
## 185 2012               ..
## 186 2013            111.8
## 187 2013               ..
## 188 2013            104.9
## 189 2013            106.8
## 190 2013               ..
## 191 2009             84.3
## 192 2009             83.5
## 193 2009             90.1
## 194 2009             95.3
## 195 2009             98.5
## 196 2010            100.0
## 197 2010            100.0
## 198 2010            100.0
## 199 2010            100.0
## 200 2010            100.0
## 201 2011            101.1
## 202 2011            104.2
## 203 2011            104.7
## 204 2011            113.5
## 205 2011            104.8
## 206 2012             99.2
## 207 2012            110.1
## 208 2012            105.7
## 209 2012            120.2
## 210 2012            111.3
## 211 2013            102.1
## 212 2013            110.4
## 213 2013            107.5
## 214 2013            126.6
## 215 2013            110.2
df_Const_Matls_1b_long <- df_Const_Matls_1a_long

# Remove spaces from column Price_Index values
df_Const_Matls_1_long$Price_Index
##   [1] "96.1"             "94.4"             "95.9"            
##   [4] "95.4"             "              .." "100.0"           
##   [7] "100.0"            "100.0"            "100.0"           
##  [10] "100.0"            "105.1"            "108.4"           
##  [13] "101.7"            "102.0"            "103.3"           
##  [16] "105.3"            "108.3"            "109.6"           
##  [19] "111.2"            "111.3"            "102.0"           
##  [22] "105.4"            "115.5"            "116.2"           
##  [25] "111.4"            "104.0"            "100.8"           
##  [28] "              .." "101.5"            "100.2"           
##  [31] "87.1"             "              .." "100.0"           
##  [34] "100.0"            "              .." "100.0"           
##  [37] "100.0"            "100.0"            "              .."
##  [40] "101.6"            "103.0"            "              .."
##  [43] "102.7"            "103.3"            "116.6"           
##  [46] "              .." "108.1"            "106.9"           
##  [49] "              .." "104.0"            "105.6"           
##  [52] "113.2"            "              .." "109.1"           
##  [55] "108.7"            "              .." "105.7"           
##  [58] "107.3"            "107.0"            "              .."
##  [61] "98.9"             "97.6"             "97.2"            
##  [64] "100.0"            "100.0"            "100.0"           
##  [67] "100.2"            "100.8"            "108.9"           
##  [70] "104.7"            "              .." "              .."
##  [73] "107.1"            "              .." "              .."
##  [76] "89.9"             "98.8"             "              .."
##  [79] "              .." "96.8"             "              .."
##  [82] "96.4"             "              .." "              .."
##  [85] "100.0"            "100.0"            "              .."
##  [88] "              .." "100.0"            "              .."
##  [91] "100.0"            "              .." "              .."
##  [94] "112.3"            "104.1"            "              .."
##  [97] "              .." "103.6"            "              .."
## [100] "106.8"            "              .." "              .."
## [103] "109.1"            "110.8"            "              .."
## [106] "105.2"            "104.7"            "              .."
## [109] "              .." "111.2"            "              .."
## [112] "103.8"            "110.5"            "102.2"           
## [115] "107.0"            "              .." "              .."
## [118] "              .." "110.7"            "              .."
## [121] "93.5"             "102.4"            "97.8"            
## [124] "99.2"             "100.8"            "102.4"           
## [127] "              .." "97.2"             "98.3"            
## [130] "100.0"            "100.0"            "              .."
## [133] "100.0"            "100.0"            "100.0"           
## [136] "              .." "100.0"            "100.0"           
## [139] "              .." "106.6"            "              .."
## [142] "107.0"            "              .." "100.0"           
## [145] "              .." "104.0"            "102.8"           
## [148] "              .." "114.0"            "110.5"           
## [151] "114.5"            "              .." "103.1"           
## [154] "              .." "107.4"            "106.8"           
## [157] "              .." "116.7"            "113.3"           
## [160] "117.0"            "              .." "103.5"           
## [163] "              .." "108.9"            "106.9"           
## [166] "100.2"            "99.8"             "99.1"            
## [169] "100.0"            "              .." "100.0"           
## [172] "100.0"            "100.0"            "100.0"           
## [175] "              .." "104.2"            "102.8"           
## [178] "101.2"            "102.5"            "              .."
## [181] "108.1"            "105.2"            "103.0"           
## [184] "104.3"            "              .." "111.8"           
## [187] "              .." "104.9"            "106.8"           
## [190] "              .." "84.3"             "83.5"            
## [193] "90.1"             "95.3"             "98.5"            
## [196] "100.0"            "100.0"            "100.0"           
## [199] "100.0"            "100.0"            "101.1"           
## [202] "104.2"            "104.7"            "113.5"           
## [205] "104.8"            "99.2"             "110.1"           
## [208] "105.7"            "120.2"            "111.3"           
## [211] "102.1"            "110.4"            "107.5"           
## [214] "126.6"            "110.2"
df_Const_Matls_1b_long$Price_Index <- as.numeric(gsub("\\..{2}", "0",df_Const_Matls_1_long$Price_Index))
## Warning: NAs introduced by coercion
df_Const_Matls_1b_long$Price_Index
##   [1]  96.1  94.4  95.9  95.4    NA 100.0 100.0 100.0 100.0 100.0 105.1
##  [12] 108.4 101.7 102.0 103.3 105.3 108.3 109.6 111.2 111.3 102.0 105.4
##  [23] 115.5 116.2 111.4 104.0 100.8    NA 101.5 100.2  87.1    NA 100.0
##  [34] 100.0    NA 100.0 100.0 100.0    NA 101.6 103.0    NA 102.7 103.3
##  [45] 116.6    NA 108.1 106.9    NA 104.0 105.6 113.2    NA 109.1 108.7
##  [56]    NA 105.7 107.3 107.0    NA  98.9  97.6  97.2 100.0 100.0 100.0
##  [67] 100.2 100.8 108.9 104.7    NA    NA 107.1    NA    NA  89.9  98.8
##  [78]    NA    NA  96.8    NA  96.4    NA    NA 100.0 100.0    NA    NA
##  [89] 100.0    NA 100.0    NA    NA 112.3 104.1    NA    NA 103.6    NA
## [100] 106.8    NA    NA 109.1 110.8    NA 105.2 104.7    NA    NA 111.2
## [111]    NA 103.8 110.5 102.2 107.0    NA    NA    NA 110.7    NA  93.5
## [122] 102.4  97.8  99.2 100.8 102.4    NA  97.2  98.3 100.0 100.0    NA
## [133] 100.0 100.0 100.0    NA 100.0 100.0    NA 106.6    NA 107.0    NA
## [144] 100.0    NA 104.0 102.8    NA 114.0 110.5 114.5    NA 103.1    NA
## [155] 107.4 106.8    NA 116.7 113.3 117.0    NA 103.5    NA 108.9 106.9
## [166] 100.2  99.8  99.1 100.0    NA 100.0 100.0 100.0 100.0    NA 104.2
## [177] 102.8 101.2 102.5    NA 108.1 105.2 103.0 104.3    NA 111.8    NA
## [188] 104.9 106.8    NA  84.3  83.5  90.1  95.3  98.5 100.0 100.0 100.0
## [199] 100.0 100.0 101.1 104.2 104.7 113.5 104.8  99.2 110.1 105.7 120.2
## [210] 111.3 102.1 110.4 107.5 126.6 110.2
# Remove NA's in Price_Index column
df_Const_Matls_1c_long <- df_Const_Matls_1b_long
df_Const_Matls_1c_long$Price_Index <- replace(df_Const_Matls_1b_long$Price_Index, is.na(df_Const_Matls_1b_long$Price_Index), 0) 

df_Const_Matls_1c_long$Price_Index
##   [1]  96.1  94.4  95.9  95.4   0.0 100.0 100.0 100.0 100.0 100.0 105.1
##  [12] 108.4 101.7 102.0 103.3 105.3 108.3 109.6 111.2 111.3 102.0 105.4
##  [23] 115.5 116.2 111.4 104.0 100.8   0.0 101.5 100.2  87.1   0.0 100.0
##  [34] 100.0   0.0 100.0 100.0 100.0   0.0 101.6 103.0   0.0 102.7 103.3
##  [45] 116.6   0.0 108.1 106.9   0.0 104.0 105.6 113.2   0.0 109.1 108.7
##  [56]   0.0 105.7 107.3 107.0   0.0  98.9  97.6  97.2 100.0 100.0 100.0
##  [67] 100.2 100.8 108.9 104.7   0.0   0.0 107.1   0.0   0.0  89.9  98.8
##  [78]   0.0   0.0  96.8   0.0  96.4   0.0   0.0 100.0 100.0   0.0   0.0
##  [89] 100.0   0.0 100.0   0.0   0.0 112.3 104.1   0.0   0.0 103.6   0.0
## [100] 106.8   0.0   0.0 109.1 110.8   0.0 105.2 104.7   0.0   0.0 111.2
## [111]   0.0 103.8 110.5 102.2 107.0   0.0   0.0   0.0 110.7   0.0  93.5
## [122] 102.4  97.8  99.2 100.8 102.4   0.0  97.2  98.3 100.0 100.0   0.0
## [133] 100.0 100.0 100.0   0.0 100.0 100.0   0.0 106.6   0.0 107.0   0.0
## [144] 100.0   0.0 104.0 102.8   0.0 114.0 110.5 114.5   0.0 103.1   0.0
## [155] 107.4 106.8   0.0 116.7 113.3 117.0   0.0 103.5   0.0 108.9 106.9
## [166] 100.2  99.8  99.1 100.0   0.0 100.0 100.0 100.0 100.0   0.0 104.2
## [177] 102.8 101.2 102.5   0.0 108.1 105.2 103.0 104.3   0.0 111.8   0.0
## [188] 104.9 106.8   0.0  84.3  83.5  90.1  95.3  98.5 100.0 100.0 100.0
## [199] 100.0 100.0 101.1 104.2 104.7 113.5 104.8  99.2 110.1 105.7 120.2
## [210] 111.3 102.1 110.4 107.5 126.6 110.2
names(df_Const_Matls_1c_long)
## [1] "Material.Category" "Materials.Type"    "Year"             
## [4] "Price_Index"
# Test
#p <- ggplot(df_Const_Matls_1c_long, aes(x=Year, y=Price_Index, group=Materials.Type)) + geom_line()
#p 

# Plot Range of values per year
qplot(x=Year,y=Price_Index, data=df_Const_Matls_1c_long, geom="line")

# Plot range of price_index values per Materials.Type
qplot(x=Materials.Type,y=Price_Index, data=df_Const_Matls_1c_long, geom="line") + theme(axis.text.x = element_text(angle = 90, hjust = 1)) 

# Plot range of price_index values per Materials.Type per year
ggplot(df_Const_Matls_1c_long, aes(Materials.Type, Price_Index, group = Year, colour = Year)) +
  geom_path(alpha = 0.5) + theme(axis.text.x=element_text(angle=90,hjust=1,vjust=0.5))

# Setup group by criteria by Materials.Type
By_Materials_Type_1 <- group_by(df_Const_Matls_1c_long,Materials.Type,Year) 
By_Materials_Type_1
## Source: local data frame [215 x 4]
## Groups: Materials.Type, Year [205]
## 
##    Material.Category                  Materials.Type  Year Price_Index
##                <chr>                           <chr> <chr>       <dbl>
## 1         AGGREGATES     Crushed rock-including levy  2009        96.1
## 2         AGGREGATES     Crushed rock-excluding levy  2009        94.4
## 3         AGGREGATES    Sand & gravel-including levy  2009        95.9
## 4         AGGREGATES    Sand & Gravel-excluding levy  2009        95.4
## 5         AGGREGATES Coated roadstone-excluding levy  2009         0.0
## 6         AGGREGATES     Crushed rock-including levy  2010       100.0
## 7         AGGREGATES     Crushed rock-excluding levy  2010       100.0
## 8         AGGREGATES    Sand & gravel-including levy  2010       100.0
## 9         AGGREGATES    Sand & Gravel-excluding levy  2010       100.0
## 10        AGGREGATES Coated roadstone-excluding levy  2010       100.0
## # ... with 205 more rows
By_Materials_Type_1 %>% ggplot(aes(x=Year, y=Price_Index)) + geom_line()

# Select columns for analysis dataframe by Materials.Type
By_Materials_Type_2 <- select(By_Materials_Type_1,Materials.Type,Year,Price_Index)
By_Materials_Type_2
## Source: local data frame [215 x 3]
## Groups: Materials.Type, Year [205]
## 
##                     Materials.Type  Year Price_Index
##                              <chr> <chr>       <dbl>
## 1      Crushed rock-including levy  2009        96.1
## 2      Crushed rock-excluding levy  2009        94.4
## 3     Sand & gravel-including levy  2009        95.9
## 4     Sand & Gravel-excluding levy  2009        95.4
## 5  Coated roadstone-excluding levy  2009         0.0
## 6      Crushed rock-including levy  2010       100.0
## 7      Crushed rock-excluding levy  2010       100.0
## 8     Sand & gravel-including levy  2010       100.0
## 9     Sand & Gravel-excluding levy  2010       100.0
## 10 Coated roadstone-excluding levy  2010       100.0
## # ... with 205 more rows
# Present columns based on select and group-by criteria
By_Materials_Type_3 <- summarise(By_Materials_Type_2,Mean_Price_Index = mean(Price_Index))
By_Materials_Type_3
## Source: local data frame [205 x 3]
## Groups: Materials.Type [?]
## 
##       Materials.Type  Year Mean_Price_Index
##                <chr> <chr>            <dbl>
## 1        All  Bricks  2009             98.9
## 2        All  Bricks  2010            100.0
## 3        All  Bricks  2011            100.2
## 4        All  Bricks  2012            104.7
## 5        All  Bricks  2013            107.1
## 6  Asphalt products   2009             93.5
## 7  Asphalt products   2010            100.0
## 8  Asphalt products   2011              0.0
## 9  Asphalt products   2012              0.0
## 10 Asphalt products   2013              0.0
## # ... with 195 more rows
# Graph Materials.Type and Price_Index per Year
By_Materials_Type_3 %>%
ggplot(aes(Materials.Type, Mean_Price_Index, group = Year, colour = Year)) +
  geom_path(alpha = 0.5) + theme(axis.text.x=element_text(angle=90,hjust=1,vjust=0.5))

# Graph by Mean_Price_Index per year
By_Materials_Type_3 %>%
ggplot(aes(Year, y = Mean_Price_Index,group = Year)) +
  geom_path(alpha = 0.5) + theme(axis.text.x=element_text(angle=90,hjust=1,vjust=0.5))

Conclusion: The overall Mean_Price_Index dipped in 2010, but has been steadily increasing from 2010 to 2014.

END