#Load data
setwd("H:/17shared/165918 Bike-Veh Speed/InrixVehAnalysis/Analysis")
data_initial= read.csv("data_merge_(2_13_2018)_1.csv", header = TRUE)
match= subset(data_initial, Priority==1|2)
dim(match)
## [1] 47426   133
match$Time <- as.POSIXct(match$Time, format = "%H:%M")
match$Date <- as.POSIXct(match$Date, format = "%m/%d/%Y")

Site1NB = subset(match, SiteNumber == "SD01-NB")
Site1SB = subset(match, SiteNumber == "SD01-SB")
Site2NB = subset(match, SiteNumber == "SD02-NB")
Site2SB = subset(match, SiteNumber == "SD02-SB")
Site3EB = subset(match, SiteNumber == "SD03-EB")
Site3WB = subset(match, SiteNumber == "SD03-WB")
Site4EB = subset(match, SiteNumber == "SD04-EB")
Site4WB = subset(match, SiteNumber == "SD04-WB")
Site5EB = subset(match, SiteNumber == "SD05-EB")
Site5WB = subset(match, SiteNumber == "SD05-WB")
Site6EB = subset(match, SiteNumber == "SD06-EB")
Site6WB = subset(match, SiteNumber == "SD06-WB")
Site7NB = subset(match, SiteNumber == "SD07-NB")
Site7SB = subset(match, SiteNumber == "SD07-SB")

perc20 = subset(match,IPInc_rank > 0.80)
perc2 = subset(match,IPInc_rank > 0.08)
#Tube data LOS

ggplot(match, aes(x = SiteNumber, y = TubeAvSpeed, fill = factor(LOS_tube))) +
  geom_bar(stat = "identity") 
## Warning: Removed 271 rows containing missing values (position_stack).

ggplot(match, aes( x=LOS_tube,y= TubeAvSpeed, color=LOS_tube, fill=LOS_tube)) + 
    geom_bar( stat="identity") +    
    facet_grid(~SiteNumber)
## Warning: Removed 271 rows containing missing values (position_stack).

#Inrix data LOS

ggplot(match, aes(x = SiteNumber, y = InrixSpeed, fill = factor(LOS_Inrix))) +
  geom_bar(stat = "identity") 

ggplot(match, aes( x=LOS_Inrix,y= InrixSpeed, color=LOS_Inrix, fill=LOS_Inrix)) + 
    geom_bar( stat="identity") +    
    facet_grid(~SiteNumber)

library(ggplot2)
theme_set(theme_classic())

# Plot
g <- ggplot(match, aes(InrixSpeed))
g + geom_density(aes(fill=factor(T_Slot)), alpha=0.8) + 
    labs(title="Density plot", 
         subtitle="Speed Grouped by Number of time slots",
         x="Speed",
         fill="# Slots")

g <- ggplot(match, aes(T_Slot, InrixSpeed))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Speed vs Slot",
       x="Time Slot",
       y="Inrix Speed")

#summary(perc2)

#Inrix speed per day per Site for top 20%
aggregate(InrixSpeed ~ SiteNumber + T_Slot, perc2, mean)
##     SiteNumber    T_Slot InrixSpeed
## 1      SD01-NB    Dip1-F   15.27778
## 2      SD01-SB    Dip1-F   12.88889
## 3      SD02-NB    Dip1-F   19.48387
## 4      SD02-SB    Dip1-F   18.40000
## 5      SD03-NB    Dip1-F   25.28571
## 6      SD03-SB    Dip1-F   19.25000
## 7      SD04-EB    Dip1-F   26.04348
## 8      SD04-WB    Dip1-F   28.07407
## 9      SD05-EB    Dip1-F   26.04348
## 10     SD05-WB    Dip1-F   28.07407
## 11     SD06-EB    Dip1-F   33.00000
## 12     SD06-WB    Dip1-F   33.08333
## 13     SD07-NB    Dip1-F   40.55405
## 14     SD01-NB  Dip1-Wkn   15.75758
## 15     SD01-SB  Dip1-Wkn   13.65060
## 16     SD02-NB  Dip1-Wkn   17.55556
## 17     SD02-SB  Dip1-Wkn   18.61176
## 18     SD03-NB  Dip1-Wkn   27.58824
## 19     SD03-SB  Dip1-Wkn   20.81905
## 20     SD04-EB  Dip1-Wkn   28.31429
## 21     SD04-WB  Dip1-Wkn   30.03810
## 22     SD05-EB  Dip1-Wkn   28.31429
## 23     SD05-WB  Dip1-Wkn   30.03810
## 24     SD06-EB  Dip1-Wkn   31.76471
## 25     SD06-WB  Dip1-Wkn   34.30769
## 26     SD07-NB  Dip1-Wkn   40.53000
## 27     SD01-NB    Dip1_W   15.41250
## 28     SD01-SB    Dip1_W   14.29358
## 29     SD02-NB    Dip1_W   18.94872
## 30     SD02-SB    Dip1_W   19.02655
## 31     SD03-NB    Dip1_W   25.44118
## 32     SD03-SB    Dip1_W   20.23009
## 33     SD04-EB    Dip1_W   25.76923
## 34     SD04-WB    Dip1_W   28.86792
## 35     SD05-EB    Dip1_W   25.76923
## 36     SD05-WB    Dip1_W   28.86792
## 37     SD06-EB    Dip1_W   31.87500
## 38     SD06-WB    Dip1_W   33.40678
## 39     SD07-NB    Dip1_W   41.39384
## 40     SD01-NB    Dip2-F   15.35714
## 41     SD01-SB    Dip2-F   12.62500
## 42     SD02-NB    Dip2-F   16.09091
## 43     SD02-SB    Dip2-F   16.75000
## 44     SD03-NB    Dip2-F   26.18750
## 45     SD03-SB    Dip2-F   17.87500
## 46     SD04-EB    Dip2-F   23.64286
## 47     SD04-WB    Dip2-F   30.52174
## 48     SD05-EB    Dip2-F   23.64286
## 49     SD05-WB    Dip2-F   30.52174
## 50     SD06-EB    Dip2-F   32.81818
## 51     SD06-WB    Dip2-F   34.27273
## 52     SD07-NB    Dip2-F   41.01667
## 53     SD01-NB  Dip2-Wkn   18.13710
## 54     SD01-SB  Dip2-Wkn   16.25600
## 55     SD02-NB  Dip2-Wkn   18.58772
## 56     SD02-SB  Dip2-Wkn   17.39362
## 57     SD03-NB  Dip2-Wkn   29.65041
## 58     SD03-SB  Dip2-Wkn   22.82677
## 59     SD04-EB  Dip2-Wkn   32.28571
## 60     SD04-WB  Dip2-Wkn   31.67213
## 61     SD05-EB  Dip2-Wkn   32.28571
## 62     SD05-WB  Dip2-Wkn   31.67213
## 63     SD06-EB  Dip2-Wkn   32.96721
## 64     SD06-WB  Dip2-Wkn   33.29688
## 65     SD07-NB  Dip2-Wkn   39.61157
## 66     SD01-NB    Dip2_W   16.16296
## 67     SD01-SB    Dip2_W   13.53030
## 68     SD02-NB    Dip2_W   17.65414
## 69     SD02-SB    Dip2_W   17.03509
## 70     SD03-NB    Dip2_W   25.12500
## 71     SD03-SB    Dip2_W   20.07937
## 72     SD04-EB    Dip2_W   27.56923
## 73     SD04-WB    Dip2_W   29.75556
## 74     SD05-EB    Dip2_W   27.56923
## 75     SD05-WB    Dip2_W   29.75556
## 76     SD06-EB    Dip2_W   32.79167
## 77     SD06-WB    Dip2_W   33.43636
## 78     SD07-NB    Dip2_W   42.79320
## 79     SD01-NB    Dip3-F   17.25000
## 80     SD01-SB    Dip3-F   17.87500
## 81     SD02-NB    Dip3-F   20.26667
## 82     SD02-SB    Dip3-F   19.42857
## 83     SD03-NB    Dip3-F   31.31250
## 84     SD03-SB    Dip3-F   23.62500
## 85     SD04-EB    Dip3-F   32.31250
## 86     SD04-WB    Dip3-F   32.37500
## 87     SD05-EB    Dip3-F   32.31250
## 88     SD05-WB    Dip3-F   32.37500
## 89     SD06-EB    Dip3-F   32.25000
## 90     SD06-WB    Dip3-F   34.00000
## 91     SD07-NB    Dip3-F   37.67742
## 92     SD01-NB    Dip3-W   17.52288
## 93     SD01-SB    Dip3-W   15.93750
## 94     SD02-NB    Dip3-W   18.07299
## 95     SD02-SB    Dip3-W   21.74000
## 96     SD03-NB    Dip3-W   28.15287
## 97     SD03-SB    Dip3-W   19.35659
## 98     SD04-EB    Dip3-W   27.74026
## 99     SD04-WB    Dip3-W   31.81529
## 100    SD05-EB    Dip3-W   27.74026
## 101    SD05-WB    Dip3-W   31.81529
## 102    SD06-EB    Dip3-W   31.94595
## 103    SD06-WB    Dip3-W   35.73750
## 104    SD07-NB    Dip3-W   42.38170
## 105    SD01-NB    Dip4-F   16.68750
## 106    SD01-SB    Dip4-F   16.06250
## 107    SD02-NB    Dip4-F   16.50000
## 108    SD02-SB    Dip4-F   20.12500
## 109    SD03-NB    Dip4-F   28.12500
## 110    SD03-SB    Dip4-F   20.55556
## 111    SD04-EB    Dip4-F   28.25000
## 112    SD04-WB    Dip4-F   29.37500
## 113    SD05-EB    Dip4-F   28.25000
## 114    SD05-WB    Dip4-F   29.37500
## 115    SD06-EB    Dip4-F   32.37500
## 116    SD06-WB    Dip4-F   34.00000
## 117    SD07-NB    Dip4-F   41.40000
## 118    SD01-NB   Peak1-F   17.09091
## 119    SD01-SB   Peak1-F   13.18182
## 120    SD02-NB   Peak1-F   16.77778
## 121    SD02-SB   Peak1-F   18.33333
## 122    SD03-NB   Peak1-F   25.77778
## 123    SD03-SB   Peak1-F   17.76923
## 124    SD04-EB   Peak1-F   28.42857
## 125    SD04-WB   Peak1-F   26.45000
## 126    SD05-EB   Peak1-F   28.42857
## 127    SD05-WB   Peak1-F   26.45000
## 128    SD06-EB   Peak1-F   30.83333
## 129    SD06-WB   Peak1-F   34.25000
## 130    SD07-NB   Peak1-F   42.34545
## 131    SD01-NB   Peak1-W   19.41176
## 132    SD01-SB   Peak1-W   16.98026
## 133    SD02-NB   Peak1-W   18.13793
## 134    SD02-SB   Peak1-W   18.27559
## 135    SD03-NB   Peak1-W   27.85034
## 136    SD03-SB   Peak1-W   21.70455
## 137    SD04-EB   Peak1-W   30.65161
## 138    SD04-WB   Peak1-W   29.43651
## 139    SD05-EB   Peak1-W   30.65161
## 140    SD05-WB   Peak1-W   29.43651
## 141    SD06-EB   Peak1-W   32.77273
## 142    SD06-WB   Peak1-W   33.12308
## 143    SD07-NB   Peak1-W   41.34877
## 144    SD01-NB Peak1-Wkn   18.80645
## 145    SD01-SB Peak1-Wkn   19.35938
## 146    SD02-NB Peak1-Wkn   19.23333
## 147    SD02-SB Peak1-Wkn   19.54688
## 148    SD03-NB Peak1-Wkn   32.00000
## 149    SD03-SB Peak1-Wkn   28.07812
## 150    SD04-EB Peak1-Wkn   31.68750
## 151    SD04-WB Peak1-Wkn   34.92188
## 152    SD05-EB Peak1-Wkn   31.68750
## 153    SD05-WB Peak1-Wkn   34.92188
## 154    SD06-EB Peak1-Wkn   35.50000
## 155    SD06-WB Peak1-Wkn   36.40625
## 156    SD07-NB Peak1-Wkn   43.57143
## 157    SD01-NB   Peak2-F   17.62500
## 158    SD01-SB   Peak2-F   15.95833
## 159    SD02-NB   Peak2-F   17.31818
## 160    SD02-SB   Peak2-F   16.46667
## 161    SD03-NB   Peak2-F   28.04545
## 162    SD03-SB   Peak2-F   20.77273
## 163    SD04-EB   Peak2-F   29.54545
## 164    SD04-WB   Peak2-F   28.63158
## 165    SD05-EB   Peak2-F   29.54545
## 166    SD05-WB   Peak2-F   28.63158
## 167    SD06-EB   Peak2-F   33.54545
## 168    SD06-WB   Peak2-F   33.18182
## 169    SD07-NB   Peak2-F   38.50000
## 170    SD01-NB   Peak2-W   22.27500
## 171    SD01-SB   Peak2-W   20.78750
## 172    SD02-NB   Peak2-W   20.55195
## 173    SD02-SB   Peak2-W   22.50314
## 174    SD03-NB   Peak2-W   30.27215
## 175    SD03-SB   Peak2-W   24.86250
## 176    SD04-EB   Peak2-W   31.65000
## 177    SD04-WB   Peak2-W   33.13125
## 178    SD05-EB   Peak2-W   31.65000
## 179    SD05-WB   Peak2-W   33.13125
## 180    SD06-EB   Peak2-W   34.08861
## 181    SD06-WB   Peak2-W   36.55000
## 182    SD07-NB   Peak2-W   40.10833
## 183    SD01-NB Peak2-Wkn   22.43590
## 184    SD01-SB Peak2-Wkn   19.55696
## 185    SD02-NB Peak2-Wkn   20.33750
## 186    SD02-SB Peak2-Wkn   19.67568
## 187    SD03-NB Peak2-Wkn   30.12658
## 188    SD03-SB Peak2-Wkn   30.06250
## 189    SD04-EB Peak2-Wkn   33.81013
## 190    SD04-WB Peak2-Wkn   34.77500
## 191    SD05-EB Peak2-Wkn   33.81013
## 192    SD05-WB Peak2-Wkn   34.77500
## 193    SD06-EB Peak2-Wkn   34.32500
## 194    SD06-WB Peak2-Wkn   37.27500
## 195    SD07-NB Peak2-Wkn   39.11290
## 196    SD01-NB   Peak3-F   20.84375
## 197    SD01-SB   Peak3-F   19.53125
## 198    SD02-NB   Peak3-F   18.68750
## 199    SD02-SB   Peak3-F   20.09375
## 200    SD03-NB   Peak3-F   31.28125
## 201    SD03-SB   Peak3-F   27.00000
## 202    SD04-EB   Peak3-F   29.71875
## 203    SD04-WB   Peak3-F   32.46875
## 204    SD05-EB   Peak3-F   29.71875
## 205    SD05-WB   Peak3-F   32.46875
## 206    SD06-EB   Peak3-F   32.07143
## 207    SD06-WB   Peak3-F   34.43750
## 208    SD07-NB   Peak3-F   42.13158
## 209    SD01-NB   Peak4-F   18.41667
## 210    SD01-SB   Peak4-F   17.25000
## 211    SD02-NB   Peak4-F   21.16667
## 212    SD02-SB   Peak4-F   17.79167
## 213    SD03-NB   Peak4-F   25.66667
## 214    SD03-SB   Peak4-F   20.68182
## 215    SD04-EB   Peak4-F   25.86957
## 216    SD04-WB   Peak4-F   31.75000
## 217    SD05-EB   Peak4-F   25.86957
## 218    SD05-WB   Peak4-F   31.75000
## 219    SD06-EB   Peak4-F   31.66667
## 220    SD06-WB   Peak4-F   35.90909
## 221    SD07-NB   Peak4-F   43.51667
#Tube speed per day per Site for top 20%
aggregate(TubeAvSpeed ~ SiteNumber + T_Slot, perc2, mean)
##     SiteNumber    T_Slot TubeAvSpeed
## 1      SD01-NB    Dip1-F    18.30000
## 2      SD01-SB    Dip1-F    15.40556
## 3      SD02-NB    Dip1-F    22.60645
## 4      SD02-SB    Dip1-F    24.07333
## 5      SD03-NB    Dip1-F    36.58929
## 6      SD03-SB    Dip1-F    37.16071
## 7      SD04-EB    Dip1-F    30.57391
## 8      SD04-WB    Dip1-F    31.57778
## 9      SD05-EB    Dip1-F    34.08696
## 10     SD05-WB    Dip1-F    30.74444
## 11     SD06-EB    Dip1-F    30.03125
## 12     SD06-WB    Dip1-F    34.29167
## 13     SD07-NB    Dip1-F    37.24459
## 14     SD01-NB  Dip1-Wkn    18.31414
## 15     SD01-SB  Dip1-Wkn    15.30602
## 16     SD02-NB  Dip1-Wkn    21.10303
## 17     SD02-SB  Dip1-Wkn    23.12706
## 18     SD03-NB  Dip1-Wkn    36.33137
## 19     SD03-SB  Dip1-Wkn    38.53524
## 20     SD04-EB  Dip1-Wkn    28.39238
## 21     SD04-WB  Dip1-Wkn    32.04667
## 22     SD05-EB  Dip1-Wkn    31.90286
## 23     SD05-WB  Dip1-Wkn    32.28095
## 24     SD06-EB  Dip1-Wkn    31.37451
## 25     SD06-WB  Dip1-Wkn    34.42308
## 26     SD07-NB  Dip1-Wkn    37.65600
## 27     SD01-NB    Dip1_W    18.14625
## 28     SD01-SB    Dip1_W    16.06606
## 29     SD02-NB    Dip1_W    23.18205
## 30     SD02-SB    Dip1_W    24.22389
## 31     SD03-NB    Dip1_W    36.19608
## 32     SD03-SB    Dip1_W    36.75575
## 33     SD04-EB    Dip1_W    30.46795
## 34     SD04-WB    Dip1_W    31.95283
## 35     SD05-EB    Dip1_W    33.95769
## 36     SD05-WB    Dip1_W    30.16981
## 37     SD06-EB    Dip1_W    30.43750
## 38     SD06-WB    Dip1_W    34.51695
## 39     SD07-NB    Dip1_W    37.73390
## 40     SD01-NB    Dip2-F    18.28571
## 41     SD01-SB    Dip2-F    13.92500
## 42     SD02-NB    Dip2-F    19.19091
## 43     SD02-SB    Dip2-F    20.48750
## 44     SD03-NB    Dip2-F    35.25000
## 45     SD03-SB    Dip2-F    37.99375
## 46     SD04-EB    Dip2-F    28.12143
## 47     SD04-WB    Dip2-F    30.30435
## 48     SD05-EB    Dip2-F    31.41429
## 49     SD05-WB    Dip2-F    31.31304
## 50     SD06-EB    Dip2-F    29.60909
## 51     SD06-WB    Dip2-F    33.30000
## 52     SD07-NB    Dip2-F    37.79167
## 53     SD01-NB  Dip2-Wkn    20.52016
## 54     SD01-SB  Dip2-Wkn    16.97200
## 55     SD02-NB  Dip2-Wkn    21.12018
## 56     SD02-SB  Dip2-Wkn    20.14468
## 57     SD03-NB  Dip2-Wkn    35.71220
## 58     SD03-SB  Dip2-Wkn    38.16142
## 59     SD04-EB  Dip2-Wkn    28.51905
## 60     SD04-WB  Dip2-Wkn    32.11639
## 61     SD05-EB  Dip2-Wkn    31.86349
## 62     SD05-WB  Dip2-Wkn    32.31148
## 63     SD06-EB  Dip2-Wkn    31.17377
## 64     SD06-WB  Dip2-Wkn    33.96875
## 65     SD07-NB  Dip2-Wkn    36.62479
## 66     SD01-NB    Dip2_W    18.89259
## 67     SD01-SB    Dip2_W    14.74545
## 68     SD02-NB    Dip2_W    20.79398
## 69     SD02-SB    Dip2_W    20.97632
## 70     SD03-NB    Dip2_W    33.73359
## 71     SD03-SB    Dip2_W    38.28333
## 72     SD04-EB    Dip2_W    27.91538
## 73     SD04-WB    Dip2_W    31.10222
## 74     SD05-EB    Dip2_W    32.33846
## 75     SD05-WB    Dip2_W    31.20519
## 76     SD06-EB    Dip2_W    29.20556
## 77     SD06-WB    Dip2_W    33.60545
## 78     SD07-NB    Dip2_W    38.04618
## 79     SD01-NB    Dip3-F    21.37500
## 80     SD01-SB    Dip3-F    18.38750
## 81     SD02-NB    Dip3-F    21.08667
## 82     SD02-SB    Dip3-F    20.73571
## 83     SD03-NB    Dip3-F    35.35000
## 84     SD03-SB    Dip3-F    37.70625
## 85     SD04-EB    Dip3-F    28.56875
## 86     SD04-WB    Dip3-F    32.36875
## 87     SD05-EB    Dip3-F    31.83125
## 88     SD05-WB    Dip3-F    33.15625
## 89     SD06-EB    Dip3-F    30.43750
## 90     SD06-WB    Dip3-F    32.72500
## 91     SD07-NB    Dip3-F    34.80000
## 92     SD01-NB    Dip3-W    24.68121
## 93     SD01-SB    Dip3-W    21.49742
## 94     SD02-NB    Dip3-W    25.76063
## 95     SD02-SB    Dip3-W    29.01560
## 96     SD03-NB    Dip3-W    36.45197
## 97     SD03-SB    Dip3-W    38.91032
## 98     SD04-EB    Dip3-W    35.63355
## 99     SD04-WB    Dip3-W    33.99014
## 100    SD05-EB    Dip3-W    35.16093
## 101    SD05-WB    Dip3-W    36.91346
## 102    SD06-EB    Dip3-W    33.16622
## 103    SD06-WB    Dip3-W    35.93500
## 104    SD07-NB    Dip3-W    37.72323
## 105    SD01-NB    Dip4-F    27.20000
## 106    SD01-SB    Dip4-F    23.91250
## 107    SD02-NB    Dip4-F    25.88333
## 108    SD02-SB    Dip4-F    28.92000
## 109    SD03-NB    Dip4-F    37.31875
## 110    SD03-SB    Dip4-F    40.76667
## 111    SD04-EB    Dip4-F    36.00625
## 112    SD04-WB    Dip4-F    33.21333
## 113    SD05-EB    Dip4-F    35.36250
## 114    SD05-WB    Dip4-F    38.10000
## 115    SD06-EB    Dip4-F    32.93750
## 116    SD06-WB    Dip4-F    36.57500
## 117    SD07-NB    Dip4-F    34.65806
## 118    SD01-NB   Peak1-F    18.87727
## 119    SD01-SB   Peak1-F    13.93636
## 120    SD02-NB   Peak1-F    17.55556
## 121    SD02-SB   Peak1-F    19.34444
## 122    SD03-NB   Peak1-F    29.00000
## 123    SD03-SB   Peak1-F    37.95385
## 124    SD04-EB   Peak1-F    26.93333
## 125    SD04-WB   Peak1-F    30.98500
## 126    SD05-EB   Peak1-F    31.90476
## 127    SD05-WB   Peak1-F    30.88500
## 128    SD06-EB   Peak1-F    25.68333
## 129    SD06-WB   Peak1-F    33.47500
## 130    SD07-NB   Peak1-F    37.86182
## 131    SD01-NB   Peak1-W    20.89869
## 132    SD01-SB   Peak1-W    16.26579
## 133    SD02-NB   Peak1-W    20.68276
## 134    SD02-SB   Peak1-W    21.77638
## 135    SD03-NB   Peak1-W    30.56531
## 136    SD03-SB   Peak1-W    38.44773
## 137    SD04-EB   Peak1-W    26.88774
## 138    SD04-WB   Peak1-W    31.65000
## 139    SD05-EB   Peak1-W    30.90903
## 140    SD05-WB   Peak1-W    31.62143
## 141    SD06-EB   Peak1-W    29.17121
## 142    SD06-WB   Peak1-W    33.13846
## 143    SD07-NB   Peak1-W    36.24599
## 144    SD01-NB Peak1-Wkn    24.16393
## 145    SD01-SB Peak1-Wkn    21.36563
## 146    SD02-NB Peak1-Wkn    25.24737
## 147    SD02-SB Peak1-Wkn    28.31563
## 148    SD03-NB Peak1-Wkn    36.62500
## 149    SD03-SB Peak1-Wkn    38.58438
## 150    SD04-EB Peak1-Wkn    35.30469
## 151    SD04-WB Peak1-Wkn    33.76875
## 152    SD05-EB Peak1-Wkn    35.24844
## 153    SD05-WB Peak1-Wkn    36.51875
## 154    SD06-EB Peak1-Wkn    33.36000
## 155    SD06-WB Peak1-Wkn    35.88437
## 156    SD07-NB Peak1-Wkn    34.64000
## 157    SD01-NB   Peak2-F    20.65417
## 158    SD01-SB   Peak2-F    15.79583
## 159    SD02-NB   Peak2-F    20.59091
## 160    SD02-SB   Peak2-F    18.70667
## 161    SD03-NB   Peak2-F    33.57727
## 162    SD03-SB   Peak2-F    38.35455
## 163    SD04-EB   Peak2-F    27.26364
## 164    SD04-WB   Peak2-F    31.16316
## 165    SD05-EB   Peak2-F    31.34091
## 166    SD05-WB   Peak2-F    31.56316
## 167    SD06-EB   Peak2-F    27.71818
## 168    SD06-WB   Peak2-F    33.25455
## 169    SD07-NB   Peak2-F    35.24583
## 170    SD01-NB   Peak2-W    24.87625
## 171    SD01-SB   Peak2-W    22.37625
## 172    SD02-NB   Peak2-W    25.63947
## 173    SD02-SB   Peak2-W    27.20823
## 174    SD03-NB   Peak2-W    36.66709
## 175    SD03-SB   Peak2-W    38.43125
## 176    SD04-EB   Peak2-W    33.85813
## 177    SD04-WB   Peak2-W    33.99375
## 178    SD05-EB   Peak2-W    34.44313
## 179    SD05-WB   Peak2-W    34.59750
## 180    SD06-EB   Peak2-W    33.44557
## 181    SD06-WB   Peak2-W    34.75500
## 182    SD07-NB   Peak2-W    35.96397
## 183    SD01-NB Peak2-Wkn    24.70641
## 184    SD01-SB Peak2-Wkn    21.97975
## 185    SD02-NB Peak2-Wkn    25.33375
## 186    SD02-SB Peak2-Wkn    25.58649
## 187    SD03-NB Peak2-Wkn    36.97595
## 188    SD03-SB Peak2-Wkn    37.61000
## 189    SD04-EB Peak2-Wkn    35.14557
## 190    SD04-WB Peak2-Wkn    34.33375
## 191    SD05-EB Peak2-Wkn    34.71899
## 192    SD05-WB Peak2-Wkn    35.42000
## 193    SD06-EB Peak2-Wkn    33.26250
## 194    SD06-WB Peak2-Wkn    35.10750
## 195    SD07-NB Peak2-Wkn    34.86613
## 196    SD01-NB   Peak3-F    24.39375
## 197    SD01-SB   Peak3-F    21.25937
## 198    SD02-NB   Peak3-F    24.73125
## 199    SD02-SB   Peak3-F    25.65312
## 200    SD03-NB   Peak3-F    36.75312
## 201    SD03-SB   Peak3-F    37.55938
## 202    SD04-EB   Peak3-F    34.07500
## 203    SD04-WB   Peak3-F    33.75000
## 204    SD05-EB   Peak3-F    34.30938
## 205    SD05-WB   Peak3-F    35.15313
## 206    SD06-EB   Peak3-F    33.59286
## 207    SD06-WB   Peak3-F    35.75000
## 208    SD07-NB   Peak3-F    36.30263
## 209    SD01-NB   Peak4-F    23.84783
## 210    SD01-SB   Peak4-F    20.50833
## 211    SD02-NB   Peak4-F    25.32917
## 212    SD02-SB   Peak4-F    29.48750
## 213    SD03-NB   Peak4-F    37.26522
## 214    SD03-SB   Peak4-F    40.36364
## 215    SD04-EB   Peak4-F    32.96957
## 216    SD04-WB   Peak4-F    33.70500
## 217    SD05-EB   Peak4-F    35.66522
## 218    SD05-WB   Peak4-F    36.53000
## 219    SD06-EB   Peak4-F    32.10000
## 220    SD06-WB   Peak4-F    35.47273
## 221    SD07-NB   Peak4-F    36.52222
g <- ggplot(perc20, aes(SiteNumber))
g + geom_bar(aes(fill=T_Slot), width = 0.5) + 
  theme(axis.text.x = element_text(angle=65, vjust=0.6)) + 
  labs(title="Histogram on Slots", 
       subtitle="Slots for top 20%ile Inrix Speeds") 

g <- ggplot(perc20, aes(T_Slot, InrixSpeed))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Speed vs Slot for top 20%",
       x="Time Slot",
       y="Inrix Speed")

g <- ggplot(perc20, aes(SiteNumber, InrixSpeed))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Speed vs Site for top 20%",
       x="Site",
       y="Inrix Speed")

g <- ggplot(perc20, aes(T_Slot, TubeAvSpeed))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Speed vs Slot for top 20%",
       x="Time Slot",
       y="Tube Speed")

g <- ggplot(perc20, aes(SiteNumber, Time))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Tube Speed vs Site for top 20% of Inrix Speeds",
       x="Site",
       y="Time- #date correction required")

#Inrix speed per day per Site for top 2%
aggregate(InrixSpeed ~ SiteNumber + T_Slot, perc2, mean)
##     SiteNumber    T_Slot InrixSpeed
## 1      SD01-NB    Dip1-F   15.27778
## 2      SD01-SB    Dip1-F   12.88889
## 3      SD02-NB    Dip1-F   19.48387
## 4      SD02-SB    Dip1-F   18.40000
## 5      SD03-NB    Dip1-F   25.28571
## 6      SD03-SB    Dip1-F   19.25000
## 7      SD04-EB    Dip1-F   26.04348
## 8      SD04-WB    Dip1-F   28.07407
## 9      SD05-EB    Dip1-F   26.04348
## 10     SD05-WB    Dip1-F   28.07407
## 11     SD06-EB    Dip1-F   33.00000
## 12     SD06-WB    Dip1-F   33.08333
## 13     SD07-NB    Dip1-F   40.55405
## 14     SD01-NB  Dip1-Wkn   15.75758
## 15     SD01-SB  Dip1-Wkn   13.65060
## 16     SD02-NB  Dip1-Wkn   17.55556
## 17     SD02-SB  Dip1-Wkn   18.61176
## 18     SD03-NB  Dip1-Wkn   27.58824
## 19     SD03-SB  Dip1-Wkn   20.81905
## 20     SD04-EB  Dip1-Wkn   28.31429
## 21     SD04-WB  Dip1-Wkn   30.03810
## 22     SD05-EB  Dip1-Wkn   28.31429
## 23     SD05-WB  Dip1-Wkn   30.03810
## 24     SD06-EB  Dip1-Wkn   31.76471
## 25     SD06-WB  Dip1-Wkn   34.30769
## 26     SD07-NB  Dip1-Wkn   40.53000
## 27     SD01-NB    Dip1_W   15.41250
## 28     SD01-SB    Dip1_W   14.29358
## 29     SD02-NB    Dip1_W   18.94872
## 30     SD02-SB    Dip1_W   19.02655
## 31     SD03-NB    Dip1_W   25.44118
## 32     SD03-SB    Dip1_W   20.23009
## 33     SD04-EB    Dip1_W   25.76923
## 34     SD04-WB    Dip1_W   28.86792
## 35     SD05-EB    Dip1_W   25.76923
## 36     SD05-WB    Dip1_W   28.86792
## 37     SD06-EB    Dip1_W   31.87500
## 38     SD06-WB    Dip1_W   33.40678
## 39     SD07-NB    Dip1_W   41.39384
## 40     SD01-NB    Dip2-F   15.35714
## 41     SD01-SB    Dip2-F   12.62500
## 42     SD02-NB    Dip2-F   16.09091
## 43     SD02-SB    Dip2-F   16.75000
## 44     SD03-NB    Dip2-F   26.18750
## 45     SD03-SB    Dip2-F   17.87500
## 46     SD04-EB    Dip2-F   23.64286
## 47     SD04-WB    Dip2-F   30.52174
## 48     SD05-EB    Dip2-F   23.64286
## 49     SD05-WB    Dip2-F   30.52174
## 50     SD06-EB    Dip2-F   32.81818
## 51     SD06-WB    Dip2-F   34.27273
## 52     SD07-NB    Dip2-F   41.01667
## 53     SD01-NB  Dip2-Wkn   18.13710
## 54     SD01-SB  Dip2-Wkn   16.25600
## 55     SD02-NB  Dip2-Wkn   18.58772
## 56     SD02-SB  Dip2-Wkn   17.39362
## 57     SD03-NB  Dip2-Wkn   29.65041
## 58     SD03-SB  Dip2-Wkn   22.82677
## 59     SD04-EB  Dip2-Wkn   32.28571
## 60     SD04-WB  Dip2-Wkn   31.67213
## 61     SD05-EB  Dip2-Wkn   32.28571
## 62     SD05-WB  Dip2-Wkn   31.67213
## 63     SD06-EB  Dip2-Wkn   32.96721
## 64     SD06-WB  Dip2-Wkn   33.29688
## 65     SD07-NB  Dip2-Wkn   39.61157
## 66     SD01-NB    Dip2_W   16.16296
## 67     SD01-SB    Dip2_W   13.53030
## 68     SD02-NB    Dip2_W   17.65414
## 69     SD02-SB    Dip2_W   17.03509
## 70     SD03-NB    Dip2_W   25.12500
## 71     SD03-SB    Dip2_W   20.07937
## 72     SD04-EB    Dip2_W   27.56923
## 73     SD04-WB    Dip2_W   29.75556
## 74     SD05-EB    Dip2_W   27.56923
## 75     SD05-WB    Dip2_W   29.75556
## 76     SD06-EB    Dip2_W   32.79167
## 77     SD06-WB    Dip2_W   33.43636
## 78     SD07-NB    Dip2_W   42.79320
## 79     SD01-NB    Dip3-F   17.25000
## 80     SD01-SB    Dip3-F   17.87500
## 81     SD02-NB    Dip3-F   20.26667
## 82     SD02-SB    Dip3-F   19.42857
## 83     SD03-NB    Dip3-F   31.31250
## 84     SD03-SB    Dip3-F   23.62500
## 85     SD04-EB    Dip3-F   32.31250
## 86     SD04-WB    Dip3-F   32.37500
## 87     SD05-EB    Dip3-F   32.31250
## 88     SD05-WB    Dip3-F   32.37500
## 89     SD06-EB    Dip3-F   32.25000
## 90     SD06-WB    Dip3-F   34.00000
## 91     SD07-NB    Dip3-F   37.67742
## 92     SD01-NB    Dip3-W   17.52288
## 93     SD01-SB    Dip3-W   15.93750
## 94     SD02-NB    Dip3-W   18.07299
## 95     SD02-SB    Dip3-W   21.74000
## 96     SD03-NB    Dip3-W   28.15287
## 97     SD03-SB    Dip3-W   19.35659
## 98     SD04-EB    Dip3-W   27.74026
## 99     SD04-WB    Dip3-W   31.81529
## 100    SD05-EB    Dip3-W   27.74026
## 101    SD05-WB    Dip3-W   31.81529
## 102    SD06-EB    Dip3-W   31.94595
## 103    SD06-WB    Dip3-W   35.73750
## 104    SD07-NB    Dip3-W   42.38170
## 105    SD01-NB    Dip4-F   16.68750
## 106    SD01-SB    Dip4-F   16.06250
## 107    SD02-NB    Dip4-F   16.50000
## 108    SD02-SB    Dip4-F   20.12500
## 109    SD03-NB    Dip4-F   28.12500
## 110    SD03-SB    Dip4-F   20.55556
## 111    SD04-EB    Dip4-F   28.25000
## 112    SD04-WB    Dip4-F   29.37500
## 113    SD05-EB    Dip4-F   28.25000
## 114    SD05-WB    Dip4-F   29.37500
## 115    SD06-EB    Dip4-F   32.37500
## 116    SD06-WB    Dip4-F   34.00000
## 117    SD07-NB    Dip4-F   41.40000
## 118    SD01-NB   Peak1-F   17.09091
## 119    SD01-SB   Peak1-F   13.18182
## 120    SD02-NB   Peak1-F   16.77778
## 121    SD02-SB   Peak1-F   18.33333
## 122    SD03-NB   Peak1-F   25.77778
## 123    SD03-SB   Peak1-F   17.76923
## 124    SD04-EB   Peak1-F   28.42857
## 125    SD04-WB   Peak1-F   26.45000
## 126    SD05-EB   Peak1-F   28.42857
## 127    SD05-WB   Peak1-F   26.45000
## 128    SD06-EB   Peak1-F   30.83333
## 129    SD06-WB   Peak1-F   34.25000
## 130    SD07-NB   Peak1-F   42.34545
## 131    SD01-NB   Peak1-W   19.41176
## 132    SD01-SB   Peak1-W   16.98026
## 133    SD02-NB   Peak1-W   18.13793
## 134    SD02-SB   Peak1-W   18.27559
## 135    SD03-NB   Peak1-W   27.85034
## 136    SD03-SB   Peak1-W   21.70455
## 137    SD04-EB   Peak1-W   30.65161
## 138    SD04-WB   Peak1-W   29.43651
## 139    SD05-EB   Peak1-W   30.65161
## 140    SD05-WB   Peak1-W   29.43651
## 141    SD06-EB   Peak1-W   32.77273
## 142    SD06-WB   Peak1-W   33.12308
## 143    SD07-NB   Peak1-W   41.34877
## 144    SD01-NB Peak1-Wkn   18.80645
## 145    SD01-SB Peak1-Wkn   19.35938
## 146    SD02-NB Peak1-Wkn   19.23333
## 147    SD02-SB Peak1-Wkn   19.54688
## 148    SD03-NB Peak1-Wkn   32.00000
## 149    SD03-SB Peak1-Wkn   28.07812
## 150    SD04-EB Peak1-Wkn   31.68750
## 151    SD04-WB Peak1-Wkn   34.92188
## 152    SD05-EB Peak1-Wkn   31.68750
## 153    SD05-WB Peak1-Wkn   34.92188
## 154    SD06-EB Peak1-Wkn   35.50000
## 155    SD06-WB Peak1-Wkn   36.40625
## 156    SD07-NB Peak1-Wkn   43.57143
## 157    SD01-NB   Peak2-F   17.62500
## 158    SD01-SB   Peak2-F   15.95833
## 159    SD02-NB   Peak2-F   17.31818
## 160    SD02-SB   Peak2-F   16.46667
## 161    SD03-NB   Peak2-F   28.04545
## 162    SD03-SB   Peak2-F   20.77273
## 163    SD04-EB   Peak2-F   29.54545
## 164    SD04-WB   Peak2-F   28.63158
## 165    SD05-EB   Peak2-F   29.54545
## 166    SD05-WB   Peak2-F   28.63158
## 167    SD06-EB   Peak2-F   33.54545
## 168    SD06-WB   Peak2-F   33.18182
## 169    SD07-NB   Peak2-F   38.50000
## 170    SD01-NB   Peak2-W   22.27500
## 171    SD01-SB   Peak2-W   20.78750
## 172    SD02-NB   Peak2-W   20.55195
## 173    SD02-SB   Peak2-W   22.50314
## 174    SD03-NB   Peak2-W   30.27215
## 175    SD03-SB   Peak2-W   24.86250
## 176    SD04-EB   Peak2-W   31.65000
## 177    SD04-WB   Peak2-W   33.13125
## 178    SD05-EB   Peak2-W   31.65000
## 179    SD05-WB   Peak2-W   33.13125
## 180    SD06-EB   Peak2-W   34.08861
## 181    SD06-WB   Peak2-W   36.55000
## 182    SD07-NB   Peak2-W   40.10833
## 183    SD01-NB Peak2-Wkn   22.43590
## 184    SD01-SB Peak2-Wkn   19.55696
## 185    SD02-NB Peak2-Wkn   20.33750
## 186    SD02-SB Peak2-Wkn   19.67568
## 187    SD03-NB Peak2-Wkn   30.12658
## 188    SD03-SB Peak2-Wkn   30.06250
## 189    SD04-EB Peak2-Wkn   33.81013
## 190    SD04-WB Peak2-Wkn   34.77500
## 191    SD05-EB Peak2-Wkn   33.81013
## 192    SD05-WB Peak2-Wkn   34.77500
## 193    SD06-EB Peak2-Wkn   34.32500
## 194    SD06-WB Peak2-Wkn   37.27500
## 195    SD07-NB Peak2-Wkn   39.11290
## 196    SD01-NB   Peak3-F   20.84375
## 197    SD01-SB   Peak3-F   19.53125
## 198    SD02-NB   Peak3-F   18.68750
## 199    SD02-SB   Peak3-F   20.09375
## 200    SD03-NB   Peak3-F   31.28125
## 201    SD03-SB   Peak3-F   27.00000
## 202    SD04-EB   Peak3-F   29.71875
## 203    SD04-WB   Peak3-F   32.46875
## 204    SD05-EB   Peak3-F   29.71875
## 205    SD05-WB   Peak3-F   32.46875
## 206    SD06-EB   Peak3-F   32.07143
## 207    SD06-WB   Peak3-F   34.43750
## 208    SD07-NB   Peak3-F   42.13158
## 209    SD01-NB   Peak4-F   18.41667
## 210    SD01-SB   Peak4-F   17.25000
## 211    SD02-NB   Peak4-F   21.16667
## 212    SD02-SB   Peak4-F   17.79167
## 213    SD03-NB   Peak4-F   25.66667
## 214    SD03-SB   Peak4-F   20.68182
## 215    SD04-EB   Peak4-F   25.86957
## 216    SD04-WB   Peak4-F   31.75000
## 217    SD05-EB   Peak4-F   25.86957
## 218    SD05-WB   Peak4-F   31.75000
## 219    SD06-EB   Peak4-F   31.66667
## 220    SD06-WB   Peak4-F   35.90909
## 221    SD07-NB   Peak4-F   43.51667
#Tube speed per day per Site for top 2%
aggregate(TubeAvSpeed ~ SiteNumber + T_Slot, perc2, mean)
##     SiteNumber    T_Slot TubeAvSpeed
## 1      SD01-NB    Dip1-F    18.30000
## 2      SD01-SB    Dip1-F    15.40556
## 3      SD02-NB    Dip1-F    22.60645
## 4      SD02-SB    Dip1-F    24.07333
## 5      SD03-NB    Dip1-F    36.58929
## 6      SD03-SB    Dip1-F    37.16071
## 7      SD04-EB    Dip1-F    30.57391
## 8      SD04-WB    Dip1-F    31.57778
## 9      SD05-EB    Dip1-F    34.08696
## 10     SD05-WB    Dip1-F    30.74444
## 11     SD06-EB    Dip1-F    30.03125
## 12     SD06-WB    Dip1-F    34.29167
## 13     SD07-NB    Dip1-F    37.24459
## 14     SD01-NB  Dip1-Wkn    18.31414
## 15     SD01-SB  Dip1-Wkn    15.30602
## 16     SD02-NB  Dip1-Wkn    21.10303
## 17     SD02-SB  Dip1-Wkn    23.12706
## 18     SD03-NB  Dip1-Wkn    36.33137
## 19     SD03-SB  Dip1-Wkn    38.53524
## 20     SD04-EB  Dip1-Wkn    28.39238
## 21     SD04-WB  Dip1-Wkn    32.04667
## 22     SD05-EB  Dip1-Wkn    31.90286
## 23     SD05-WB  Dip1-Wkn    32.28095
## 24     SD06-EB  Dip1-Wkn    31.37451
## 25     SD06-WB  Dip1-Wkn    34.42308
## 26     SD07-NB  Dip1-Wkn    37.65600
## 27     SD01-NB    Dip1_W    18.14625
## 28     SD01-SB    Dip1_W    16.06606
## 29     SD02-NB    Dip1_W    23.18205
## 30     SD02-SB    Dip1_W    24.22389
## 31     SD03-NB    Dip1_W    36.19608
## 32     SD03-SB    Dip1_W    36.75575
## 33     SD04-EB    Dip1_W    30.46795
## 34     SD04-WB    Dip1_W    31.95283
## 35     SD05-EB    Dip1_W    33.95769
## 36     SD05-WB    Dip1_W    30.16981
## 37     SD06-EB    Dip1_W    30.43750
## 38     SD06-WB    Dip1_W    34.51695
## 39     SD07-NB    Dip1_W    37.73390
## 40     SD01-NB    Dip2-F    18.28571
## 41     SD01-SB    Dip2-F    13.92500
## 42     SD02-NB    Dip2-F    19.19091
## 43     SD02-SB    Dip2-F    20.48750
## 44     SD03-NB    Dip2-F    35.25000
## 45     SD03-SB    Dip2-F    37.99375
## 46     SD04-EB    Dip2-F    28.12143
## 47     SD04-WB    Dip2-F    30.30435
## 48     SD05-EB    Dip2-F    31.41429
## 49     SD05-WB    Dip2-F    31.31304
## 50     SD06-EB    Dip2-F    29.60909
## 51     SD06-WB    Dip2-F    33.30000
## 52     SD07-NB    Dip2-F    37.79167
## 53     SD01-NB  Dip2-Wkn    20.52016
## 54     SD01-SB  Dip2-Wkn    16.97200
## 55     SD02-NB  Dip2-Wkn    21.12018
## 56     SD02-SB  Dip2-Wkn    20.14468
## 57     SD03-NB  Dip2-Wkn    35.71220
## 58     SD03-SB  Dip2-Wkn    38.16142
## 59     SD04-EB  Dip2-Wkn    28.51905
## 60     SD04-WB  Dip2-Wkn    32.11639
## 61     SD05-EB  Dip2-Wkn    31.86349
## 62     SD05-WB  Dip2-Wkn    32.31148
## 63     SD06-EB  Dip2-Wkn    31.17377
## 64     SD06-WB  Dip2-Wkn    33.96875
## 65     SD07-NB  Dip2-Wkn    36.62479
## 66     SD01-NB    Dip2_W    18.89259
## 67     SD01-SB    Dip2_W    14.74545
## 68     SD02-NB    Dip2_W    20.79398
## 69     SD02-SB    Dip2_W    20.97632
## 70     SD03-NB    Dip2_W    33.73359
## 71     SD03-SB    Dip2_W    38.28333
## 72     SD04-EB    Dip2_W    27.91538
## 73     SD04-WB    Dip2_W    31.10222
## 74     SD05-EB    Dip2_W    32.33846
## 75     SD05-WB    Dip2_W    31.20519
## 76     SD06-EB    Dip2_W    29.20556
## 77     SD06-WB    Dip2_W    33.60545
## 78     SD07-NB    Dip2_W    38.04618
## 79     SD01-NB    Dip3-F    21.37500
## 80     SD01-SB    Dip3-F    18.38750
## 81     SD02-NB    Dip3-F    21.08667
## 82     SD02-SB    Dip3-F    20.73571
## 83     SD03-NB    Dip3-F    35.35000
## 84     SD03-SB    Dip3-F    37.70625
## 85     SD04-EB    Dip3-F    28.56875
## 86     SD04-WB    Dip3-F    32.36875
## 87     SD05-EB    Dip3-F    31.83125
## 88     SD05-WB    Dip3-F    33.15625
## 89     SD06-EB    Dip3-F    30.43750
## 90     SD06-WB    Dip3-F    32.72500
## 91     SD07-NB    Dip3-F    34.80000
## 92     SD01-NB    Dip3-W    24.68121
## 93     SD01-SB    Dip3-W    21.49742
## 94     SD02-NB    Dip3-W    25.76063
## 95     SD02-SB    Dip3-W    29.01560
## 96     SD03-NB    Dip3-W    36.45197
## 97     SD03-SB    Dip3-W    38.91032
## 98     SD04-EB    Dip3-W    35.63355
## 99     SD04-WB    Dip3-W    33.99014
## 100    SD05-EB    Dip3-W    35.16093
## 101    SD05-WB    Dip3-W    36.91346
## 102    SD06-EB    Dip3-W    33.16622
## 103    SD06-WB    Dip3-W    35.93500
## 104    SD07-NB    Dip3-W    37.72323
## 105    SD01-NB    Dip4-F    27.20000
## 106    SD01-SB    Dip4-F    23.91250
## 107    SD02-NB    Dip4-F    25.88333
## 108    SD02-SB    Dip4-F    28.92000
## 109    SD03-NB    Dip4-F    37.31875
## 110    SD03-SB    Dip4-F    40.76667
## 111    SD04-EB    Dip4-F    36.00625
## 112    SD04-WB    Dip4-F    33.21333
## 113    SD05-EB    Dip4-F    35.36250
## 114    SD05-WB    Dip4-F    38.10000
## 115    SD06-EB    Dip4-F    32.93750
## 116    SD06-WB    Dip4-F    36.57500
## 117    SD07-NB    Dip4-F    34.65806
## 118    SD01-NB   Peak1-F    18.87727
## 119    SD01-SB   Peak1-F    13.93636
## 120    SD02-NB   Peak1-F    17.55556
## 121    SD02-SB   Peak1-F    19.34444
## 122    SD03-NB   Peak1-F    29.00000
## 123    SD03-SB   Peak1-F    37.95385
## 124    SD04-EB   Peak1-F    26.93333
## 125    SD04-WB   Peak1-F    30.98500
## 126    SD05-EB   Peak1-F    31.90476
## 127    SD05-WB   Peak1-F    30.88500
## 128    SD06-EB   Peak1-F    25.68333
## 129    SD06-WB   Peak1-F    33.47500
## 130    SD07-NB   Peak1-F    37.86182
## 131    SD01-NB   Peak1-W    20.89869
## 132    SD01-SB   Peak1-W    16.26579
## 133    SD02-NB   Peak1-W    20.68276
## 134    SD02-SB   Peak1-W    21.77638
## 135    SD03-NB   Peak1-W    30.56531
## 136    SD03-SB   Peak1-W    38.44773
## 137    SD04-EB   Peak1-W    26.88774
## 138    SD04-WB   Peak1-W    31.65000
## 139    SD05-EB   Peak1-W    30.90903
## 140    SD05-WB   Peak1-W    31.62143
## 141    SD06-EB   Peak1-W    29.17121
## 142    SD06-WB   Peak1-W    33.13846
## 143    SD07-NB   Peak1-W    36.24599
## 144    SD01-NB Peak1-Wkn    24.16393
## 145    SD01-SB Peak1-Wkn    21.36563
## 146    SD02-NB Peak1-Wkn    25.24737
## 147    SD02-SB Peak1-Wkn    28.31563
## 148    SD03-NB Peak1-Wkn    36.62500
## 149    SD03-SB Peak1-Wkn    38.58438
## 150    SD04-EB Peak1-Wkn    35.30469
## 151    SD04-WB Peak1-Wkn    33.76875
## 152    SD05-EB Peak1-Wkn    35.24844
## 153    SD05-WB Peak1-Wkn    36.51875
## 154    SD06-EB Peak1-Wkn    33.36000
## 155    SD06-WB Peak1-Wkn    35.88437
## 156    SD07-NB Peak1-Wkn    34.64000
## 157    SD01-NB   Peak2-F    20.65417
## 158    SD01-SB   Peak2-F    15.79583
## 159    SD02-NB   Peak2-F    20.59091
## 160    SD02-SB   Peak2-F    18.70667
## 161    SD03-NB   Peak2-F    33.57727
## 162    SD03-SB   Peak2-F    38.35455
## 163    SD04-EB   Peak2-F    27.26364
## 164    SD04-WB   Peak2-F    31.16316
## 165    SD05-EB   Peak2-F    31.34091
## 166    SD05-WB   Peak2-F    31.56316
## 167    SD06-EB   Peak2-F    27.71818
## 168    SD06-WB   Peak2-F    33.25455
## 169    SD07-NB   Peak2-F    35.24583
## 170    SD01-NB   Peak2-W    24.87625
## 171    SD01-SB   Peak2-W    22.37625
## 172    SD02-NB   Peak2-W    25.63947
## 173    SD02-SB   Peak2-W    27.20823
## 174    SD03-NB   Peak2-W    36.66709
## 175    SD03-SB   Peak2-W    38.43125
## 176    SD04-EB   Peak2-W    33.85813
## 177    SD04-WB   Peak2-W    33.99375
## 178    SD05-EB   Peak2-W    34.44313
## 179    SD05-WB   Peak2-W    34.59750
## 180    SD06-EB   Peak2-W    33.44557
## 181    SD06-WB   Peak2-W    34.75500
## 182    SD07-NB   Peak2-W    35.96397
## 183    SD01-NB Peak2-Wkn    24.70641
## 184    SD01-SB Peak2-Wkn    21.97975
## 185    SD02-NB Peak2-Wkn    25.33375
## 186    SD02-SB Peak2-Wkn    25.58649
## 187    SD03-NB Peak2-Wkn    36.97595
## 188    SD03-SB Peak2-Wkn    37.61000
## 189    SD04-EB Peak2-Wkn    35.14557
## 190    SD04-WB Peak2-Wkn    34.33375
## 191    SD05-EB Peak2-Wkn    34.71899
## 192    SD05-WB Peak2-Wkn    35.42000
## 193    SD06-EB Peak2-Wkn    33.26250
## 194    SD06-WB Peak2-Wkn    35.10750
## 195    SD07-NB Peak2-Wkn    34.86613
## 196    SD01-NB   Peak3-F    24.39375
## 197    SD01-SB   Peak3-F    21.25937
## 198    SD02-NB   Peak3-F    24.73125
## 199    SD02-SB   Peak3-F    25.65312
## 200    SD03-NB   Peak3-F    36.75312
## 201    SD03-SB   Peak3-F    37.55938
## 202    SD04-EB   Peak3-F    34.07500
## 203    SD04-WB   Peak3-F    33.75000
## 204    SD05-EB   Peak3-F    34.30938
## 205    SD05-WB   Peak3-F    35.15313
## 206    SD06-EB   Peak3-F    33.59286
## 207    SD06-WB   Peak3-F    35.75000
## 208    SD07-NB   Peak3-F    36.30263
## 209    SD01-NB   Peak4-F    23.84783
## 210    SD01-SB   Peak4-F    20.50833
## 211    SD02-NB   Peak4-F    25.32917
## 212    SD02-SB   Peak4-F    29.48750
## 213    SD03-NB   Peak4-F    37.26522
## 214    SD03-SB   Peak4-F    40.36364
## 215    SD04-EB   Peak4-F    32.96957
## 216    SD04-WB   Peak4-F    33.70500
## 217    SD05-EB   Peak4-F    35.66522
## 218    SD05-WB   Peak4-F    36.53000
## 219    SD06-EB   Peak4-F    32.10000
## 220    SD06-WB   Peak4-F    35.47273
## 221    SD07-NB   Peak4-F    36.52222
g <- ggplot(perc2, aes(SiteNumber))
g + geom_bar(aes(fill=T_Slot), width = 0.5) + 
  theme(axis.text.x = element_text(angle=65, vjust=0.6)) + 
  labs(title="Histogram on Slots", 
       subtitle="Slots for top 2%ile Inrix Speeds") 

g <- ggplot(perc2, aes(T_Slot, InrixSpeed))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Speed vs Slot for top 2%",
       x="Time Slot",
       y="Inrix Speed")

g <- ggplot(perc2, aes(SiteNumber, InrixSpeed))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Speed vs Site for top 2%",
       x="Site",
       y="Inrix Speed")

g <- ggplot(perc2, aes(T_Slot, TubeAvSpeed))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Speed vs Slot for top 2%",
       x="Time Slot",
       y="Tube Speed")

g <- ggplot(perc2, aes(SiteNumber, Time))
g + geom_violin() + 
  labs(title="Violin plot", 
       subtitle="Tube Speed vs Site for top 2% of Inrix Speeds",
       x="Site",
       y="Time- #date correction required")

ggplot(perc2, aes(x=Time,group_by(SiteNumber) )) + 
  geom_line(aes(y=InrixSpeed)) + 
  labs(title="2% speed with time", 
       y="Inrix Speed") + facet_grid(~T_Slot)+ 
  theme(axis.text.x = element_text(angle=65, vjust=0.6))

summary(perc2)
##    SiteNumber   
##  SD03-NB: 3696  
##  SD04-WB: 3684  
##  SD05-WB: 3684  
##  SD01-SB: 3672  
##  SD04-EB: 3654  
##  SD05-EB: 3654  
##  (Other):20602  
##                                                       Site.x    
##  Camino Del Mar S/O 14th St                              :6957  
##  Del Mar Heights Rd Bet. Carmel Country Rd & Signature Pt:7338  
##  Del Mar Heights Rd Bet. Signature Pt & El Camino Real   :7338  
##  E Washington Ave W/O Jamacha Rd                         :3693  
##  Gilman Drive, south of La Jolla Village EB ramps        :2740  
##  La Jolla Blvd N/O Forward St                            :7302  
##  Torrey Pines Rd N/O Expedition Way                      :7278  
##      Direction.x          Day.x           Date                    
##  Eastbound : 9153   Friday   :5877   Min.   :2017-08-08 00:00:00  
##  Northbound:13525   Monday   :6073   1st Qu.:2017-08-12 00:00:00  
##  Southbound:10752   Saturday :6228   Median :2017-08-16 00:00:00  
##  Westbound : 9216   Sunday   :6386   Mean   :2017-08-23 23:36:48  
##                     Thursday :6033   3rd Qu.:2017-08-20 00:00:00  
##                     Tuesday  :5896   Max.   :2017-12-04 00:00:00  
##                     Wednesday:6153                                
##       Time                          T_Slot          Match1     
##  Min.   :2018-02-13 00:00:00   Peak2-W : 5610   Min.   :1.000  
##  1st Qu.:2018-02-13 05:30:00   Dip3-W  : 5303   1st Qu.:1.000  
##  Median :2018-02-13 11:45:00   Peak1-W : 4971   Median :1.000  
##  Mean   :2018-02-13 11:51:25   Dip2_W  : 4628   Mean   :1.151  
##  3rd Qu.:2018-02-13 18:15:00   Dip2-Wkn: 4226   3rd Qu.:1.000  
##  Max.   :2018-02-13 23:45:00   Dip1_W  : 3643   Max.   :2.000  
##                                (Other) :14265                  
##    InrixSpeed      IPInc_rank        Sdiff        IHisAvSpeed   
##  Min.   :12.00   Min.   :0.083   4      :  492   Min.   : 8.00  
##  1st Qu.:20.00   1st Qu.:0.302   5      :  455   1st Qu.:19.00  
##  Median :26.00   Median :0.500   2      :  443   Median :23.00  
##  Mean   :26.49   Mean   :0.515   3      :  433   Mean   :24.89  
##  3rd Qu.:33.00   3rd Qu.:0.738   3.3    :  407   3rd Qu.:30.00  
##  Max.   :56.00   Max.   :0.999   1      :  399   Max.   :52.00  
##                                  (Other):40017                  
##    IRefSpeed      ITravelTime        ICValue        IPctScore30    
##  Min.   :17.00   Min.   :0.3000   Min.   :  0.00   Min.   :  0.00  
##  1st Qu.:20.00   1st Qu.:0.5800   1st Qu.:  0.00   1st Qu.:  0.00  
##  Median :25.00   Median :0.7300   Median : 92.75   Median : 33.00  
##  Mean   :25.45   Mean   :0.9608   Mean   : 55.63   Mean   : 45.02  
##  3rd Qu.:29.00   3rd Qu.:1.3500   3rd Qu.:100.00   3rd Qu.:100.00  
##  Max.   :43.00   Max.   :2.6000   Max.   :100.00   Max.   :100.00  
##                                                                    
##   IPctScore20      IPctScore10          Match2         I2Speed     
##  Min.   :  0.00   Min.   :0.00000   Min.   :2.000   Min.   : 6.00  
##  1st Qu.:  0.00   1st Qu.:0.00000   1st Qu.:2.000   1st Qu.:19.00  
##  Median : 67.00   Median :0.00000   Median :2.000   Median :25.00  
##  Mean   : 54.93   Mean   :0.04995   Mean   :2.151   Mean   :26.15  
##  3rd Qu.:100.00   3rd Qu.:0.00000   3rd Qu.:2.000   3rd Qu.:33.00  
##  Max.   :100.00   Max.   :1.00000   Max.   :3.000   Max.   :57.00  
##                                                                    
##   I2HisAvSpeed     I2RefSpeed     I2TravelTime       I2CValue     
##  Min.   : 8.00   Min.   :17.00   Min.   :0.3000   Min.   :  0.00  
##  1st Qu.:19.00   1st Qu.:20.00   1st Qu.:0.5800   1st Qu.:  0.00  
##  Median :23.00   Median :25.00   Median :0.7500   Median : 91.53  
##  Mean   :24.78   Mean   :25.45   Mean   :0.9849   Mean   : 55.81  
##  3rd Qu.:30.00   3rd Qu.:29.00   3rd Qu.:1.3500   3rd Qu.:100.00  
##  Max.   :52.00   Max.   :43.00   Max.   :5.5700   Max.   :100.00  
##                                                                   
##   I2PctScore30     I2PctScore20     I2PctScore10       Sunrise     
##  Min.   :  0.00   Min.   :  0.00   Min.   :0.0000   6:15 AM: 5463  
##  1st Qu.:  0.00   1st Qu.:  0.00   1st Qu.:0.0000   6:11 AM: 5271  
##  Median : 40.00   Median : 60.00   Median :0.0000   6:13 AM: 5169  
##  Mean   : 45.67   Mean   : 54.29   Mean   :0.0434   6:10 AM: 5118  
##  3rd Qu.:100.00   3rd Qu.:100.00   3rd Qu.:0.0000   6:16 AM: 2640  
##  Max.   :100.00   Max.   :100.00   Max.   :1.0000   6:08 AM: 2595  
##                                                     (Other):16390  
##      Sunset        Sunrise.1         Sunset.1          Time.1      
##  7:32 PM: 5169   Min.   :0.2549   Min.   :0.2847   Min.   :0.0000  
##  7:27 PM: 2760   1st Qu.:0.2569   1st Qu.:0.7889   1st Qu.:0.2292  
##  7:35 PM: 2733   Median :0.2590   Median :0.8139   Median :0.4896  
##  7:28 PM: 2703   Mean   :0.2602   Mean   :0.7340   Mean   :0.4940  
##  7:36 PM: 2658   3rd Qu.:0.2604   3rd Qu.:0.8167   3rd Qu.:0.7604  
##  7:26 PM: 2640   Max.   :0.2743   Max.   :0.8194   Max.   :0.9896  
##  (Other):23983                                                     
##   DayNight         X..15            X15...19          X20...24     
##  dawn : 1933   Min.   :  0.000   Min.   :  0.000   Min.   :  0.00  
##  day  :17243   1st Qu.:  0.000   1st Qu.:  0.000   1st Qu.:  1.00  
##  dusk : 1796   Median :  0.000   Median :  1.000   Median :  4.00  
##  night:21674   Mean   :  6.398   Mean   :  9.675   Mean   : 15.32  
##                3rd Qu.:  3.000   3rd Qu.:  8.000   3rd Qu.: 24.00  
##                Max.   :179.000   Max.   :115.000   Max.   :134.00  
##                                                                    
##     X25...29         X30...34         X35...39         X40...44     
##  Min.   :  0.00   Min.   :  0.00   Min.   :  0.00   Min.   : 0.000  
##  1st Qu.:  2.00   1st Qu.:  2.00   1st Qu.:  0.00   1st Qu.: 0.000  
##  Median :  8.00   Median :  9.00   Median :  6.00   Median : 3.000  
##  Mean   : 21.24   Mean   : 21.65   Mean   : 16.02   Mean   : 7.894  
##  3rd Qu.: 34.00   3rd Qu.: 36.00   3rd Qu.: 27.00   3rd Qu.:12.000  
##  Max.   :180.00   Max.   :156.00   Max.   :140.00   Max.   :79.000  
##                                                                     
##     X45...49         X50...54          X55...59          X60...64      
##  Min.   : 0.000   Min.   : 0.0000   Min.   :0.00000   Min.   :0.00000  
##  1st Qu.: 0.000   1st Qu.: 0.0000   1st Qu.:0.00000   1st Qu.:0.00000  
##  Median : 1.000   Median : 0.0000   Median :0.00000   Median :0.00000  
##  Mean   : 2.422   Mean   : 0.5094   Mean   :0.09509   Mean   :0.02296  
##  3rd Qu.: 3.000   3rd Qu.: 1.0000   3rd Qu.:0.00000   3rd Qu.:0.00000  
##  Max.   :38.000   Max.   :13.0000   Max.   :4.00000   Max.   :3.00000  
##                                                                        
##     X65...69            X70..          X15MinVehVol     VVolPerLn    
##  Min.   :0.000000   Min.   :0.00000   Min.   :  0.0   Min.   :  0.0  
##  1st Qu.:0.000000   1st Qu.:0.00000   1st Qu.: 18.0   1st Qu.: 10.0  
##  Median :0.000000   Median :0.00000   Median : 83.0   Median : 42.0  
##  Mean   :0.009567   Mean   :0.01177   Mean   :101.3   Mean   : 49.3  
##  3rd Qu.:0.000000   3rd Qu.:0.00000   3rd Qu.:158.0   3rd Qu.: 76.0  
##  Max.   :2.000000   Max.   :3.00000   Max.   :561.0   Max.   :255.0  
##                                                                      
##   TubeAvSpeed    LOS_tube  LOS_Inrix     MeanSq           StdDev      
##  Min.   :10.00   A: 4029   A: 1693   Min.   :   0.0   Min.   : 0.000  
##  1st Qu.:24.50   B:21467   B:13734   1st Qu.: 628.6   1st Qu.: 4.800  
##  Median :31.70   C:16388   C:19524   Median :1040.7   Median : 5.700  
##  Mean   :30.03   D:  743   D: 6009   Mean   : 983.4   Mean   : 5.611  
##  3rd Qu.:35.40   E:   19   E: 1485   3rd Qu.:1290.5   3rd Qu.: 6.500  
##  Max.   :62.00             F:  201   Max.   :3844.0   Max.   :19.600  
##  NA's   :244                         NA's   :208      NA's   :208     
##     TimeDec                             BikeDate    
##  Min.   :   0.0                             : 1186  
##  1st Qu.: 185.5   Fri, Aug 11, 2017 01:00 AM:   10  
##  Median : 432.0   Fri, Aug 11, 2017 01:15 AM:   10  
##  Mean   : 451.7   Fri, Aug 11, 2017 01:30 AM:   10  
##  3rd Qu.: 712.0   Fri, Aug 11, 2017 01:45 AM:   10  
##  Max.   :1007.8   Fri, Aug 11, 2017 03:00 AM:   10  
##                   (Other)                   :41410  
##                BikeDateFormat    BikeVolume        YearBike   
##                       : 1186   Min.   : 0.000   Min.   :2015  
##   Aug 8, 2017 01:00 AM:   10   1st Qu.: 0.000   1st Qu.:2015  
##   Aug 8, 2017 01:00 PM:   10   Median : 0.000   Median :2016  
##   Aug 8, 2017 01:15 AM:   10   Mean   : 0.592   Mean   :2016  
##   Aug 8, 2017 01:15 PM:   10   3rd Qu.: 0.000   3rd Qu.:2017  
##   Aug 8, 2017 01:30 AM:   10   Max.   :50.000   Max.   :2017  
##  (Other)              :41410   NA's   :5492                   
##     Priority                        InfluenceType.x   InfluenceLat  
##  Min.   :1.000   Non-signalized Intersection:10018   Min.   :32.79  
##  1st Qu.:2.000   Pedestrian Crossing        : 6957   1st Qu.:32.81  
##  Median :3.000   Roundabout                 : 7302   Median :32.95  
##  Mean   :3.532   Signalized intersection    :18369   Mean   :32.89  
##  3rd Qu.:3.000                                       3rd Qu.:32.95  
##  Max.   :9.000                                       Max.   :32.96  
##                                                                     
##  InfluenceLong    InfluenceDist.ft InfluenceDist_BC.x       AccelDecel.x  
##  Min.   :-117.3   Min.   : 60.0    Min.   :  0.0      Acceleartion: 3630  
##  1st Qu.:-117.3   1st Qu.:170.0    1st Qu.:110.0      Acceleration:19195  
##  Median :-117.3   Median :300.0    Median :240.0      Deceleration:19821  
##  Mean   :-117.2   Mean   :287.1    Mean   :227.1                          
##  3rd Qu.:-117.2   3rd Qu.:390.0    3rd Qu.:330.0                          
##  Max.   :-116.9   Max.   :630.0    Max.   :570.0                          
##                                                                           
##             BegSegStreet     BegSegLat       BegSegLong    
##  Carmel country rd:11023   Min.   :32.79   Min.   :-117.3  
##  13th St          : 6957   1st Qu.:32.80   1st Qu.:-117.3  
##  Girard Ave       : 3696   Median :32.96   Median :-117.3  
##  Jamacha rd       : 3693   Mean   :32.89   Mean   :-117.2  
##  Bird Rock Ave    : 3672   3rd Qu.:32.96   3rd Qu.:-117.2  
##                   : 3653   Max.   :32.96   Max.   :-116.9  
##  (Other)          : 9952                                   
##          EndSegStreet     EndSegLat       EndSegLong         SegLen    
##  El Camino Real:11023   Min.   :32.79   Min.   :-117.3   Min.   :1588  
##  15th St       : 6957   1st Qu.:32.81   1st Qu.:-117.3   1st Qu.:5200  
##  Prospect PI   : 3696   Median :32.95   Median :-117.2   Median :5280  
##  Dorothy St    : 3693   Mean   :32.89   Mean   :-117.2   Mean   :5034  
##  Forward St    : 3672   3rd Qu.:32.95   3rd Qu.:-117.2   3rd Qu.:5280  
##                : 3653   Max.   :32.96   Max.   :-116.9   Max.   :9018  
##  (Other)       : 9952                                                  
##      PSL.x         PSLSeg      PSLConSeg   SchZone     OW.TW     
##  Min.   :25.00   25   : 7302   No :14235   No :17841   TW:42646  
##  1st Qu.:25.00   25-40: 6957   Yes:28411   No : 2740             
##  Median :35.00   35   : 7278               Yes:22065             
##  Mean   :36.61   45   :21109                                     
##  3rd Qu.:45.00                                                   
##  Max.   :45.00                                                   
##                                                                  
##      ThruLn       LaneWidth.x     LnWidth_BC.x     SigInter.x   
##  Min.   :2.000   Min.   : 9.00   Min.   :0.000   Min.   :0.000  
##  1st Qu.:4.000   1st Qu.:10.00   1st Qu.:1.000   1st Qu.:1.000  
##  Median :4.000   Median :10.00   Median :1.000   Median :5.000  
##  Mean   :4.346   Mean   :10.47   Mean   :1.473   Mean   :3.244  
##  3rd Qu.:6.000   3rd Qu.:11.00   3rd Qu.:2.000   3rd Qu.:5.000  
##  Max.   :6.000   Max.   :12.00   Max.   :3.000   Max.   :5.000  
##                                                                 
##   DrvUsigSame     DrvUsigSame_BC.x   DrvUsigOpp     DrvUsigOpp_BC.x 
##  Min.   : 2.000   Min.   : 0.000   Min.   : 2.000   Min.   : 0.000  
##  1st Qu.: 2.000   1st Qu.: 0.000   1st Qu.: 3.000   1st Qu.: 1.000  
##  Median : 8.000   Median : 6.000   Median : 7.000   Median : 5.000  
##  Mean   : 9.251   Mean   : 7.251   Mean   : 9.417   Mean   : 7.417  
##  3rd Qu.: 8.000   3rd Qu.: 6.000   3rd Qu.:19.000   3rd Qu.:17.000  
##  Max.   :33.000   Max.   :31.000   Max.   :33.000   Max.   :31.000  
##                                                                     
##    Median.x       MedWidth.x     Park.x       ParkWidth.x       Curb      
##  None  : 3696   Min.   : 0.000   No :24691   Min.   : 0.000   curb:42646  
##  Raised:32517   1st Qu.: 4.000   Yes:17955   1st Qu.: 0.000               
##  Twltl : 6433   Median : 4.000               Median : 0.000               
##                 Mean   : 6.426               Mean   : 3.798               
##                 3rd Qu.:10.000               3rd Qu.: 8.000               
##                 Max.   :13.000               Max.   :14.000               
##                                                                           
##     ShoWidth          Sidewalk      PedAutoSep.x    Bike.x     
##  Min.   :4.000   two sides:42646   Min.   : 0.000   No : 3696  
##  1st Qu.:5.000                     1st Qu.: 5.000   Yes:38950  
##  Median :5.000                     Median : 5.000              
##  Mean   :4.762                     Mean   : 6.592              
##  3rd Qu.:5.000                     3rd Qu.: 9.000              
##  Max.   :5.000                     Max.   :13.000              
##                                                                
##   BikeWidth.x     DriveSurface  DriveSurface_BC BikeAutoSep.x
##  Min.   :0.000   Min.   :20.0   Min.   : 0.0    Min.   :0    
##  1st Qu.:5.000   1st Qu.:22.0   1st Qu.: 2.0    1st Qu.:0    
##  Median :5.000   Median :30.0   Median :10.0    Median :0    
##  Mean   :4.416   Mean   :32.2   Mean   :12.2    Mean   :0    
##  3rd Qu.:5.000   3rd Qu.:43.0   3rd Qu.:23.0    3rd Qu.:0    
##  Max.   :5.000   Max.   :43.0   Max.   :23.0    Max.   :0    
##                                                              
##      Horz.x         Vert         Classification  BusStop.x   PedCross.x 
##  HC     :13390   level:42646            :    1      :    1      :    1  
##  tangent:29256                 collector:42645   No :37218   No :28386  
##                                                  Yes: 5427   Yes:14259  
##                                                                         
##                                                                         
##                                                                         
##                                                                         
##           Dev       
##             :    1  
##  Commercial :17955  
##  Residential:24690  
##                     
##                     
##                     
##                     
##                                                       Site.y    
##  Del Mar Heights Rd Bet. Carmel Country Rd & Signature Pt:7338  
##  Del Mar Heights Rd Bet. Signature Pt & El Camino Real   :7338  
##  La Jolla Blvd N/O Forward St                            :7302  
##  Torrey Pines Rd N/O Expedition Way                      :7278  
##  Camino Del Mar S/O 14th St                              :6957  
##  E Washington Ave W/O Jamacha Rd                         :3693  
##  (Other)                                                 :2740  
##      Direction.y        Day.y                      InfluenceType.y 
##            :    1          :    1                          :    1  
##  Eastbound : 9153   Tuesday:42645   Pedestrian Crossing    : 6957  
##  Northbound:13638                   Roundabout             : 7302  
##  Southbound:10638                   Signalized intersection:28386  
##  Westbound : 9216                                                  
##                                                                    
##                                                                    
##  InfluenceDist.ft. InfluenceDist_BC.y       AccelDecel.y       PSL.y      
##  Min.   : 60       Min.   :  0                    :    1   Min.   :25.00  
##  1st Qu.:220       1st Qu.:160        Acceleration:22824   1st Qu.:25.00  
##  Median :300       Median :240        Deceleration:19821   Median :45.00  
##  Mean   :325       Mean   :265                             Mean   :38.31  
##  3rd Qu.:390       3rd Qu.:330                             3rd Qu.:45.00  
##  Max.   :800       Max.   :740                             Max.   :45.00  
##  NA's   :1         NA's   :1                               NA's   :1      
##     ThruLns       LaneWidth.y     LnWidth_BC.y      SigInter.y   
##  Min.   :2.000   Min.   :11.00   Min.   :0.0000   Min.   :1.000  
##  1st Qu.:4.000   1st Qu.:11.00   1st Qu.:0.0000   1st Qu.:3.000  
##  Median :4.000   Median :11.00   Median :0.0000   Median :5.000  
##  Mean   :4.346   Mean   :11.41   Mean   :0.4056   Mean   :3.843  
##  3rd Qu.:6.000   3rd Qu.:11.00   3rd Qu.:0.0000   3rd Qu.:5.000  
##  Max.   :6.000   Max.   :13.00   Max.   :2.0000   Max.   :5.000  
##  NA's   :1       NA's   :1       NA's   :1        NA's   :1      
##   DrvUsig.same    DrvUsigSame_BC.y  DrvUsig.opp    DrvUsigOpp_BC.y
##  Min.   : 1.000   Min.   : 0.000   Min.   : 1.00   Min.   : 0.00  
##  1st Qu.: 2.000   1st Qu.: 1.000   1st Qu.: 2.00   1st Qu.: 1.00  
##  Median : 3.000   Median : 2.000   Median : 3.00   Median : 2.00  
##  Mean   : 7.528   Mean   : 6.528   Mean   : 7.04   Mean   : 6.04  
##  3rd Qu.: 8.000   3rd Qu.: 7.000   3rd Qu.: 7.00   3rd Qu.: 6.00  
##  Max.   :33.000   Max.   :32.000   Max.   :33.00   Max.   :32.00  
##  NA's   :1        NA's   :1        NA's   :1       NA's   :1      
##    Median.y       MedWidth.y     Park.y       ParkWidth.y    
##        :    1   Min.   : 6.000      :    1   Min.   : 0.000  
##  Raised:38952   1st Qu.: 6.000   No : 7278   1st Qu.: 0.000  
##  TWLTL : 3693   Median : 6.000   No :21108   Median : 0.000  
##                 Mean   : 9.466   Yes:14259   Mean   : 3.192  
##                 3rd Qu.:10.000               3rd Qu.: 8.000  
##                 Max.   :20.000               Max.   :14.000  
##                 NA's   :1                    NA's   :1       
##   PedAutoSep.y    Bike.y       BikeWidth.y    DrvSurfPerDir  
##  Min.   : 4.000      :    1   Min.   :0.000   Min.   :24.00  
##  1st Qu.: 4.000   No : 3672   1st Qu.:4.000   1st Qu.:26.00  
##  Median : 5.000   Yes:38973   Median :4.000   Median :35.00  
##  Mean   : 7.396               Mean   :4.204   Mean   :32.11  
##  3rd Qu.:13.000               3rd Qu.:5.000   3rd Qu.:37.00  
##  Max.   :14.000               Max.   :6.000   Max.   :38.00  
##  NA's   :1                    NA's   :1       NA's   :1      
##  DrvSurPerDir_BC  BikeAutoSep.y     Horz.y      BusStop.y   PedCross.y 
##  Min.   : 0.000   Min.   :0            :    1      :    1      :    1  
##  1st Qu.: 2.000   1st Qu.:0     HC     :17928   No :21978   No :28386  
##  Median :11.000   Median :0     tangent:24717   Yes:20667   Yes:14259  
##  Mean   : 8.109   Mean   :0                                            
##  3rd Qu.:13.000   3rd Qu.:0                                            
##  Max.   :14.000   Max.   :0                                            
##  NA's   :1        NA's   :1
ggplot(perc20, aes(x=Time)) + 
  geom_line(aes(y=InrixSpeed, col=SiteNumber)) + facet_grid(~Day.x)+ 
  theme(axis.text.x = element_text(angle=90, vjust=0.6))+ 
  labs(title="Top 20% speeds dsitribution", 
       y="Inrix Speed") 

ggplot(perc2, aes(x=Time)) + 
  geom_line(aes(y=InrixSpeed, col=SiteNumber)) + facet_grid(~Day.x)+ 
  theme(axis.text.x = element_text(angle=90, vjust=0.6))+ 
  labs(title="Top 2% speeds dsitribution", 
       y="Inrix Speed")