About

R can be used to make basic visual analytics, which can be helpful in understanding the data holistically. Additionally, R can help find correlations between variables and create scatter plots.

In this lab we will delve deeper into the marketing data set with R visual analytics and use Tableau to visualize the credit risk data set.

Setup

Make sure to download the folder titled ‘bsad_lab04’ zip folder and extract the folder to unzip it. Next, we must set this folder as the working directory. The way to do this is to open R Studio, go to ‘Session’, scroll down to ‘Set Working Directory’, and click ‘To Source File Location’. Now, follow the directions to complete the lab.


Task 1

First, read in the creditrisk.csv file and make sure all the columns are captured and check the first couple of rows of the dataset “head(mydata)”

First, we have to enter all of the data of the states purchase orders. Then we have to extract the variables we want to use so we can utilize the data.

mydata = read.csv(file="data/states_purchase_orders.csv")
mydata
vendorstate = mydata$VENDOR.STATE
vendorstate
   [1] LA LA LA LA LA LA LA LA LA LA LA LA LA CA LA
  [16] LA LA TX LA NJ LA LA LA LA LA VA VA VA VA PA
  [31] PA PA ,  LA LA LA LA LA DC DC DC DC DC LA LA
  [46] LA LA LA LA LA LA TX TX LA LA LA LA LA LA LA
  [61] LA LA LA LA LA NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ
  [76] NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ
  [91] NJ NJ NJ NJ LA GA LA LA LA LA WI CA CA CA CA
 [106] CA LA LA LA LA NY NY LA LA LA LA LA LA LA LA
 [121] LA LA LA LA LA LA LA IL MI LA LA LA LA TX TX
 [136] TX TX TX LA LA LA LA TX LA LA LA LA LA LA LA
 [151] IL LA LA NJ NJ NJ NJ NJ NJ NJ NJ NJ NJ LA LA
 [166] LA LA LA LA LA LA LA IA IA IA IA IA LA LA LA
 [181] LA LA LA LA LA LA LA LA LA LA LA LA LA MS LA
 [196] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [211] TX TX LA OH OH OH OH LA LA CA CA CA CA IA IA
 [226] IA IA IA IA IA IA IA IA IA IA IA IA IA IA IA
 [241] IA IA LA IA IA IA IA IA IA IA GA LA LA LA GA
 [256] LA LA LA LA LA LA LA LA LA LA LA LA NJ NJ LA
 [271] CA LA LA LA LA LA LA LA LA LA TX LA LA LA LA
 [286] IA IA IA IA IA IA IA IA IA IA IA IA LA LA LA
 [301] LA TX TX TX CA CA DC TX TX TX TX TX TX LA TX
 [316] TX TX TX TX TX TX LA LA LA LA LA LA LA LA LA
 [331] LA LA LA LA LA TN TN KS TX TX TX TX FL TX TX
 [346] TX TX TX TX CO IL IL TX TX TX TX TX TX TX TX
 [361] TX TX LA LA LA LA LA LA LA LA LA OH OH OH OH
 [376] LA LA LA LA LA LA NC LA LA LA WI WI WI WI WI
 [391] WI WI WI WI WI WI WI WI WI WI WI WI WI WI WI
 [406] WI WI WI LA LA LA LA GA GA GA GA GA GA LA LA
 [421] LA LA LA LA LA LA RI RI RI RI RI RI RI RI RI
 [436] RI RI RI RI LA LA LA LA LA LA LA LA LA LA LA
 [451] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [466] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [481] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [496] LA LA LA LA LA LA LA LA LA MO LA LA IA IA LA
 [511] LA LA WA LA CA LA LA LA LA LA LA TX TX LA LA
 [526] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [541] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [556] LA CA CA CA CA CA CA CA CA CA CA CA CA CA CA
 [571] CA CA CA CA CA CA CA CA CA CA CA CA CA CA CA
 [586] CA CA CA CA CA CA CA CA CA CA CA CA CA CA CA
 [601] CA CA CA CA CA CA CA CA CA CA CA CA CA CA CA
 [616] CA CA LA CA CA CA CA LA FL LA NV LA OH LA LA
 [631] MA MA MA TX TX LA LA TX LA LA LA LA LA LA LA
 [646] LA LA LA LA LA LA LA LA LA LA LA LA LA CA LA
 [661] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [676] LA CA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [691] TX NJ LA LA LA LA TX TX TX TX TX TX TX TX LA
 [706] LA LA FL FL LA LA TX TX TX TX TX TX TX CA CA
 [721] CA CA CA CA CA CA CA CA CA CA CA LA LA LA , 
 [736] ,  ,  NJ LA LA LA LA LA LA LA LA LA LA LA LA
 [751] GA GA GA PA PA PA PA PA CA CA CA CA CA TX TX
 [766] LA LA LA LA LA LA GA GA LA KY LA LA LA LA LA
 [781] LA LA LA LA LA LA MO LA LA LA LA LA LA LA LA
 [796] LA LA LA CA LA LA LA LA CT LA LA LA LA LA LA
 [811] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [826] NY NY FL FL FL LA LA LA LA LA LA LA LA VA VA
 [841] VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA
 [856] VA VA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [871] LA LA LA LA LA LA LA LA LA LA LA OH LA LA LA
 [886] LA LA NJ NJ LA LA LA LA LA LA LA LA LA LA LA
 [901] LA LA AZ LA LA LA LA FL LA LA LA LA LA LA LA
 [916] LA LA LA LA LA MN LA LA LA LA LA LA LA LA LA
 [931] LA LA LA LA LA LA LA LA LA LA LA LA VA VA VA
 [946] VA VA CA CA CA CA CA TX TX TX TX LA LA LA LA
 [961] LA LA LA LA LA LA LA LA LA LA LA LA LA LA LA
 [976] DC LA NJ NJ NJ NJ NJ NJ NJ NJ LA TX LA LA LA
 [991] LA LA LA PA PA LA LA CA CA LA
 [ reached getOption("max.print") -- omitted 31452 entries ]
49 Levels:  , AL AR AZ CA CD CO CT DC FL GA ... WV
departmentname = mydata$DEPARTMENT.NAME
departmentname
   [1] DEPARTMENT OF PUBLIC WORKS                 
   [2] DEPARTMENT OF PUBLIC WORKS                 
   [3] ROAD REHABILITATION PROGRAM                
   [4] COMMUNITY DEVELOPMENT PROGRAMS             
   [5] ROAD REHABILITATION PROGRAM                
   [6] CONSTRUCTION PROJECTS                      
   [7] CONSTRUCTION PROJECTS                      
   [8] CONSTRUCTION PROJECTS                      
   [9] CONSTRUCTION PROJECTS                      
  [10] POLICE DEPARTMENT                          
  [11] POLICE DEPARTMENT                          
  [12] POLICE DEPARTMENT                          
  [13] POLICE DEPARTMENT                          
  [14] PARISH ATTORNEY                            
  [15] DEPT OF FLEET MANAGEMENT                   
  [16] ROAD REHABILITATION PROGRAM                
  [17] DEPARTMENT OF PUBLIC WORKS                 
  [18] LIBRARY BOARD OF CONTROL                   
  [19] CONSTRUCTION PROJECTS                      
  [20] DEPARTMENT OF PUBLIC WORKS                 
  [21] LIBRARY BOARD OF CONTROL                   
  [22] OFC. OF HOMELAND SECURITY & EMERGENCY PREPA
  [23] DEPT OF FLEET MANAGEMENT                   
  [24] DEPT OF FLEET MANAGEMENT                   
  [25] DEPT OF FLEET MANAGEMENT                   
  [26] POLICE DEPARTMENT                          
  [27] POLICE DEPARTMENT                          
  [28] POLICE DEPARTMENT                          
  [29] POLICE DEPARTMENT                          
  [30] DEPARTMENT OF PUBLIC WORKS                 
  [31] DEPARTMENT OF PUBLIC WORKS                 
  [32] DEPARTMENT OF PUBLIC WORKS                 
  [33] DEPARTMENT OF PUBLIC WORKS                 
  [34] DEPT OF FLEET MANAGEMENT                   
  [35] DEPT OF FLEET MANAGEMENT                   
  [36] DEPT OF FLEET MANAGEMENT                   
  [37] COMMUNITY DEVELOPMENT PROGRAMS             
  [38] COMMUNITY DEVELOPMENT PROGRAMS             
  [39] EMERGENCY MEDICAL SERVICES                 
  [40] EMERGENCY MEDICAL SERVICES                 
  [41] EMERGENCY MEDICAL SERVICES                 
  [42] EMERGENCY MEDICAL SERVICES                 
  [43] EMERGENCY MEDICAL SERVICES                 
  [44] CITY CONSTABLE                             
  [45] CITY CONSTABLE                             
  [46] CITY CONSTABLE                             
  [47] CITY CONSTABLE                             
  [48] POLICE DEPARTMENT                          
  [49] POLICE DEPARTMENT                          
  [50] POLICE DEPARTMENT                          
  [51] POLICE DEPARTMENT                          
  [52] DEPT OF TRANSPORTATION AND DRAINAGE        
  [53] DEPT OF TRANSPORTATION AND DRAINAGE        
  [54] POLICE DEPARTMENT                          
  [55] POLICE DEPARTMENT                          
  [56] POLICE DEPARTMENT                          
  [57] POLICE DEPARTMENT                          
  [58] POLICE DEPARTMENT                          
  [59] POLICE DEPARTMENT                          
  [60] POLICE DEPARTMENT                          
  [61] POLICE DEPARTMENT                          
  [62] POLICE DEPARTMENT                          
  [63] POLICE DEPARTMENT                          
  [64] POLICE DEPARTMENT                          
  [65] POLICE DEPARTMENT                          
  [66] HUMAN RESOURCES                            
  [67] HUMAN RESOURCES                            
  [68] HUMAN RESOURCES                            
  [69] HUMAN RESOURCES                            
  [70] HUMAN RESOURCES                            
  [71] HUMAN RESOURCES                            
  [72] HUMAN RESOURCES                            
  [73] HUMAN RESOURCES                            
  [74] HUMAN RESOURCES                            
  [75] HUMAN RESOURCES                            
  [76] HUMAN RESOURCES                            
  [77] HUMAN RESOURCES                            
  [78] HUMAN RESOURCES                            
  [79] HUMAN RESOURCES                            
  [80] HUMAN RESOURCES                            
  [81] HUMAN RESOURCES                            
  [82] HUMAN RESOURCES                            
  [83] HUMAN RESOURCES                            
  [84] HUMAN RESOURCES                            
  [85] HUMAN RESOURCES                            
  [86] HUMAN RESOURCES                            
  [87] HUMAN RESOURCES                            
  [88] HUMAN RESOURCES                            
  [89] HUMAN RESOURCES                            
  [90] HUMAN RESOURCES                            
  [91] HUMAN RESOURCES                            
  [92] HUMAN RESOURCES                            
  [93] HUMAN RESOURCES                            
  [94] HUMAN RESOURCES                            
  [95] ROAD REHABILITATION PROGRAM                
  [96] GREATER BATON ROUGE AIRPORT DISTRICT       
  [97] POLICE DEPARTMENT                          
  [98] HUMAN DEVELOPMENT AND SERVICES             
  [99] HUMAN DEVELOPMENT AND SERVICES             
 [100] HUMAN DEVELOPMENT AND SERVICES             
 [101] CONSTRUCTION PROJECTS                      
 [102] DEPARTMENT OF PUBLIC WORKS                 
 [103] DEPARTMENT OF PUBLIC WORKS                 
 [104] DEPARTMENT OF PUBLIC WORKS                 
 [105] DEPARTMENT OF PUBLIC WORKS                 
 [106] DEPARTMENT OF PUBLIC WORKS                 
 [107] POLICE DEPARTMENT                          
 [108] DEPT OF MAINTENANCE                        
 [109] CONSTRUCTION PROJECTS                      
 [110] ROAD REHABILITATION PROGRAM                
 [111] HUMAN DEVELOPMENT AND SERVICES             
 [112] HUMAN DEVELOPMENT AND SERVICES             
 [113] DEPT OF MAINTENANCE                        
 [114] POLICE DEPARTMENT                          
 [115] POLICE DEPARTMENT                          
 [116] POLICE DEPARTMENT                          
 [117] POLICE DEPARTMENT                          
 [118] POLICE DEPARTMENT                          
 [119] POLICE DEPARTMENT                          
 [120] POLICE DEPARTMENT                          
 [121] POLICE DEPARTMENT                          
 [122] POLICE DEPARTMENT                          
 [123] POLICE DEPARTMENT                          
 [124] POLICE DEPARTMENT                          
 [125] POLICE DEPARTMENT                          
 [126] POLICE DEPARTMENT                          
 [127] POLICE DEPARTMENT                          
 [128] POLICE DEPARTMENT                          
 [129] INFORMATION SERVICES                       
 [130] INFORMATION SERVICES                       
 [131] INFORMATION SERVICES                       
 [132] INFORMATION SERVICES                       
 [133] DEPT OF TRANSPORTATION AND DRAINAGE        
 [134] FINANCE DEPARTMENT                         
 [135] FINANCE DEPARTMENT                         
 [136] FINANCE DEPARTMENT                         
 [137] FINANCE DEPARTMENT                         
 [138] FINANCE DEPARTMENT                         
 [139] COUNCIL ADMINISTRATOR                      
 [140] FINANCE DEPARTMENT                         
 [141] DEPT OF MAINTENANCE                        
 [142] DEPT OF MAINTENANCE                        
 [143] FINANCE DEPARTMENT                         
 [144] DEPT OF MAINTENANCE                        
 [145] DEPT OF MAINTENANCE                        
 [146] DEPARTMENT OF PUBLIC WORKS                 
 [147] DEPT OF FLEET MANAGEMENT                   
 [148] DEPT OF FLEET MANAGEMENT                   
 [149] OFFICE OF THE MAYOR-PRESIDENT              
 [150] POLICE DEPARTMENT                          
 [151] GREATER BATON ROUGE AIRPORT DISTRICT       
 [152] HUMAN DEVELOPMENT AND SERVICES             
 [153] HUMAN DEVELOPMENT AND SERVICES             
 [154] POLICE DEPARTMENT                          
 [155] POLICE DEPARTMENT                          
 [156] POLICE DEPARTMENT                          
 [157] POLICE DEPARTMENT                          
 [158] POLICE DEPARTMENT                          
 [159] POLICE DEPARTMENT                          
 [160] POLICE DEPARTMENT                          
 [161] POLICE DEPARTMENT                          
 [162] POLICE DEPARTMENT                          
 [163] POLICE DEPARTMENT                          
 [164] LIBRARY BOARD OF CONTROL                   
 [165] LIBRARY BOARD OF CONTROL                   
 [166] LIBRARY BOARD OF CONTROL                   
 [167] DEPARTMENT OF PUBLIC WORKS                 
 [168] DEPARTMENT OF PUBLIC WORKS                 
 [169] DEPARTMENT OF PUBLIC WORKS                 
 [170] FINANCE DEPARTMENT                         
 [171] FINANCE DEPARTMENT                         
 [172] FINANCE DEPARTMENT                         
 [173] DEPT OF MAINTENANCE                        
 [174] DEPT OF MAINTENANCE                        
 [175] DEPT OF MAINTENANCE                        
 [176] DEPT OF MAINTENANCE                        
 [177] DEPT OF MAINTENANCE                        
 [178] DISTRICT COURT                             
 [179] POLICE DEPARTMENT                          
 [180] LIBRARY BOARD OF CONTROL                   
 [181] FIRE DEPARTMENT                            
 [182] LIBRARY BOARD OF CONTROL                   
 [183] LIBRARY BOARD OF CONTROL                   
 [184] DEPT OF BUILDINGS AND GROUNDS              
 [185] DEPT OF FLEET MANAGEMENT                   
 [186] DEPT OF FLEET MANAGEMENT                   
 [187] DEPT OF FLEET MANAGEMENT                   
 [188] DEPARTMENT OF PUBLIC WORKS                 
 [189] DEPARTMENT OF PUBLIC WORKS                 
 [190] COMMUNITY DEVELOPMENT PROGRAMS             
 [191] OFFICE OF THE MAYOR-PRESIDENT              
 [192] CONSTRUCTION PROJECTS                      
 [193] DEPT OF BUILDINGS AND GROUNDS              
 [194] DEPARTMENT OF PUBLIC WORKS                 
 [195] COMMUNITY DEVELOPMENT PROGRAMS             
 [196] COMMUNITY DEVELOPMENT PROGRAMS             
 [197] COMMUNITY DEVELOPMENT PROGRAMS             
 [198] EMERGENCY MEDICAL SERVICES                 
 [199] EMERGENCY MEDICAL SERVICES                 
 [200] DEPARTMENT OF PUBLIC WORKS                 
 [201] DEPARTMENT OF PUBLIC WORKS                 
 [202] DEPARTMENT OF PUBLIC WORKS                 
 [203] DEPARTMENT OF PUBLIC WORKS                 
 [204] DEPARTMENT OF PUBLIC WORKS                 
 [205] DEPARTMENT OF PUBLIC WORKS                 
 [206] DEPARTMENT OF PUBLIC WORKS                 
 [207] DEPARTMENT OF PUBLIC WORKS                 
 [208] DEPARTMENT OF PUBLIC WORKS                 
 [209] MOSQUITO & RODENT CONTROL                  
 [210] HUMAN DEVELOPMENT AND SERVICES             
 [211] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [212] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [213] HUMAN DEVELOPMENT AND SERVICES             
 [214] LIBRARY BOARD OF CONTROL                   
 [215] LIBRARY BOARD OF CONTROL                   
 [216] LIBRARY BOARD OF CONTROL                   
 [217] LIBRARY BOARD OF CONTROL                   
 [218] CONSTRUCTION PROJECTS                      
 [219] CONSTRUCTION PROJECTS                      
 [220] CITY COURT                                 
 [221] CITY COURT                                 
 [222] CITY COURT                                 
 [223] CITY COURT                                 
 [224] DEPT OF MAINTENANCE                        
 [225] DEPT OF MAINTENANCE                        
 [226] DEPT OF MAINTENANCE                        
 [227] DEPT OF MAINTENANCE                        
 [228] DEPT OF MAINTENANCE                        
 [229] DEPT OF MAINTENANCE                        
 [230] DEPT OF MAINTENANCE                        
 [231] DEPT OF MAINTENANCE                        
 [232] DEPT OF MAINTENANCE                        
 [233] DEPT OF MAINTENANCE                        
 [234] DEPT OF MAINTENANCE                        
 [235] DEPT OF MAINTENANCE                        
 [236] DEPT OF MAINTENANCE                        
 [237] DEPT OF MAINTENANCE                        
 [238] DEPT OF MAINTENANCE                        
 [239] DEPT OF MAINTENANCE                        
 [240] DEPT OF MAINTENANCE                        
 [241] DEPT OF MAINTENANCE                        
 [242] DEPT OF MAINTENANCE                        
 [243] PARISH ATTORNEY                            
 [244] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [245] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [246] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [247] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [248] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [249] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [250] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [251] LIBRARY BOARD OF CONTROL                   
 [252] DEPT OF FLEET MANAGEMENT                   
 [253] DEPT OF FLEET MANAGEMENT                   
 [254] DEPT OF FLEET MANAGEMENT                   
 [255] LIBRARY BOARD OF CONTROL                   
 [256] OFFICE OF THE MAYOR-PRESIDENT              
 [257] OFFICE OF THE MAYOR-PRESIDENT              
 [258] OFFICE OF THE MAYOR-PRESIDENT              
 [259] OFFICE OF THE MAYOR-PRESIDENT              
 [260] OFFICE OF THE MAYOR-PRESIDENT              
 [261] OFFICE OF THE MAYOR-PRESIDENT              
 [262] OFFICE OF THE MAYOR-PRESIDENT              
 [263] OFFICE OF THE MAYOR-PRESIDENT              
 [264] CONSTRUCTION PROJECTS                      
 [265] SHERIFF'S OFFICE                           
 [266] SHERIFF'S OFFICE                           
 [267] SHERIFF'S OFFICE                           
 [268] EMERGENCY MEDICAL SERVICES                 
 [269] EMERGENCY MEDICAL SERVICES                 
 [270] CONSTRUCTION PROJECTS                      
 [271] DEPARTMENT OF PUBLIC WORKS                 
 [272] POLICE DEPARTMENT                          
 [273] POLICE DEPARTMENT                          
 [274] POLICE DEPARTMENT                          
 [275] POLICE DEPARTMENT                          
 [276] POLICE DEPARTMENT                          
 [277] DEPARTMENT OF PUBLIC WORKS                 
 [278] DEPARTMENT OF PUBLIC WORKS                 
 [279] COUNCIL ADMINISTRATOR                      
 [280] LIBRARY BOARD OF CONTROL                   
 [281] EMERGENCY MEDICAL SERVICES                 
 [282] DEPT OF FLEET MANAGEMENT                   
 [283] DEPT OF FLEET MANAGEMENT                   
 [284] COUNCIL ADMINISTRATOR                      
 [285] DEPT OF MAINTENANCE                        
 [286] DEPT OF MAINTENANCE                        
 [287] DEPT OF MAINTENANCE                        
 [288] DEPT OF MAINTENANCE                        
 [289] DEPT OF MAINTENANCE                        
 [290] DEPT OF MAINTENANCE                        
 [291] DEPT OF MAINTENANCE                        
 [292] DEPT OF MAINTENANCE                        
 [293] DEPT OF MAINTENANCE                        
 [294] DEPT OF MAINTENANCE                        
 [295] DEPT OF MAINTENANCE                        
 [296] DEPT OF MAINTENANCE                        
 [297] DEPT OF MAINTENANCE                        
 [298] DEPT OF BUILDINGS AND GROUNDS              
 [299] DEPARTMENT OF PUBLIC WORKS                 
 [300] CITY COURT                                 
 [301] CITY COURT                                 
 [302] FINANCE DEPARTMENT                         
 [303] FINANCE DEPARTMENT                         
 [304] FINANCE DEPARTMENT                         
 [305] POLICE DEPARTMENT                          
 [306] POLICE DEPARTMENT                          
 [307] OFFICE OF THE MAYOR-PRESIDENT              
 [308] METROPOLITAN COUNCIL                       
 [309] METROPOLITAN COUNCIL                       
 [310] METROPOLITAN COUNCIL                       
 [311] METROPOLITAN COUNCIL                       
 [312] METROPOLITAN COUNCIL                       
 [313] METROPOLITAN COUNCIL                       
 [314] OFFICE OF THE MAYOR-PRESIDENT              
 [315] LIBRARY BOARD OF CONTROL                   
 [316] DEPT OF TRANSPORTATION AND DRAINAGE        
 [317] DEPT OF TRANSPORTATION AND DRAINAGE        
 [318] DEPT OF TRANSPORTATION AND DRAINAGE        
 [319] DEPT OF TRANSPORTATION AND DRAINAGE        
 [320] DEPARTMENT OF PUBLIC WORKS                 
 [321] DEPARTMENT OF PUBLIC WORKS                 
 [322] HUMAN DEVELOPMENT AND SERVICES             
 [323] HUMAN DEVELOPMENT AND SERVICES             
 [324] DEPARTMENT OF PUBLIC WORKS                 
 [325] DEPARTMENT OF PUBLIC WORKS                 
 [326] LIBRARY BOARD OF CONTROL                   
 [327] LIBRARY BOARD OF CONTROL                   
 [328] POLICE DEPARTMENT                          
 [329] POLICE DEPARTMENT                          
 [330] POLICE DEPARTMENT                          
 [331] POLICE DEPARTMENT                          
 [332] POLICE DEPARTMENT                          
 [333] DOWNTOWN DEVELOPMENT DISTRICT              
 [334] HUMAN DEVELOPMENT AND SERVICES             
 [335] HUMAN DEVELOPMENT AND SERVICES             
 [336] EMERGENCY MEDICAL SERVICES                 
 [337] EMERGENCY MEDICAL SERVICES                 
 [338] INFORMATION SERVICES                       
 [339] ANIMAL CONTROL CENTER                      
 [340] ANIMAL CONTROL CENTER                      
 [341] ANIMAL CONTROL CENTER                      
 [342] ANIMAL CONTROL CENTER                      
 [343] DEPARTMENT OF PUBLIC WORKS                 
 [344] HUMAN DEVELOPMENT AND SERVICES             
 [345] HUMAN DEVELOPMENT AND SERVICES             
 [346] HUMAN DEVELOPMENT AND SERVICES             
 [347] HUMAN DEVELOPMENT AND SERVICES             
 [348] HUMAN DEVELOPMENT AND SERVICES             
 [349] HUMAN DEVELOPMENT AND SERVICES             
 [350] CITY COURT                                 
 [351] INFORMATION SERVICES                       
 [352] INFORMATION SERVICES                       
 [353] POLICE DEPARTMENT                          
 [354] POLICE DEPARTMENT                          
 [355] POLICE DEPARTMENT                          
 [356] POLICE DEPARTMENT                          
 [357] POLICE DEPARTMENT                          
 [358] POLICE DEPARTMENT                          
 [359] POLICE DEPARTMENT                          
 [360] POLICE DEPARTMENT                          
 [361] POLICE DEPARTMENT                          
 [362] POLICE DEPARTMENT                          
 [363] POLICE DEPARTMENT                          
 [364] POLICE DEPARTMENT                          
 [365] DEPARTMENT OF PUBLIC WORKS                 
 [366] POLICE DEPARTMENT                          
 [367] DEPT OF MAINTENANCE                        
 [368] CONSTRUCTION PROJECTS                      
 [369] DEPARTMENT OF PUBLIC WORKS                 
 [370] HUMAN DEVELOPMENT AND SERVICES             
 [371] HUMAN DEVELOPMENT AND SERVICES             
 [372] HUMAN DEVELOPMENT AND SERVICES             
 [373] HUMAN DEVELOPMENT AND SERVICES             
 [374] HUMAN DEVELOPMENT AND SERVICES             
 [375] HUMAN DEVELOPMENT AND SERVICES             
 [376] HUMAN DEVELOPMENT AND SERVICES             
 [377] INFORMATION SERVICES                       
 [378] GREATER BATON ROUGE AIRPORT DISTRICT       
 [379] GREATER BATON ROUGE AIRPORT DISTRICT       
 [380] EMERGENCY MEDICAL SERVICES                 
 [381] EMERGENCY MEDICAL SERVICES                 
 [382] BATON ROUGE RIVER CENTER                   
 [383] HUMAN DEVELOPMENT AND SERVICES             
 [384] DEPT OF BUILDINGS AND GROUNDS              
 [385] HUMAN DEVELOPMENT AND SERVICES             
 [386] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [387] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [388] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [389] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [390] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [391] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [392] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [393] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [394] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [395] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [396] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [397] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [398] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [399] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [400] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [401] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [402] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [403] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [404] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [405] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [406] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [407] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [408] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [409] POLICE DEPARTMENT                          
 [410] POLICE DEPARTMENT                          
 [411] POLICE DEPARTMENT                          
 [412] GREATER BATON ROUGE AIRPORT DISTRICT       
 [413] EMERGENCY MEDICAL SERVICES                 
 [414] EMERGENCY MEDICAL SERVICES                 
 [415] EMERGENCY MEDICAL SERVICES                 
 [416] EMERGENCY MEDICAL SERVICES                 
 [417] EMERGENCY MEDICAL SERVICES                 
 [418] EMERGENCY MEDICAL SERVICES                 
 [419] COMMUNITY DEVELOPMENT PROGRAMS             
 [420] OFC. OF HOMELAND SECURITY & EMERGENCY PREPA
 [421] OFC. OF HOMELAND SECURITY & EMERGENCY PREPA
 [422] COMMUNITY DEVELOPMENT PROGRAMS             
 [423] COMMUNITY DEVELOPMENT PROGRAMS             
 [424] COMMUNITY DEVELOPMENT PROGRAMS             
 [425] COMMUNITY DEVELOPMENT PROGRAMS             
 [426] DEPT OF TRANSPORTATION AND DRAINAGE        
 [427] POLICE DEPARTMENT                          
 [428] POLICE DEPARTMENT                          
 [429] POLICE DEPARTMENT                          
 [430] POLICE DEPARTMENT                          
 [431] POLICE DEPARTMENT                          
 [432] POLICE DEPARTMENT                          
 [433] POLICE DEPARTMENT                          
 [434] POLICE DEPARTMENT                          
 [435] POLICE DEPARTMENT                          
 [436] POLICE DEPARTMENT                          
 [437] POLICE DEPARTMENT                          
 [438] POLICE DEPARTMENT                          
 [439] POLICE DEPARTMENT                          
 [440] HUMAN DEVELOPMENT AND SERVICES             
 [441] HUMAN DEVELOPMENT AND SERVICES             
 [442] HUMAN DEVELOPMENT AND SERVICES             
 [443] HUMAN DEVELOPMENT AND SERVICES             
 [444] HUMAN DEVELOPMENT AND SERVICES             
 [445] HUMAN DEVELOPMENT AND SERVICES             
 [446] HUMAN DEVELOPMENT AND SERVICES             
 [447] HUMAN DEVELOPMENT AND SERVICES             
 [448] HUMAN DEVELOPMENT AND SERVICES             
 [449] HUMAN DEVELOPMENT AND SERVICES             
 [450] HUMAN DEVELOPMENT AND SERVICES             
 [451] HUMAN DEVELOPMENT AND SERVICES             
 [452] HUMAN DEVELOPMENT AND SERVICES             
 [453] HUMAN DEVELOPMENT AND SERVICES             
 [454] HUMAN DEVELOPMENT AND SERVICES             
 [455] HUMAN DEVELOPMENT AND SERVICES             
 [456] HUMAN DEVELOPMENT AND SERVICES             
 [457] HUMAN DEVELOPMENT AND SERVICES             
 [458] HUMAN DEVELOPMENT AND SERVICES             
 [459] HUMAN DEVELOPMENT AND SERVICES             
 [460] HUMAN DEVELOPMENT AND SERVICES             
 [461] HUMAN DEVELOPMENT AND SERVICES             
 [462] HUMAN DEVELOPMENT AND SERVICES             
 [463] HUMAN DEVELOPMENT AND SERVICES             
 [464] HUMAN DEVELOPMENT AND SERVICES             
 [465] HUMAN DEVELOPMENT AND SERVICES             
 [466] HUMAN DEVELOPMENT AND SERVICES             
 [467] HUMAN DEVELOPMENT AND SERVICES             
 [468] HUMAN DEVELOPMENT AND SERVICES             
 [469] HUMAN DEVELOPMENT AND SERVICES             
 [470] HUMAN DEVELOPMENT AND SERVICES             
 [471] HUMAN DEVELOPMENT AND SERVICES             
 [472] HUMAN DEVELOPMENT AND SERVICES             
 [473] HUMAN DEVELOPMENT AND SERVICES             
 [474] HUMAN DEVELOPMENT AND SERVICES             
 [475] HUMAN DEVELOPMENT AND SERVICES             
 [476] HUMAN DEVELOPMENT AND SERVICES             
 [477] HUMAN DEVELOPMENT AND SERVICES             
 [478] HUMAN DEVELOPMENT AND SERVICES             
 [479] HUMAN DEVELOPMENT AND SERVICES             
 [480] HUMAN DEVELOPMENT AND SERVICES             
 [481] HUMAN DEVELOPMENT AND SERVICES             
 [482] HUMAN DEVELOPMENT AND SERVICES             
 [483] HUMAN DEVELOPMENT AND SERVICES             
 [484] HUMAN DEVELOPMENT AND SERVICES             
 [485] HUMAN DEVELOPMENT AND SERVICES             
 [486] HUMAN DEVELOPMENT AND SERVICES             
 [487] HUMAN DEVELOPMENT AND SERVICES             
 [488] HUMAN DEVELOPMENT AND SERVICES             
 [489] HUMAN DEVELOPMENT AND SERVICES             
 [490] HUMAN DEVELOPMENT AND SERVICES             
 [491] HUMAN DEVELOPMENT AND SERVICES             
 [492] HUMAN DEVELOPMENT AND SERVICES             
 [493] HUMAN DEVELOPMENT AND SERVICES             
 [494] HUMAN DEVELOPMENT AND SERVICES             
 [495] HUMAN DEVELOPMENT AND SERVICES             
 [496] HUMAN DEVELOPMENT AND SERVICES             
 [497] HUMAN DEVELOPMENT AND SERVICES             
 [498] POLICE DEPARTMENT                          
 [499] POLICE DEPARTMENT                          
 [500] POLICE DEPARTMENT                          
 [501] POLICE DEPARTMENT                          
 [502] POLICE DEPARTMENT                          
 [503] POLICE DEPARTMENT                          
 [504] POLICE DEPARTMENT                          
 [505] DEPT OF TRANSPORTATION AND DRAINAGE        
 [506] DEPT OF FLEET MANAGEMENT                   
 [507] DEPT OF BUILDINGS AND GROUNDS              
 [508] HUMAN DEVELOPMENT AND SERVICES             
 [509] HUMAN DEVELOPMENT AND SERVICES             
 [510] HUMAN DEVELOPMENT AND SERVICES             
 [511] INFORMATION SERVICES                       
 [512] INFORMATION SERVICES                       
 [513] INFORMATION SERVICES                       
 [514] EMERGENCY MEDICAL SERVICES                 
 [515] INFORMATION SERVICES                       
 [516] INFORMATION SERVICES                       
 [517] GREATER BATON ROUGE AIRPORT DISTRICT       
 [518] INFORMATION SERVICES                       
 [519] INFORMATION SERVICES                       
 [520] INFORMATION SERVICES                       
 [521] INFORMATION SERVICES                       
 [522] GREATER BATON ROUGE AIRPORT DISTRICT       
 [523] POLICE DEPARTMENT                          
 [524] POLICE DEPARTMENT                          
 [525] POLICE DEPARTMENT                          
 [526] POLICE DEPARTMENT                          
 [527] POLICE DEPARTMENT                          
 [528] POLICE DEPARTMENT                          
 [529] CONSTRUCTION PROJECTS                      
 [530] ROAD REHABILITATION PROGRAM                
 [531] FIRE DEPARTMENT                            
 [532] FIRE DEPARTMENT                            
 [533] FIRE DEPARTMENT                            
 [534] FIRE DEPARTMENT                            
 [535] FIRE DEPARTMENT                            
 [536] FIRE DEPARTMENT                            
 [537] FIRE DEPARTMENT                            
 [538] FIRE DEPARTMENT                            
 [539] FIRE DEPARTMENT                            
 [540] FIRE DEPARTMENT                            
 [541] FIRE DEPARTMENT                            
 [542] FIRE DEPARTMENT                            
 [543] FIRE DEPARTMENT                            
 [544] FIRE DEPARTMENT                            
 [545] FIRE DEPARTMENT                            
 [546] FIRE DEPARTMENT                            
 [547] FIRE DEPARTMENT                            
 [548] FIRE DEPARTMENT                            
 [549] FIRE DEPARTMENT                            
 [550] FIRE DEPARTMENT                            
 [551] FIRE DEPARTMENT                            
 [552] FIRE DEPARTMENT                            
 [553] FIRE DEPARTMENT                            
 [554] FIRE DEPARTMENT                            
 [555] FIRE DEPARTMENT                            
 [556] FIRE DEPARTMENT                            
 [557] BATON ROUGE RIVER CENTER                   
 [558] BATON ROUGE RIVER CENTER                   
 [559] BATON ROUGE RIVER CENTER                   
 [560] BATON ROUGE RIVER CENTER                   
 [561] BATON ROUGE RIVER CENTER                   
 [562] BATON ROUGE RIVER CENTER                   
 [563] BATON ROUGE RIVER CENTER                   
 [564] BATON ROUGE RIVER CENTER                   
 [565] BATON ROUGE RIVER CENTER                   
 [566] BATON ROUGE RIVER CENTER                   
 [567] BATON ROUGE RIVER CENTER                   
 [568] BATON ROUGE RIVER CENTER                   
 [569] BATON ROUGE RIVER CENTER                   
 [570] BATON ROUGE RIVER CENTER                   
 [571] BATON ROUGE RIVER CENTER                   
 [572] BATON ROUGE RIVER CENTER                   
 [573] BATON ROUGE RIVER CENTER                   
 [574] BATON ROUGE RIVER CENTER                   
 [575] BATON ROUGE RIVER CENTER                   
 [576] BATON ROUGE RIVER CENTER                   
 [577] BATON ROUGE RIVER CENTER                   
 [578] BATON ROUGE RIVER CENTER                   
 [579] BATON ROUGE RIVER CENTER                   
 [580] BATON ROUGE RIVER CENTER                   
 [581] BATON ROUGE RIVER CENTER                   
 [582] BATON ROUGE RIVER CENTER                   
 [583] BATON ROUGE RIVER CENTER                   
 [584] BATON ROUGE RIVER CENTER                   
 [585] BATON ROUGE RIVER CENTER                   
 [586] BATON ROUGE RIVER CENTER                   
 [587] BATON ROUGE RIVER CENTER                   
 [588] BATON ROUGE RIVER CENTER                   
 [589] BATON ROUGE RIVER CENTER                   
 [590] BATON ROUGE RIVER CENTER                   
 [591] BATON ROUGE RIVER CENTER                   
 [592] BATON ROUGE RIVER CENTER                   
 [593] BATON ROUGE RIVER CENTER                   
 [594] BATON ROUGE RIVER CENTER                   
 [595] BATON ROUGE RIVER CENTER                   
 [596] BATON ROUGE RIVER CENTER                   
 [597] BATON ROUGE RIVER CENTER                   
 [598] BATON ROUGE RIVER CENTER                   
 [599] BATON ROUGE RIVER CENTER                   
 [600] BATON ROUGE RIVER CENTER                   
 [601] BATON ROUGE RIVER CENTER                   
 [602] BATON ROUGE RIVER CENTER                   
 [603] BATON ROUGE RIVER CENTER                   
 [604] BATON ROUGE RIVER CENTER                   
 [605] BATON ROUGE RIVER CENTER                   
 [606] BATON ROUGE RIVER CENTER                   
 [607] BATON ROUGE RIVER CENTER                   
 [608] BATON ROUGE RIVER CENTER                   
 [609] BATON ROUGE RIVER CENTER                   
 [610] BATON ROUGE RIVER CENTER                   
 [611] BATON ROUGE RIVER CENTER                   
 [612] BATON ROUGE RIVER CENTER                   
 [613] BATON ROUGE RIVER CENTER                   
 [614] BATON ROUGE RIVER CENTER                   
 [615] BATON ROUGE RIVER CENTER                   
 [616] BATON ROUGE RIVER CENTER                   
 [617] BATON ROUGE RIVER CENTER                   
 [618] DEPT OF FLEET MANAGEMENT                   
 [619] FINANCE DEPARTMENT                         
 [620] FINANCE DEPARTMENT                         
 [621] FINANCE DEPARTMENT                         
 [622] FINANCE DEPARTMENT                         
 [623] COMMUNITY DEVELOPMENT PROGRAMS             
 [624] FINANCE DEPARTMENT                         
 [625] CONSTRUCTION PROJECTS                      
 [626] INFORMATION SERVICES                       
 [627] DEPARTMENT OF PUBLIC WORKS                 
 [628] LIBRARY BOARD OF CONTROL                   
 [629] OFFICE OF THE MAYOR-PRESIDENT              
 [630] CONSTRUCTION PROJECTS                      
 [631] LIBRARY BOARD OF CONTROL                   
 [632] LIBRARY BOARD OF CONTROL                   
 [633] LIBRARY BOARD OF CONTROL                   
 [634] DEPARTMENT OF PUBLIC WORKS                 
 [635] DEPARTMENT OF PUBLIC WORKS                 
 [636] DEPARTMENT OF PUBLIC WORKS                 
 [637] DEPARTMENT OF PUBLIC WORKS                 
 [638] GREATER BATON ROUGE AIRPORT DISTRICT       
 [639] GREATER BATON ROUGE AIRPORT DISTRICT       
 [640] COMMUNITY DEVELOPMENT PROGRAMS             
 [641] COMMUNITY DEVELOPMENT PROGRAMS             
 [642] COMMUNITY DEVELOPMENT PROGRAMS             
 [643] COMMUNITY DEVELOPMENT PROGRAMS             
 [644] COMMUNITY DEVELOPMENT PROGRAMS             
 [645] COMMUNITY DEVELOPMENT PROGRAMS             
 [646] COMMUNITY DEVELOPMENT PROGRAMS             
 [647] COMMUNITY DEVELOPMENT PROGRAMS             
 [648] COMMUNITY DEVELOPMENT PROGRAMS             
 [649] COMMUNITY DEVELOPMENT PROGRAMS             
 [650] COMMUNITY DEVELOPMENT PROGRAMS             
 [651] COMMUNITY DEVELOPMENT PROGRAMS             
 [652] FINANCE DEPARTMENT                         
 [653] FINANCE DEPARTMENT                         
 [654] HUMAN DEVELOPMENT AND SERVICES             
 [655] HUMAN DEVELOPMENT AND SERVICES             
 [656] HUMAN DEVELOPMENT AND SERVICES             
 [657] HUMAN DEVELOPMENT AND SERVICES             
 [658] HUMAN DEVELOPMENT AND SERVICES             
 [659] EMERGENCY MEDICAL SERVICES                 
 [660] FINANCE DEPARTMENT                         
 [661] FINANCE DEPARTMENT                         
 [662] GREATER BATON ROUGE AIRPORT DISTRICT       
 [663] GREATER BATON ROUGE AIRPORT DISTRICT       
 [664] GREATER BATON ROUGE AIRPORT DISTRICT       
 [665] GREATER BATON ROUGE AIRPORT DISTRICT       
 [666] GREATER BATON ROUGE AIRPORT DISTRICT       
 [667] GREATER BATON ROUGE AIRPORT DISTRICT       
 [668] GREATER BATON ROUGE AIRPORT DISTRICT       
 [669] GREATER BATON ROUGE AIRPORT DISTRICT       
 [670] GREATER BATON ROUGE AIRPORT DISTRICT       
 [671] GREATER BATON ROUGE AIRPORT DISTRICT       
 [672] GREATER BATON ROUGE AIRPORT DISTRICT       
 [673] GREATER BATON ROUGE AIRPORT DISTRICT       
 [674] FINANCE DEPARTMENT                         
 [675] FINANCE DEPARTMENT                         
 [676] GREATER BATON ROUGE AIRPORT DISTRICT       
 [677] PARISH ATTORNEY                            
 [678] HUMAN DEVELOPMENT AND SERVICES             
 [679] HUMAN DEVELOPMENT AND SERVICES             
 [680] HUMAN DEVELOPMENT AND SERVICES             
 [681] POLICE DEPARTMENT                          
 [682] LIBRARY BOARD OF CONTROL                   
 [683] LIBRARY BOARD OF CONTROL                   
 [684] LIBRARY BOARD OF CONTROL                   
 [685] LIBRARY BOARD OF CONTROL                   
 [686] LIBRARY BOARD OF CONTROL                   
 [687] LIBRARY BOARD OF CONTROL                   
 [688] LIBRARY BOARD OF CONTROL                   
 [689] POLICE DEPARTMENT                          
 [690] POLICE DEPARTMENT                          
 [691] HUMAN DEVELOPMENT AND SERVICES             
 [692] INFORMATION SERVICES                       
 [693] COMMUNITY DEVELOPMENT PROGRAMS             
 [694] EMERGENCY MEDICAL SERVICES                 
 [695] COMMUNITY DEVELOPMENT PROGRAMS             
 [696] COMMUNITY DEVELOPMENT PROGRAMS             
 [697] HUMAN RESOURCES                            
 [698] HUMAN RESOURCES                            
 [699] HUMAN RESOURCES                            
 [700] HUMAN RESOURCES                            
 [701] HUMAN RESOURCES                            
 [702] HUMAN RESOURCES                            
 [703] HUMAN RESOURCES                            
 [704] HUMAN RESOURCES                            
 [705] POLICE DEPARTMENT                          
 [706] POLICE DEPARTMENT                          
 [707] POLICE DEPARTMENT                          
 [708] LIBRARY BOARD OF CONTROL                   
 [709] LIBRARY BOARD OF CONTROL                   
 [710] OUTSIDE AGENCIES                           
 [711] FINANCE DEPARTMENT                         
 [712] HUMAN DEVELOPMENT AND SERVICES             
 [713] HUMAN DEVELOPMENT AND SERVICES             
 [714] HUMAN DEVELOPMENT AND SERVICES             
 [715] HUMAN DEVELOPMENT AND SERVICES             
 [716] HUMAN DEVELOPMENT AND SERVICES             
 [717] HUMAN DEVELOPMENT AND SERVICES             
 [718] HUMAN DEVELOPMENT AND SERVICES             
 [719] INFORMATION SERVICES                       
 [720] INFORMATION SERVICES                       
 [721] INFORMATION SERVICES                       
 [722] INFORMATION SERVICES                       
 [723] INFORMATION SERVICES                       
 [724] INFORMATION SERVICES                       
 [725] INFORMATION SERVICES                       
 [726] INFORMATION SERVICES                       
 [727] INFORMATION SERVICES                       
 [728] INFORMATION SERVICES                       
 [729] INFORMATION SERVICES                       
 [730] INFORMATION SERVICES                       
 [731] INFORMATION SERVICES                       
 [732] HUMAN DEVELOPMENT AND SERVICES             
 [733] HUMAN DEVELOPMENT AND SERVICES             
 [734] HUMAN RESOURCES                            
 [735] DEPARTMENT OF PUBLIC WORKS                 
 [736] DEPARTMENT OF PUBLIC WORKS                 
 [737] DEPARTMENT OF PUBLIC WORKS                 
 [738] DEPARTMENT OF PUBLIC WORKS                 
 [739] CONSTRUCTION PROJECTS                      
 [740] CONSTRUCTION PROJECTS                      
 [741] DEPARTMENT OF PUBLIC WORKS                 
 [742] JUVENILE SERVICES                          
 [743] CONSTRUCTION PROJECTS                      
 [744] DEPT OF TRANSPORTATION AND DRAINAGE        
 [745] POLICE DEPARTMENT                          
 [746] POLICE DEPARTMENT                          
 [747] DEPT OF BUILDINGS AND GROUNDS              
 [748] DEPARTMENT OF PUBLIC WORKS                 
 [749] DEPARTMENT OF PUBLIC WORKS                 
 [750] HUMAN DEVELOPMENT AND SERVICES             
 [751] INFORMATION SERVICES                       
 [752] INFORMATION SERVICES                       
 [753] INFORMATION SERVICES                       
 [754] DEPARTMENT OF PUBLIC WORKS                 
 [755] DEPARTMENT OF PUBLIC WORKS                 
 [756] DEPARTMENT OF PUBLIC WORKS                 
 [757] DEPARTMENT OF PUBLIC WORKS                 
 [758] DEPT OF FLEET MANAGEMENT                   
 [759] INFORMATION SERVICES                       
 [760] INFORMATION SERVICES                       
 [761] INFORMATION SERVICES                       
 [762] INFORMATION SERVICES                       
 [763] INFORMATION SERVICES                       
 [764] HUMAN DEVELOPMENT AND SERVICES             
 [765] HUMAN DEVELOPMENT AND SERVICES             
 [766] COMMUNITY DEVELOPMENT PROGRAMS             
 [767] COMMUNITY DEVELOPMENT PROGRAMS             
 [768] MOSQUITO & RODENT CONTROL                  
 [769] LIBRARY BOARD OF CONTROL                   
 [770] OFFICE OF THE MAYOR-PRESIDENT              
 [771] HUMAN DEVELOPMENT AND SERVICES             
 [772] INFORMATION SERVICES                       
 [773] INFORMATION SERVICES                       
 [774] HUMAN DEVELOPMENT AND SERVICES             
 [775] COMMUNITY DEVELOPMENT PROGRAMS             
 [776] DEPARTMENT OF PUBLIC WORKS                 
 [777] DEPARTMENT OF PUBLIC WORKS                 
 [778] DEPARTMENT OF PUBLIC WORKS                 
 [779] DEPARTMENT OF PUBLIC WORKS                 
 [780] DEPARTMENT OF PUBLIC WORKS                 
 [781] POLICE DEPARTMENT                          
 [782] POLICE DEPARTMENT                          
 [783] POLICE DEPARTMENT                          
 [784] POLICE DEPARTMENT                          
 [785] POLICE DEPARTMENT                          
 [786] POLICE DEPARTMENT                          
 [787] EMERGENCY MEDICAL SERVICES                 
 [788] LIBRARY BOARD OF CONTROL                   
 [789] LIBRARY BOARD OF CONTROL                   
 [790] LIBRARY BOARD OF CONTROL                   
 [791] LIBRARY BOARD OF CONTROL                   
 [792] OFFICE OF THE MAYOR-PRESIDENT              
 [793] DEPT OF BUILDINGS AND GROUNDS              
 [794] DEPARTMENT OF PUBLIC WORKS                 
 [795] CONSTRUCTION PROJECTS                      
 [796] CONSTRUCTION PROJECTS                      
 [797] HUMAN DEVELOPMENT AND SERVICES             
 [798] PARISH ATTORNEY                            
 [799] POLICE DEPARTMENT                          
 [800] GREATER BATON ROUGE AIRPORT DISTRICT       
 [801] LIBRARY BOARD OF CONTROL                   
 [802] HUMAN RESOURCES                            
 [803] LIBRARY BOARD OF CONTROL                   
 [804] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [805] JUVENILE SERVICES                          
 [806] DEPARTMENT OF PUBLIC WORKS                 
 [807] DEPT OF FLEET MANAGEMENT                   
 [808] DEPT OF FLEET MANAGEMENT                   
 [809] DEPT OF FLEET MANAGEMENT                   
 [810] DEPT OF FLEET MANAGEMENT                   
 [811] DEPT OF FLEET MANAGEMENT                   
 [812] DEPT OF FLEET MANAGEMENT                   
 [813] DEPT OF FLEET MANAGEMENT                   
 [814] DEPT OF FLEET MANAGEMENT                   
 [815] DEPT OF FLEET MANAGEMENT                   
 [816] DEPT OF FLEET MANAGEMENT                   
 [817] DEPT OF FLEET MANAGEMENT                   
 [818] DEPT OF FLEET MANAGEMENT                   
 [819] DEPT OF FLEET MANAGEMENT                   
 [820] DEPT OF FLEET MANAGEMENT                   
 [821] DEPT OF FLEET MANAGEMENT                   
 [822] DEPT OF FLEET MANAGEMENT                   
 [823] DEPT OF FLEET MANAGEMENT                   
 [824] DEPT OF FLEET MANAGEMENT                   
 [825] DEPARTMENT OF PUBLIC WORKS                 
 [826] DEPT OF TRANSPORTATION AND DRAINAGE        
 [827] DEPT OF TRANSPORTATION AND DRAINAGE        
 [828] POLICE DEPARTMENT                          
 [829] POLICE DEPARTMENT                          
 [830] POLICE DEPARTMENT                          
 [831] METROPOLITAN COUNCIL                       
 [832] METROPOLITAN COUNCIL                       
 [833] METROPOLITAN COUNCIL                       
 [834] METROPOLITAN COUNCIL                       
 [835] COMMUNITY DEVELOPMENT PROGRAMS             
 [836] COMMUNITY DEVELOPMENT PROGRAMS             
 [837] COMMUNITY DEVELOPMENT PROGRAMS             
 [838] COMMUNITY DEVELOPMENT PROGRAMS             
 [839] INFORMATION SERVICES                       
 [840] INFORMATION SERVICES                       
 [841] INFORMATION SERVICES                       
 [842] INFORMATION SERVICES                       
 [843] INFORMATION SERVICES                       
 [844] INFORMATION SERVICES                       
 [845] INFORMATION SERVICES                       
 [846] INFORMATION SERVICES                       
 [847] INFORMATION SERVICES                       
 [848] INFORMATION SERVICES                       
 [849] INFORMATION SERVICES                       
 [850] INFORMATION SERVICES                       
 [851] INFORMATION SERVICES                       
 [852] INFORMATION SERVICES                       
 [853] INFORMATION SERVICES                       
 [854] INFORMATION SERVICES                       
 [855] INFORMATION SERVICES                       
 [856] INFORMATION SERVICES                       
 [857] INFORMATION SERVICES                       
 [858] DEPARTMENT OF PUBLIC WORKS                 
 [859] DEPARTMENT OF PUBLIC WORKS                 
 [860] DEPARTMENT OF PUBLIC WORKS                 
 [861] DEPARTMENT OF PUBLIC WORKS                 
 [862] DEPARTMENT OF PUBLIC WORKS                 
 [863] DEPARTMENT OF PUBLIC WORKS                 
 [864] DEPARTMENT OF PUBLIC WORKS                 
 [865] DEPARTMENT OF PUBLIC WORKS                 
 [866] DEPARTMENT OF PUBLIC WORKS                 
 [867] DEPARTMENT OF PUBLIC WORKS                 
 [868] DEPARTMENT OF PUBLIC WORKS                 
 [869] DEPARTMENT OF PUBLIC WORKS                 
 [870] DEPARTMENT OF PUBLIC WORKS                 
 [871] DEPARTMENT OF PUBLIC WORKS                 
 [872] DEPARTMENT OF PUBLIC WORKS                 
 [873] DEPARTMENT OF PUBLIC WORKS                 
 [874] DEPARTMENT OF PUBLIC WORKS                 
 [875] GREATER BATON ROUGE AIRPORT DISTRICT       
 [876] GREATER BATON ROUGE AIRPORT DISTRICT       
 [877] GREATER BATON ROUGE AIRPORT DISTRICT       
 [878] GREATER BATON ROUGE AIRPORT DISTRICT       
 [879] OFFICE OF THE MAYOR-PRESIDENT              
 [880] OFFICE OF THE MAYOR-PRESIDENT              
 [881] OFFICE OF THE MAYOR-PRESIDENT              
 [882] LIBRARY BOARD OF CONTROL                   
 [883] DEPARTMENT OF PUBLIC WORKS                 
 [884] DEPARTMENT OF PUBLIC WORKS                 
 [885] DEPARTMENT OF PUBLIC WORKS                 
 [886] DEPARTMENT OF PUBLIC WORKS                 
 [887] LIBRARY BOARD OF CONTROL                   
 [888] EMERGENCY MEDICAL SERVICES                 
 [889] EMERGENCY MEDICAL SERVICES                 
 [890] DEPT OF FLEET MANAGEMENT                   
 [891] DEPT OF FLEET MANAGEMENT                   
 [892] DEPT OF FLEET MANAGEMENT                   
 [893] DEPT OF FLEET MANAGEMENT                   
 [894] DEPT OF FLEET MANAGEMENT                   
 [895] DEPT OF FLEET MANAGEMENT                   
 [896] DEPT OF FLEET MANAGEMENT                   
 [897] DEPT OF FLEET MANAGEMENT                   
 [898] DEPT OF FLEET MANAGEMENT                   
 [899] DEPT OF TRANSPORTATION AND DRAINAGE        
 [900] HUMAN DEVELOPMENT AND SERVICES             
 [901] HUMAN DEVELOPMENT AND SERVICES             
 [902] HUMAN DEVELOPMENT AND SERVICES             
 [903] DEPT OF BUILDINGS AND GROUNDS              
 [904] DEPARTMENT OF PUBLIC WORKS                 
 [905] DEPARTMENT OF PUBLIC WORKS                 
 [906] HUMAN DEVELOPMENT AND SERVICES             
 [907] MUNICIPAL FIRE & POLICE CIVIL SERVICE BOARD
 [908] FINANCE DEPARTMENT                         
 [909] JUVENILE SERVICES                          
 [910] HUMAN DEVELOPMENT AND SERVICES             
 [911] HUMAN DEVELOPMENT AND SERVICES             
 [912] HUMAN DEVELOPMENT AND SERVICES             
 [913] HUMAN DEVELOPMENT AND SERVICES             
 [914] HUMAN DEVELOPMENT AND SERVICES             
 [915] COMMUNITY DEVELOPMENT PROGRAMS             
 [916] COMMUNITY DEVELOPMENT PROGRAMS             
 [917] COMMUNITY DEVELOPMENT PROGRAMS             
 [918] COMMUNITY DEVELOPMENT PROGRAMS             
 [919] COMMUNITY DEVELOPMENT PROGRAMS             
 [920] COMMUNITY DEVELOPMENT PROGRAMS             
 [921] ROAD REHABILITATION PROGRAM                
 [922] COMMUNITY DEVELOPMENT PROGRAMS             
 [923] DEPT OF BUILDINGS AND GROUNDS              
 [924] COMMUNITY DEVELOPMENT PROGRAMS             
 [925] COMMUNITY DEVELOPMENT PROGRAMS             
 [926] COMMUNITY DEVELOPMENT PROGRAMS             
 [927] COMMUNITY DEVELOPMENT PROGRAMS             
 [928] LIBRARY BOARD OF CONTROL                   
 [929] COMMUNITY DEVELOPMENT PROGRAMS             
 [930] COMMUNITY DEVELOPMENT PROGRAMS             
 [931] COMMUNITY DEVELOPMENT PROGRAMS             
 [932] DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO
 [933] COMMUNITY DEVELOPMENT PROGRAMS             
 [934] COMMUNITY DEVELOPMENT PROGRAMS             
 [935] COMMUNITY DEVELOPMENT PROGRAMS             
 [936] COMMUNITY DEVELOPMENT PROGRAMS             
 [937] COMMUNITY DEVELOPMENT PROGRAMS             
 [938] COMMUNITY DEVELOPMENT PROGRAMS             
 [939] DEPT OF DEVELOPMENT                        
 [940] DEPT OF DEVELOPMENT                        
 [941] COMMUNITY DEVELOPMENT PROGRAMS             
 [942] COMMUNITY DEVELOPMENT PROGRAMS             
 [943] CITY COURT                                 
 [944] CITY COURT                                 
 [945] CITY COURT                                 
 [946] CITY COURT                                 
 [947] CITY COURT                                 
 [948] COUNCIL ADMINISTRATOR                      
 [949] COUNCIL ADMINISTRATOR                      
 [950] COUNCIL ADMINISTRATOR                      
 [951] COUNCIL ADMINISTRATOR                      
 [952] COUNCIL ADMINISTRATOR                      
 [953] DEPT OF FLEET MANAGEMENT                   
 [954] DEPT OF FLEET MANAGEMENT                   
 [955] DEPT OF FLEET MANAGEMENT                   
 [956] DEPT OF FLEET MANAGEMENT                   
 [957] DEPT OF DEVELOPMENT                        
 [958] DEPT OF DEVELOPMENT                        
 [959] HUMAN DEVELOPMENT AND SERVICES             
 [960] HUMAN DEVELOPMENT AND SERVICES             
 [961] HUMAN DEVELOPMENT AND SERVICES             
 [962] HUMAN DEVELOPMENT AND SERVICES             
 [963] HUMAN DEVELOPMENT AND SERVICES             
 [964] HUMAN DEVELOPMENT AND SERVICES             
 [965] DEPT OF FLEET MANAGEMENT                   
 [966] CITY COURT                                 
 [967] POLICE DEPARTMENT                          
 [968] POLICE DEPARTMENT                          
 [969] POLICE DEPARTMENT                          
 [970] OUTSIDE AGENCIES                           
 [971] HUMAN DEVELOPMENT AND SERVICES             
 [972] HUMAN DEVELOPMENT AND SERVICES             
 [973] HUMAN DEVELOPMENT AND SERVICES             
 [974] HUMAN DEVELOPMENT AND SERVICES             
 [975] LIBRARY BOARD OF CONTROL                   
 [976] LIBRARY BOARD OF CONTROL                   
 [977] JUVENILE SERVICES                          
 [978] OUTSIDE AGENCIES                           
 [979] OUTSIDE AGENCIES                           
 [980] DEPT OF DEVELOPMENT                        
 [981] DEPT OF DEVELOPMENT                        
 [982] DEPT OF DEVELOPMENT                        
 [983] DEPT OF DEVELOPMENT                        
 [984] DEPT OF DEVELOPMENT                        
 [985] DEPT OF DEVELOPMENT                        
 [986] JUVENILE SERVICES                          
 [987] DEPARTMENT OF PUBLIC WORKS                 
 [988] DEPT OF BUILDINGS AND GROUNDS              
 [989] DEPT OF DEVELOPMENT                        
 [990] HUMAN DEVELOPMENT AND SERVICES             
 [991] CONSTRUCTION PROJECTS                      
 [992] CONSTRUCTION PROJECTS                      
 [993] CONSTRUCTION PROJECTS                      
 [994] DEPARTMENT OF PUBLIC WORKS                 
 [995] DEPARTMENT OF PUBLIC WORKS                 
 [996] FIRE DEPARTMENT                            
 [997] HUMAN RESOURCES                            
 [998] EMERGENCY MEDICAL SERVICES                 
 [999] EMERGENCY MEDICAL SERVICES                 
[1000] DEPT OF BUILDINGS AND GROUNDS              
 [ reached getOption("max.print") -- omitted 31452 entries ]
45 Levels: ANIMAL CONTROL CENTER ...
#loan_purpose = mydata$Loan.Purpose !Do the same for all the columns!

Now we can start the data visualization process. We do this by making a table out of the variables we want to use. This table is itself a visualization of the data and it makes it easier to read. It also allows us to create more visualizations such as graphs and charts.

# Command to create a frequency table: variable_table = table(variable) 
# variable_table
Vendorstate_Vtable = table(vendorstate)
Vendorstate_Vtable
vendorstate
          ,    AL    AR    AZ    CA    CD    CO 
    2    62   400   125   189   877     1   114 
   CT    DC    FL    GA    IA    ID    IL    IN 
   99    69   418   555  1089    14   330   180 
   KS    KY    LA    MA    MD    ME    MI    MN 
   76   100 20178   149    32    12    55   233 
   MO    MS    NC    ND    NE    NH    NJ    NM 
   74   361   313     4    56    14  1633     3 
   NV    NY    OH    OK    OR    PA    RI    SC 
   12   210   180     9    27   401    15    41 
   SD    TN    TX    UT    VA    VT    WA    WI 
    6   152  2561    77   295     3    60   583 
   WV 
    3 
Departmentname_Vtable = table(departmentname)
Departmentname_Vtable
departmentname
                      ANIMAL CONTROL CENTER 
                                         79 
BATON ROUGE CONVENTION & VISTORS COMMISSION 
                                          4 
                   BATON ROUGE RIVER CENTER 
                                        134 
                             CITY CONSTABLE 
                                        115 
                                 CITY COURT 
                                       1412 
             COMMUNITY DEVELOPMENT PROGRAMS 
                                       1674 
                      CONSTRUCTION PROJECTS 
                                       2224 
                                    CORONER 
                                         47 
                      COUNCIL ADMINISTRATOR 
                                        182 
                      COUNCIL BUDGET OFFICE 
                                         84 
                 DEPARTMENT OF PUBLIC WORKS 
                                       5523 
              DEPT OF BUILDINGS AND GROUNDS 
                                        326 
DEPT OF BUSINESS OPERATIONS AND CAPITAL PRO 
                                        107 
                        DEPT OF DEVELOPMENT 
                                         69 
                   DEPT OF FLEET MANAGEMENT 
                                        325 
                        DEPT OF MAINTENANCE 
                                        220 
        DEPT OF TRANSPORTATION AND DRAINAGE 
                                        200 
                             DISTRICT COURT 
                                         20 
              DOWNTOWN DEVELOPMENT DISTRICT 
                                        182 
                 EMERGENCY MEDICAL SERVICES 
                                       1640 
                         FINANCE DEPARTMENT 
                                        758 
                            FIRE DEPARTMENT 
                                        498 
                   FIRE PROTECTION DISTRICT 
                                        217 
       GREATER BATON ROUGE AIRPORT DISTRICT 
                                       1677 
             HUMAN DEVELOPMENT AND SERVICES 
                                       2733 
                            HUMAN RESOURCES 
                                        561 
                       INFORMATION SERVICES 
                                       1156 
                             JUVENILE COURT 
                                          1 
                          JUVENILE SERVICES 
                                        376 
                   LIBRARY BOARD OF CONTROL 
                                       2620 
                       METROPOLITAN COUNCIL 
                                        186 
                  MOSQUITO & RODENT CONTROL 
                                        413 
MUNICIPAL FIRE & POLICE CIVIL SERVICE BOARD 
                                         11 
OFC. OF HOMELAND SECURITY & EMERGENCY PREPA 
                                        472 
              OFFICE OF THE MAYOR-PRESIDENT 
                                        386 
                           OUTSIDE AGENCIES 
                                        161 
                            PARISH ATTORNEY 
                                        259 
                        PLANNING COMMISSION 
                                        138 
                          POLICE DEPARTMENT 
                                       4066 
                  PUBLIC INFORMATION OFFICE 
                                         94 
                                 PURCHASING 
                                        253 
                        REGISTRAR OF VOTERS 
                                         43 
                          RETIREMENT OFFICE 
                                          4 
                ROAD REHABILITATION PROGRAM 
                                        607 
                           SHERIFF'S OFFICE 
                                        195 

Now, we will visualize some of the veriables to observe some patterns and differences.

Now that we have the variable tables we can use this data to make things such as barplots that can showcase information in a different way.

# Plot a bar plot using the " barplot(variable) " command where variable is the extracted variable
vendorbarplot = barplot(Vendorstate_Vtable)

vendorbarplot
      [,1]
 [1,]  0.7
 [2,]  1.9
 [3,]  3.1
 [4,]  4.3
 [5,]  5.5
 [6,]  6.7
 [7,]  7.9
 [8,]  9.1
 [9,] 10.3
[10,] 11.5
[11,] 12.7
[12,] 13.9
[13,] 15.1
[14,] 16.3
[15,] 17.5
[16,] 18.7
[17,] 19.9
[18,] 21.1
[19,] 22.3
[20,] 23.5
[21,] 24.7
[22,] 25.9
[23,] 27.1
[24,] 28.3
[25,] 29.5
[26,] 30.7
[27,] 31.9
[28,] 33.1
[29,] 34.3
[30,] 35.5
[31,] 36.7
[32,] 37.9
[33,] 39.1
[34,] 40.3
[35,] 41.5
[36,] 42.7
[37,] 43.9
[38,] 45.1
[39,] 46.3
[40,] 47.5
[41,] 48.7
[42,] 49.9
[43,] 51.1
[44,] 52.3
[45,] 53.5
[46,] 54.7
[47,] 55.9
[48,] 57.1
[49,] 58.3
departmentplot = barplot(Departmentname_Vtable)

departmentplot
      [,1]
 [1,]  0.7
 [2,]  1.9
 [3,]  3.1
 [4,]  4.3
 [5,]  5.5
 [6,]  6.7
 [7,]  7.9
 [8,]  9.1
 [9,] 10.3
[10,] 11.5
[11,] 12.7
[12,] 13.9
[13,] 15.1
[14,] 16.3
[15,] 17.5
[16,] 18.7
[17,] 19.9
[18,] 21.1
[19,] 22.3
[20,] 23.5
[21,] 24.7
[22,] 25.9
[23,] 27.1
[24,] 28.3
[25,] 29.5
[26,] 30.7
[27,] 31.9
[28,] 33.1
[29,] 34.3
[30,] 35.5
[31,] 36.7
[32,] 37.9
[33,] 39.1
[34,] 40.3
[35,] 41.5
[36,] 42.7
[37,] 43.9
[38,] 45.1
[39,] 46.3
[40,] 47.5
[41,] 48.7
[42,] 49.9
[43,] 51.1
[44,] 52.3
[45,] 53.5

Next, create a histogram of loan purpose frequency table and job frequency table

# Plot a histogram using the " hist(variable) " command where variable is the extracted variable
vendorhistogram = hist(Vendorstate_Vtable)

vendorhistogram
$breaks
[1]     0  5000 10000 15000 20000 25000

$counts
[1] 48  0  0  0  1

$density
[1] 1.959184e-04 0.000000e+00 0.000000e+00
[4] 0.000000e+00 4.081633e-06

$mids
[1]  2500  7500 12500 17500 22500

$xname
[1] "Vendorstate_Vtable"

$equidist
[1] TRUE

attr(,"class")
[1] "histogram"
departmenthistogram = hist(Departmentname_Vtable)

departmenthistogram
$breaks
[1]    0 1000 2000 3000 4000 5000 6000

$counts
[1] 35  5  3  0  1  1

$density
[1] 7.777778e-04 1.111111e-04 6.666667e-05
[4] 0.000000e+00 2.222222e-05 2.222222e-05

$mids
[1]  500 1500 2500 3500 4500 5500

$xname
[1] "Departmentname_Vtable"

$equidist
[1] TRUE

attr(,"class")
[1] "histogram"

In this case I feel like the barplot has much more useful information than the histogram. It seems easier to read and comprehend. The numbers on the histogram have less meaning for vendor state than the labels do in the bar plot. For the department table it may be more useful to use a histogram because the labels on the box plot aren’t the most helpful.

Lastly, create a pie chart of Loan purpose frequency table. Plot only values greather than 10.

This section shows us how to create and alter pie charts, another useful tool in the realm of data visualization.

VARIABLE: Loan Purpose

# Plot a pie chart using:
# pie(variable)  (command to make a pie chart)
vendorpie = pie(Vendorstate_Vtable)

vendorpie
NULL
# To get only values greather than N from a frequency table use:
# new_table = my_table[ my_table > N ]  (command to select values greather than N)
new_table = pie(Vendorstate_Vtable[1:10])

new_table
NULL

Why is this visual not a good representation of the data? What makes the barplot a better representation? The barplot, in this instance is a better visualization of the data because it is much easier to read and pie charts usually show perfcentages which are not very helpful in this case.


Task 2

Lets explore the Illinois Tax dataset (READ the “state_tax_illinois.csv” file) and create a scatterplot of corporate tax vs. personal income tax.

The dataset start in 1994 but we want to tax revenue since 2000 for the first quarter of the year “Q1”

First we have to read in the data and pick our variables that we want to analyze further so we can extract and analyze data. This section allows us to order the data so it is easier to read and comprehend and it allows us to alter it further to specify what we want to see.

# To change the way that R shows very large or small values we can use the following command:
mydata = read.csv(file="data/state_tax_illinois.csv")
mydata
options(scipen = 9999)
# read the dataset extract the year variable and order the dataset by year in decreasing order using the command:
year = mydata$year
# mydata = mydata[ order(year, decreasing = TRUE) , ] (! Order the data in decreasing order)
mydata = mydata[ order(year,decreasing = TRUE), ]
# From the ordered dataset Extract personal_income_tax variable
tax = mydata$personal_income_tax
tax
 [1] 3746068 3950197 3982255 4527933 3059415 3048487
 [7] 4505921 4961971 3680480 3723148 4345335 5353786
[13] 3608644 3565618 4197619 4790521 3403778 3435763
[19] 3195378 4096206 3343258 3180912 2515231 2702995
[25] 2134865 2291055 2448000 2899039 2104226 2110793
[31] 2803540 3427232 2149834 1968785 2522527 3101128
[37] 2071646 2017821 2264920 2817633 1963943 1820838
[43] 2130841 2511261 1817907 1734644 1902394 2181615
[49] 1675372 1661305 1862628 2169229 1600339 1571274
[55] 1945837 2195228 1648066 1661059 1867375 2405920
[61] 1679520 1650800 2272950 2713373 1763852 1631196
[67] 1877350 1984974 1644788 1640535 1877350 1984974
[73] 1579539 1545132 1689205 1786043 1579539 1545132
[79] 1553374 1642423 1421240 1390281 1427336 1509160
[85] 1306955 1278486 1360884 1425714 1200911 1174752
# From the ordered dataset Extract corporate_income_tax variable
state = mydata$corporate_income_tax
state
 [1]  903017 1163900 1055932 1425459  674725  625819
 [7] 1105062 1508593  787764  785112 1028486 1764708
[13]  877978  948199  834075 1365912  778008  891425
[19]  632404 1160954  655115  639437  729180  971001
[25]  507167  504933  642923 1403105  459494  527011
[31]  790459 1225043  519552  439074  704820 1158924
[37]  537828  562274  591623  901551  556344  516272
[43]  557161  735924  438193  468903  431059  470507
[49]  324041  354688  362344  421964  222017  395572
[55]  362374  432374  261916  246964  583639  786706
[61]  274660  313983  792893  828315  433323  412970
[67]  473585  814038  476261  457064  473585  814038
[73]  370340  303603  435527  748621  370340  303603
[79]  391428  672820  340579  279205  357650  614760
[85]  306094  250934  281377  532591  279680  229280

The previous task focused on visualizing one variable. A good way to visualize two variables would be a scatter plot or a correlation matrix.

This section shows us how to plot two different variables on the x and y axes respectively. It also shows us how to crate another plot.

# Plot personal_income_tax vs. corporate_income_tax 
# personal_income_tax will be on the x-axis
# corporate_income_tax will be on the y-axis
plot(mydata)

plot(state, tax)

This is another section where it allows us to view data in a more uniform and specified way. This code makes us only see data from year 1999 and beyond.

# To create a new_data filtering for an N NUMERIC value we can do the following
# new_data = mydata[ mydata$NUMERIC_VARIABLE > N, ]
new_data = mydata[mydata$year>1999, ]
# If we need to make another filter on a NON-NUMERIC we can do the following
# new_data = new_data[ new_data$CHAR_VARIABLE == "Q1", ]
new_data = new_data[ new_data$mydata$year == "Q1", ]
head(new_data)

It might be easier to notice a trend if there was a line that fit through the points. So, lets repeat using the function ‘scatter.smooth’. This functions adds a smooth curve computed by loess, a method to locally smooth a curve.

This section helps with data visualization becasue it enables us to use the line of best fit which also helps us with predictive analysis.

us_tax = new_data$total_tax_US
state = new_data$total_state
scatter.smooth(us_tax, state)
no non-missing arguments to min; returning Infno non-missing arguments to max; returning -InfError in seq.int(min(x), max(x), length.out = evaluation) : 
  'from' must be a finite number

Now, repeat below for total_tax_US vs. total_state, following the example that was just provided. Observe and note any trends in the scatter plots and potential relationships below. Do the same for all numeric variables.

# total_tax_US vs. total_state
scatter.smooth(new_data$total_tax_US,new_data$total_state)
no non-missing arguments to min; returning Infno non-missing arguments to max; returning -InfError in seq.int(min(x), max(x), length.out = evaluation) : 
  'from' must be a finite number

To quantify the data, its best to look at the correlation between two variables. What does this correlation explain?

cor(new_data[3:8])
                     total_tax_US total_state
total_tax_US                   NA          NA
total_state                    NA          NA
personal_income_tax            NA          NA
corporate_income_tax           NA          NA
general_sales_tax              NA          NA
motor_fuel_tax                 NA          NA
                     personal_income_tax
total_tax_US                          NA
total_state                           NA
personal_income_tax                   NA
corporate_income_tax                  NA
general_sales_tax                     NA
motor_fuel_tax                        NA
                     corporate_income_tax
total_tax_US                           NA
total_state                            NA
personal_income_tax                    NA
corporate_income_tax                   NA
general_sales_tax                      NA
motor_fuel_tax                         NA
                     general_sales_tax
total_tax_US                        NA
total_state                         NA
personal_income_tax                 NA
corporate_income_tax                NA
general_sales_tax                   NA
motor_fuel_tax                      NA
                     motor_fuel_tax
total_tax_US                     NA
total_state                      NA
personal_income_tax              NA
corporate_income_tax             NA
general_sales_tax                NA
motor_fuel_tax                   NA

Below, compute the correlation between every pair of variables (total_tax_US,total_state, personal_income_tax, corporate_income_tax, general_sales_tax, motor_fuel_tax ).

Make sure to extract the variables first and then compute the correlation.

This instructs us how to alter correlation tables such as the table we made above. It allows us to see each individual correlation between each variable.

# To make a correlation table of all the NUMERIC variables you can select some columns or a range of columns, with the following command:
corr01 = mydata[ c(3,4)]
corr01
corr02 = mydata[ c(1,2)]
corr02
corr03 = mydata[ c(2,3)]
corr03
corr04 = mydata[ c(4,5)]
corr04
corr05 = mydata[ c(5,6)]
corr05
corr06 = mydata[ c(4,2)]
corr07 = mydata[ c(2,6)]
corr08 = mydata[ c(7, 5)]
corr09 = mydata[ c(7,6)]
# corr01 = mydata[ c(3,4) ] (The command c(3,4,...) inside the brackets selects a given column )
# cor(corr01) (will give you the correlation table for variables in columns 3 and 4)
# corr02 = mydata[3:5] ( the command [3:5] selects a range of columns from 3 to 5)
# cor(corr02)

Task 3 - TABLEAU

Follow the directions on the worksheet, download tableau academic on your personal computer or use one of the labs computers.

  1. Refer to file ‘states_purchase_orders.csv’ in the data folder

  2. Start Tableau and enter your LUC email if prompted.

  3. Import the file into Tableau. Choose the Text File option when importing

  1. Under the dimensions tab located on the left side of the screen.

DOUBLE click on the ‘Department.Name’, then DOUBLE click on ‘Number of Records’ variable located on the bottom left of the screen. Note the bar like view and breakdowns.

This section shows us how to use tableau to visualize data. This visualization of data allows us to see the numbers in a clear and concise way. By crating graphs and charts, we can answer the questions stated below.

# Change the image for your screenshots and MAKE COMMENTS

  1. Create a new sheet by clicking on the icon next to your current sheet.

Then DOUBLE click on ‘Number of Records’ variable then DOUBLE click on ‘Vendor.Zip’, then on the top left select the recommend view.

LS0tDQp0aXRsZTogIkJ1c2luZXNzIEFuYWx5dGljcyBMYWIgV29ya3NoZWV0IDA0Ig0KYXV0aG9yOiAiSm9yZGFuIFJpZWJlIg0KZGF0ZTogIjgvMi8xNyINCm91dHB1dDoNCiAgaHRtbF9ub3RlYm9vazogZGVmYXVsdA0KICBodG1sX2RvY3VtZW50OiBkZWZhdWx0DQogIHBkZl9kb2N1bWVudDogZGVmYXVsdA0Kc3VidGl0bGU6IENNRSBHcm91cCBGb3VuZGF0aW9uIEJ1c2luZXNzIEFuYWx5dGljcyBMYWINCi0tLQ0KDQojIyMgQWJvdXQNCg0KUiBjYW4gYmUgdXNlZCB0byBtYWtlIGJhc2ljIHZpc3VhbCBhbmFseXRpY3MsIHdoaWNoIGNhbiBiZSBoZWxwZnVsIGluIHVuZGVyc3RhbmRpbmcgdGhlIGRhdGEgaG9saXN0aWNhbGx5LiBBZGRpdGlvbmFsbHksIFIgY2FuIGhlbHAgZmluZCBjb3JyZWxhdGlvbnMgYmV0d2VlbiB2YXJpYWJsZXMgYW5kIGNyZWF0ZSBzY2F0dGVyIHBsb3RzLiANCg0KSW4gdGhpcyBsYWIgd2Ugd2lsbCBkZWx2ZSBkZWVwZXIgaW50byB0aGUgbWFya2V0aW5nIGRhdGEgc2V0IHdpdGggUiB2aXN1YWwgYW5hbHl0aWNzIGFuZCB1c2UgVGFibGVhdSB0byB2aXN1YWxpemUgdGhlIGNyZWRpdCByaXNrIGRhdGEgc2V0LiANCg0KIyMjIFNldHVwDQoNCk1ha2Ugc3VyZSB0byBkb3dubG9hZCB0aGUgZm9sZGVyIHRpdGxlZCAnYnNhZF9sYWIwNCcgemlwIGZvbGRlciBhbmQgZXh0cmFjdCB0aGUgZm9sZGVyIHRvIHVuemlwIGl0LiBOZXh0LCB3ZSBtdXN0IHNldCB0aGlzIGZvbGRlciBhcyB0aGUgd29ya2luZyBkaXJlY3RvcnkuIFRoZSB3YXkgdG8gZG8gdGhpcyBpcyB0byBvcGVuIFIgU3R1ZGlvLCBnbyB0byAnU2Vzc2lvbicsIHNjcm9sbCBkb3duIHRvICdTZXQgV29ya2luZyBEaXJlY3RvcnknLCBhbmQgY2xpY2sgJ1RvIFNvdXJjZSBGaWxlIExvY2F0aW9uJy4gTm93LCBmb2xsb3cgdGhlIGRpcmVjdGlvbnMgdG8gY29tcGxldGUgdGhlIGxhYi4NCg0KLS0tLS0tLS0tLQ0KDQojIyMgVGFzayAxDQoNCkZpcnN0LCByZWFkIGluIHRoZSBgY3JlZGl0cmlzay5jc3ZgIGZpbGUgYW5kIG1ha2Ugc3VyZSBhbGwgdGhlIGNvbHVtbnMgYXJlIGNhcHR1cmVkIGFuZCBjaGVjayB0aGUgZmlyc3QgY291cGxlIG9mIHJvd3Mgb2YgdGhlIGRhdGFzZXQgImhlYWQobXlkYXRhKSINCg0KRmlyc3QsIHdlIGhhdmUgdG8gZW50ZXIgYWxsIG9mIHRoZSBkYXRhIG9mIHRoZSBzdGF0ZXMgcHVyY2hhc2Ugb3JkZXJzLiBUaGVuIHdlIGhhdmUgdG8gZXh0cmFjdCB0aGUgdmFyaWFibGVzIHdlIHdhbnQgdG8gdXNlIHNvIHdlIGNhbiB1dGlsaXplIHRoZSBkYXRhLiANCg0KYGBge3J9DQpteWRhdGEgPSByZWFkLmNzdihmaWxlPSJkYXRhL3N0YXRlc19wdXJjaGFzZV9vcmRlcnMuY3N2IikNCm15ZGF0YQ0KDQp2ZW5kb3JzdGF0ZSA9IG15ZGF0YSRWRU5ET1IuU1RBVEUNCnZlbmRvcnN0YXRlDQoNCmRlcGFydG1lbnRuYW1lID0gbXlkYXRhJERFUEFSVE1FTlQuTkFNRQ0KZGVwYXJ0bWVudG5hbWUNCiNsb2FuX3B1cnBvc2UgPSBteWRhdGEkTG9hbi5QdXJwb3NlICFEbyB0aGUgc2FtZSBmb3IgYWxsIHRoZSBjb2x1bW5zIQ0KDQpgYGANCg0KDQpOb3cgd2UgY2FuIHN0YXJ0IHRoZSBkYXRhIHZpc3VhbGl6YXRpb24gcHJvY2Vzcy4gV2UgZG8gdGhpcyBieSBtYWtpbmcgYSB0YWJsZSBvdXQgb2YgdGhlIHZhcmlhYmxlcyB3ZSB3YW50IHRvIHVzZS4gVGhpcyB0YWJsZSBpcyBpdHNlbGYgYSB2aXN1YWxpemF0aW9uIG9mIHRoZSBkYXRhIGFuZCBpdCBtYWtlcyBpdCBlYXNpZXIgdG8gcmVhZC4gSXQgYWxzbyBhbGxvd3MgdXMgdG8gY3JlYXRlIG1vcmUgdmlzdWFsaXphdGlvbnMgc3VjaCBhcyBncmFwaHMgYW5kIGNoYXJ0cy4gDQoNCiogQ3JlYXRlIGEgZnJlcXVlbmN5IHRhYmxlIGZvciB0aGUgTG9hbiBQdXJwb3NlIGFuZCBKb2INCmBgYHtyfQ0KIyBDb21tYW5kIHRvIGNyZWF0ZSBhIGZyZXF1ZW5jeSB0YWJsZTogdmFyaWFibGVfdGFibGUgPSB0YWJsZSh2YXJpYWJsZSkgDQojIHZhcmlhYmxlX3RhYmxlDQpWZW5kb3JzdGF0ZV9WdGFibGUgPSB0YWJsZSh2ZW5kb3JzdGF0ZSkNClZlbmRvcnN0YXRlX1Z0YWJsZQ0KDQoNCg0KDQpEZXBhcnRtZW50bmFtZV9WdGFibGUgPSB0YWJsZShkZXBhcnRtZW50bmFtZSkNCkRlcGFydG1lbnRuYW1lX1Z0YWJsZQ0KDQoNCmBgYA0KDQpOb3csIHdlIHdpbGwgdmlzdWFsaXplIHNvbWUgb2YgdGhlIHZlcmlhYmxlcyB0byBvYnNlcnZlIHNvbWUgcGF0dGVybnMgYW5kIGRpZmZlcmVuY2VzLiANCg0KTm93IHRoYXQgd2UgaGF2ZSB0aGUgdmFyaWFibGUgdGFibGVzIHdlIGNhbiB1c2UgdGhpcyBkYXRhIHRvIG1ha2UgdGhpbmdzIHN1Y2ggYXMgYmFycGxvdHMgdGhhdCBjYW4gc2hvd2Nhc2UgaW5mb3JtYXRpb24gaW4gYSBkaWZmZXJlbnQgd2F5LiANCg0KDQoNCmBgYHtyfQ0KIyBQbG90IGEgYmFyIHBsb3QgdXNpbmcgdGhlICIgYmFycGxvdCh2YXJpYWJsZSkgIiBjb21tYW5kIHdoZXJlIHZhcmlhYmxlIGlzIHRoZSBleHRyYWN0ZWQgdmFyaWFibGUNCg0KdmVuZG9yYmFycGxvdCA9IGJhcnBsb3QoVmVuZG9yc3RhdGVfVnRhYmxlKQ0KdmVuZG9yYmFycGxvdA0KDQoNCmRlcGFydG1lbnRwbG90ID0gYmFycGxvdChEZXBhcnRtZW50bmFtZV9WdGFibGUpDQpkZXBhcnRtZW50cGxvdA0KYGBgDQoNCk5leHQsIGNyZWF0ZSBhIGhpc3RvZ3JhbSBvZiBsb2FuIHB1cnBvc2UgZnJlcXVlbmN5IHRhYmxlIGFuZCBqb2IgZnJlcXVlbmN5IHRhYmxlDQoNCmBgYHtyfQ0KIyBQbG90IGEgaGlzdG9ncmFtIHVzaW5nIHRoZSAiIGhpc3QodmFyaWFibGUpICIgY29tbWFuZCB3aGVyZSB2YXJpYWJsZSBpcyB0aGUgZXh0cmFjdGVkIHZhcmlhYmxlDQoNCnZlbmRvcmhpc3RvZ3JhbSA9IGhpc3QoVmVuZG9yc3RhdGVfVnRhYmxlKQ0KdmVuZG9yaGlzdG9ncmFtDQoNCg0KZGVwYXJ0bWVudGhpc3RvZ3JhbSA9IGhpc3QoRGVwYXJ0bWVudG5hbWVfVnRhYmxlKQ0KZGVwYXJ0bWVudGhpc3RvZ3JhbQ0KYGBgDQoNCiogV2hhdCBhcmUgc29tZSBvYnNlcnZhYmxlIGRpZmZlcmVuY2VzIGJldHdlZW4gdGhlIGJveHBsb3QgYW5kIHRoZSBoaXN0b2dyYW0/IFBsZWFzZSByZWNvcmQgeW91ciBvYnNlcnZhdGlvbnMgaGVyZS4gDQoNCkluIHRoaXMgY2FzZSBJIGZlZWwgbGlrZSB0aGUgYmFycGxvdCBoYXMgbXVjaCBtb3JlIHVzZWZ1bCBpbmZvcm1hdGlvbiB0aGFuIHRoZSBoaXN0b2dyYW0uIEl0IHNlZW1zIGVhc2llciB0byByZWFkIGFuZCBjb21wcmVoZW5kLiBUaGUgbnVtYmVycyBvbiB0aGUgaGlzdG9ncmFtIGhhdmUgbGVzcyBtZWFuaW5nIGZvciB2ZW5kb3Igc3RhdGUgdGhhbiB0aGUgbGFiZWxzIGRvIGluIHRoZSBiYXIgcGxvdC4gRm9yIHRoZSBkZXBhcnRtZW50IHRhYmxlIGl0IG1heSBiZSBtb3JlIHVzZWZ1bCB0byB1c2UgYSBoaXN0b2dyYW0gYmVjYXVzZSB0aGUgbGFiZWxzIG9uIHRoZSBib3ggcGxvdCBhcmVuJ3QgdGhlIG1vc3QgaGVscGZ1bC4gDQoNCg0KTGFzdGx5LCBjcmVhdGUgYSBwaWUgY2hhcnQgb2YgTG9hbiBwdXJwb3NlIGZyZXF1ZW5jeSB0YWJsZS4gUGxvdCBvbmx5IHZhbHVlcyBncmVhdGhlciB0aGFuIDEwLg0KDQpUaGlzIHNlY3Rpb24gc2hvd3MgdXMgaG93IHRvIGNyZWF0ZSBhbmQgYWx0ZXIgcGllIGNoYXJ0cywgYW5vdGhlciB1c2VmdWwgdG9vbCBpbiB0aGUgcmVhbG0gb2YgZGF0YSB2aXN1YWxpemF0aW9uLiANCg0KVkFSSUFCTEU6IExvYW4gUHVycG9zZQ0KYGBge3J9DQojIFBsb3QgYSBwaWUgY2hhcnQgdXNpbmc6DQojIHBpZSh2YXJpYWJsZSkgIChjb21tYW5kIHRvIG1ha2UgYSBwaWUgY2hhcnQpDQoNCnZlbmRvcnBpZSA9IHBpZShWZW5kb3JzdGF0ZV9WdGFibGUpDQp2ZW5kb3JwaWUNCiMgVG8gZ2V0IG9ubHkgdmFsdWVzIGdyZWF0aGVyIHRoYW4gTiBmcm9tIGEgZnJlcXVlbmN5IHRhYmxlIHVzZToNCiMgbmV3X3RhYmxlID0gbXlfdGFibGVbIG15X3RhYmxlID4gTiBdICAoY29tbWFuZCB0byBzZWxlY3QgdmFsdWVzIGdyZWF0aGVyIHRoYW4gTikNCm5ld190YWJsZSA9IHBpZShWZW5kb3JzdGF0ZV9WdGFibGVbMToxMF0pDQpuZXdfdGFibGUNCg0KYGBgDQoNCldoeSBpcyB0aGlzIHZpc3VhbCBub3QgYSBnb29kIHJlcHJlc2VudGF0aW9uIG9mIHRoZSBkYXRhPyBXaGF0IG1ha2VzIHRoZSBiYXJwbG90IGEgYmV0dGVyIHJlcHJlc2VudGF0aW9uPw0KVGhlIGJhcnBsb3QsIGluIHRoaXMgaW5zdGFuY2UgaXMgYSBiZXR0ZXIgdmlzdWFsaXphdGlvbiBvZiB0aGUgZGF0YSBiZWNhdXNlIGl0IGlzIG11Y2ggZWFzaWVyIHRvIHJlYWQgYW5kIHBpZSBjaGFydHMgdXN1YWxseSBzaG93IHBlcmZjZW50YWdlcyB3aGljaCBhcmUgbm90IHZlcnkgaGVscGZ1bCBpbiB0aGlzIGNhc2UuIA0KDQotLS0tLS0tLS0tDQoNCiMjIyBUYXNrIDINCg0KTGV0cyBleHBsb3JlIHRoZSBJbGxpbm9pcyBUYXggZGF0YXNldCAoUkVBRCB0aGUgInN0YXRlX3RheF9pbGxpbm9pcy5jc3YiIGZpbGUpIGFuZCBjcmVhdGUgYSBzY2F0dGVycGxvdCBvZiBjb3Jwb3JhdGUgdGF4IHZzLiBwZXJzb25hbCBpbmNvbWUgdGF4LiAgDQoNClRoZSBkYXRhc2V0IHN0YXJ0IGluIDE5OTQgYnV0IHdlIHdhbnQgdG8gdGF4IHJldmVudWUgc2luY2UgMjAwMCBmb3IgdGhlIGZpcnN0IHF1YXJ0ZXIgb2YgdGhlIHllYXIgIlExIg0KDQoNCg0KRmlyc3Qgd2UgaGF2ZSB0byByZWFkIGluIHRoZSBkYXRhIGFuZCBwaWNrIG91ciB2YXJpYWJsZXMgdGhhdCB3ZSB3YW50IHRvIGFuYWx5emUgZnVydGhlciBzbyB3ZSBjYW4gZXh0cmFjdCBhbmQgYW5hbHl6ZSBkYXRhLiBUaGlzIHNlY3Rpb24gYWxsb3dzIHVzIHRvIG9yZGVyIHRoZSBkYXRhIHNvIGl0IGlzIGVhc2llciB0byByZWFkIGFuZCBjb21wcmVoZW5kIGFuZCBpdCBhbGxvd3MgdXMgdG8gYWx0ZXIgaXQgZnVydGhlciB0byBzcGVjaWZ5IHdoYXQgd2Ugd2FudCB0byBzZWUuIA0KDQpgYGB7cn0NCiMgVG8gY2hhbmdlIHRoZSB3YXkgdGhhdCBSIHNob3dzIHZlcnkgbGFyZ2Ugb3Igc21hbGwgdmFsdWVzIHdlIGNhbiB1c2UgdGhlIGZvbGxvd2luZyBjb21tYW5kOg0KDQpteWRhdGEgPSByZWFkLmNzdihmaWxlPSJkYXRhL3N0YXRlX3RheF9pbGxpbm9pcy5jc3YiKQ0KbXlkYXRhDQpvcHRpb25zKHNjaXBlbiA9IDk5OTkpDQoNCiMgcmVhZCB0aGUgZGF0YXNldCBleHRyYWN0IHRoZSB5ZWFyIHZhcmlhYmxlIGFuZCBvcmRlciB0aGUgZGF0YXNldCBieSB5ZWFyIGluIGRlY3JlYXNpbmcgb3JkZXIgdXNpbmcgdGhlIGNvbW1hbmQ6DQp5ZWFyID0gbXlkYXRhJHllYXINCg0KIyBteWRhdGEgPSBteWRhdGFbIG9yZGVyKHllYXIsIGRlY3JlYXNpbmcgPSBUUlVFKSAsIF0gKCEgT3JkZXIgdGhlIGRhdGEgaW4gZGVjcmVhc2luZyBvcmRlcikNCm15ZGF0YSA9IG15ZGF0YVsgb3JkZXIoeWVhcixkZWNyZWFzaW5nID0gVFJVRSksIF0NCg0KDQojIEZyb20gdGhlIG9yZGVyZWQgZGF0YXNldCBFeHRyYWN0IHBlcnNvbmFsX2luY29tZV90YXggdmFyaWFibGUNCg0KdGF4ID0gbXlkYXRhJHBlcnNvbmFsX2luY29tZV90YXgNCnRheA0KDQojIEZyb20gdGhlIG9yZGVyZWQgZGF0YXNldCBFeHRyYWN0IGNvcnBvcmF0ZV9pbmNvbWVfdGF4IHZhcmlhYmxlDQoNCnN0YXRlID0gbXlkYXRhJGNvcnBvcmF0ZV9pbmNvbWVfdGF4DQpzdGF0ZQ0KDQpgYGANCg0KVGhlIHByZXZpb3VzIHRhc2sgZm9jdXNlZCBvbiB2aXN1YWxpemluZyBvbmUgdmFyaWFibGUuIEEgZ29vZCB3YXkgdG8gdmlzdWFsaXplIHR3byB2YXJpYWJsZXMgd291bGQgYmUgYSBzY2F0dGVyIHBsb3Qgb3IgYSBjb3JyZWxhdGlvbiBtYXRyaXguDQoNClRoaXMgc2VjdGlvbiBzaG93cyB1cyBob3cgdG8gcGxvdCB0d28gZGlmZmVyZW50IHZhcmlhYmxlcyBvbiB0aGUgeCBhbmQgeSBheGVzIHJlc3BlY3RpdmVseS4gSXQgYWxzbyBzaG93cyB1cyBob3cgdG8gY3JhdGUgYW5vdGhlciBwbG90LiANCg0KYGBge3J9DQojIFBsb3QgcGVyc29uYWxfaW5jb21lX3RheCB2cy4gY29ycG9yYXRlX2luY29tZV90YXggDQojIHBlcnNvbmFsX2luY29tZV90YXggd2lsbCBiZSBvbiB0aGUgeC1heGlzDQojIGNvcnBvcmF0ZV9pbmNvbWVfdGF4IHdpbGwgYmUgb24gdGhlIHktYXhpcw0KDQoNCnBsb3QobXlkYXRhKQ0KcGxvdChzdGF0ZSwgdGF4KQ0KYGBgDQoNCiogU2VsZWN0IG9ubHkgZW50cmllcyBncmF0aGVyIHRoYW4geWVhciAxOTk5DQoqIEFmdGVyIHNlbGVjdGluZyBlbnRyaWVzIGdyZWF0aGVyIHRoYW4geWVhciAxOTk5LCBzZWxlY3QgZW50cmllcyBmb3IgcXVhcnRlciAiUTEiDQoNClRoaXMgaXMgYW5vdGhlciBzZWN0aW9uIHdoZXJlIGl0IGFsbG93cyB1cyB0byB2aWV3IGRhdGEgaW4gYSBtb3JlIHVuaWZvcm0gYW5kIHNwZWNpZmllZCB3YXkuIFRoaXMgY29kZSBtYWtlcyB1cyBvbmx5IHNlZSBkYXRhIGZyb20geWVhciAxOTk5IGFuZCBiZXlvbmQuIA0KDQpgYGB7cn0NCiMgVG8gY3JlYXRlIGEgbmV3X2RhdGEgZmlsdGVyaW5nIGZvciBhbiBOIE5VTUVSSUMgdmFsdWUgd2UgY2FuIGRvIHRoZSBmb2xsb3dpbmcNCiMgbmV3X2RhdGEgPSBteWRhdGFbIG15ZGF0YSROVU1FUklDX1ZBUklBQkxFID4gTiwgXQ0KDQpuZXdfZGF0YSA9IG15ZGF0YVtteWRhdGEkeWVhcj4xOTk5LCBdDQoNCiMgSWYgd2UgbmVlZCB0byBtYWtlIGFub3RoZXIgZmlsdGVyIG9uIGEgTk9OLU5VTUVSSUMgd2UgY2FuIGRvIHRoZSBmb2xsb3dpbmcNCiMgbmV3X2RhdGEgPSBuZXdfZGF0YVsgbmV3X2RhdGEkQ0hBUl9WQVJJQUJMRSA9PSAiUTEiLCBdDQoNCm5ld19kYXRhID0gbmV3X2RhdGFbIG5ld19kYXRhJG15ZGF0YSR5ZWFyID09ICJRMSIsIF0NCmhlYWQobmV3X2RhdGEpDQpgYGANCg0KSXQgbWlnaHQgYmUgZWFzaWVyIHRvIG5vdGljZSBhIHRyZW5kIGlmIHRoZXJlIHdhcyBhIGxpbmUgdGhhdCBmaXQgdGhyb3VnaCB0aGUgcG9pbnRzLiBTbywgbGV0cyByZXBlYXQgdXNpbmcgdGhlIGZ1bmN0aW9uICdzY2F0dGVyLnNtb290aCcuIFRoaXMgZnVuY3Rpb25zIGFkZHMgYSBzbW9vdGggY3VydmUgY29tcHV0ZWQgYnkgbG9lc3MsIGEgbWV0aG9kIHRvIGxvY2FsbHkgc21vb3RoIGEgY3VydmUuIA0KDQpUaGlzIHNlY3Rpb24gaGVscHMgd2l0aCBkYXRhIHZpc3VhbGl6YXRpb24gYmVjYXN1ZSBpdCBlbmFibGVzIHVzIHRvIHVzZSB0aGUgbGluZSBvZiBiZXN0IGZpdCB3aGljaCBhbHNvIGhlbHBzIHVzIHdpdGggcHJlZGljdGl2ZSBhbmFseXNpcy4gDQoNCmBgYHtyfQ0KdXNfdGF4ID0gbmV3X2RhdGEkdG90YWxfdGF4X1VTDQpzdGF0ZSA9IG5ld19kYXRhJHRvdGFsX3N0YXRlDQpzY2F0dGVyLnNtb290aCh1c190YXgsIHN0YXRlKQ0KYGBgDQoNCk5vdywgcmVwZWF0IGJlbG93IGZvciB0b3RhbF90YXhfVVMgdnMuIHRvdGFsX3N0YXRlLCBmb2xsb3dpbmcgdGhlIGV4YW1wbGUgdGhhdCB3YXMganVzdCBwcm92aWRlZC4gT2JzZXJ2ZSBhbmQgbm90ZSBhbnkgdHJlbmRzIGluIHRoZSBzY2F0dGVyIHBsb3RzIGFuZCBwb3RlbnRpYWwgcmVsYXRpb25zaGlwcyBiZWxvdy4gRG8gdGhlIHNhbWUgZm9yIGFsbCBudW1lcmljIHZhcmlhYmxlcy4NCg0KYGBge3J9DQojIHRvdGFsX3RheF9VUyB2cy4gdG90YWxfc3RhdGUNCg0Kc2NhdHRlci5zbW9vdGgobmV3X2RhdGEkdG90YWxfdGF4X1VTLG5ld19kYXRhJHRvdGFsX3N0YXRlKQ0KYGBgDQoNClRvIHF1YW50aWZ5IHRoZSBkYXRhLCBpdHMgYmVzdCB0byBsb29rIGF0IHRoZSBjb3JyZWxhdGlvbiBiZXR3ZWVuIHR3byB2YXJpYWJsZXMuDQpXaGF0IGRvZXMgdGhpcyBjb3JyZWxhdGlvbiBleHBsYWluPw0KDQpgYGB7cn0NCg0KY29yKG5ld19kYXRhWzM6OF0pDQpgYGANCg0KQmVsb3csIGNvbXB1dGUgdGhlIGNvcnJlbGF0aW9uIGJldHdlZW4gZXZlcnkgcGFpciBvZiB2YXJpYWJsZXMgKHRvdGFsX3RheF9VUyx0b3RhbF9zdGF0ZSwgcGVyc29uYWxfaW5jb21lX3RheCwgY29ycG9yYXRlX2luY29tZV90YXgsIGdlbmVyYWxfc2FsZXNfdGF4LCBtb3Rvcl9mdWVsX3RheCApLiANCg0KTWFrZSBzdXJlIHRvIGV4dHJhY3QgdGhlIHZhcmlhYmxlcyBmaXJzdCBhbmQgdGhlbiBjb21wdXRlIHRoZSBjb3JyZWxhdGlvbi4gDQoNClRoaXMgaW5zdHJ1Y3RzIHVzIGhvdyB0byBhbHRlciBjb3JyZWxhdGlvbiB0YWJsZXMgc3VjaCBhcyB0aGUgdGFibGUgd2UgbWFkZSBhYm92ZS4gSXQgYWxsb3dzIHVzIHRvIHNlZSBlYWNoIGluZGl2aWR1YWwgY29ycmVsYXRpb24gYmV0d2VlbiBlYWNoIHZhcmlhYmxlLiANCg0KYGBge3J9DQojIFRvIG1ha2UgYSBjb3JyZWxhdGlvbiB0YWJsZSBvZiBhbGwgdGhlIE5VTUVSSUMgdmFyaWFibGVzIHlvdSBjYW4gc2VsZWN0IHNvbWUgY29sdW1ucyBvciBhIHJhbmdlIG9mIGNvbHVtbnMsIHdpdGggdGhlIGZvbGxvd2luZyBjb21tYW5kOg0KDQpjb3JyMDEgPSBteWRhdGFbIGMoMyw0KV0NCmNvcnIwMQ0KDQpjb3JyMDIgPSBteWRhdGFbIGMoMSwyKV0NCmNvcnIwMg0KDQpjb3JyMDMgPSBteWRhdGFbIGMoMiwzKV0NCmNvcnIwMw0KDQpjb3JyMDQgPSBteWRhdGFbIGMoNCw1KV0NCmNvcnIwNA0KDQpjb3JyMDUgPSBteWRhdGFbIGMoNSw2KV0NCmNvcnIwNQ0KDQpjb3JyMDYgPSBteWRhdGFbIGMoNCwyKV0NCg0KY29ycjA3ID0gbXlkYXRhWyBjKDIsNildDQoNCmNvcnIwOCA9IG15ZGF0YVsgYyg3LCA1KV0NCg0KY29ycjA5ID0gbXlkYXRhWyBjKDcsNildDQoNCiMgY29ycjAxID0gbXlkYXRhWyBjKDMsNCkgXSAoVGhlIGNvbW1hbmQgYygzLDQsLi4uKSBpbnNpZGUgdGhlIGJyYWNrZXRzIHNlbGVjdHMgYSBnaXZlbiBjb2x1bW4gKQ0KIyBjb3IoY29ycjAxKSAod2lsbCBnaXZlIHlvdSB0aGUgY29ycmVsYXRpb24gdGFibGUgZm9yIHZhcmlhYmxlcyBpbiBjb2x1bW5zIDMgYW5kIDQpDQoNCiMgY29ycjAyID0gbXlkYXRhWzM6NV0gKCB0aGUgY29tbWFuZCBbMzo1XSBzZWxlY3RzIGEgcmFuZ2Ugb2YgY29sdW1ucyBmcm9tIDMgdG8gNSkNCiMgY29yKGNvcnIwMikNCmBgYA0KDQotLS0tLS0tLS0tDQoNCiMjIyBUYXNrIDMgLSBUQUJMRUFVDQoNCkZvbGxvdyB0aGUgZGlyZWN0aW9ucyBvbiB0aGUgd29ya3NoZWV0LCBkb3dubG9hZCB0YWJsZWF1IGFjYWRlbWljIG9uIHlvdXIgcGVyc29uYWwgY29tcHV0ZXIgb3IgdXNlIG9uZSBvZiB0aGUgbGFicyBjb21wdXRlcnMuDQoNCiogRG93bmxvYWQgVGFibGVhIGFjYWRlbWljIGhlcmU6IGh0dHBzOi8vd3d3LnRhYmxlYXUuY29tL2FjYWRlbWljL3N0dWRlbnRzDQoNCjEuIFJlZmVyIHRvIGZpbGUgJ3N0YXRlc19wdXJjaGFzZV9vcmRlcnMuY3N2JyBpbiB0aGUgZGF0YSBmb2xkZXINCg0KMi4gU3RhcnQgVGFibGVhdSBhbmQgZW50ZXIgeW91ciBMVUMgZW1haWwgaWYgcHJvbXB0ZWQuDQoNCjMuIEltcG9ydCB0aGUgZmlsZSBpbnRvIFRhYmxlYXUuIENob29zZSB0aGUgVGV4dCBGaWxlIG9wdGlvbiB3aGVuIGltcG9ydGluZw0KDQohW10oaW1ncy90YWJsZWF1X2ltcG9ydGZpbGUucG5nKQ0KDQoNCjQuIFVuZGVyIHRoZSBkaW1lbnNpb25zIHRhYiBsb2NhdGVkIG9uIHRoZSBsZWZ0IHNpZGUgb2YgdGhlIHNjcmVlbi4NCg0KIVtdKGltZ3MvdGFibGVhdV92YXJpYWJsZXMucG5nKQ0KDQpET1VCTEUgY2xpY2sgIG9uIHRoZSAnRGVwYXJ0bWVudC5OYW1lJywgdGhlbiBET1VCTEUgY2xpY2sgb24gJ051bWJlciBvZiBSZWNvcmRzJyB2YXJpYWJsZSBsb2NhdGVkIG9uIHRoZSBib3R0b20gbGVmdCBvZiB0aGUgc2NyZWVuLiBOb3RlIHRoZSBiYXIgbGlrZSB2aWV3IGFuZCBicmVha2Rvd25zLg0KDQpUaGlzIHNlY3Rpb24gc2hvd3MgdXMgaG93IHRvIHVzZSB0YWJsZWF1IHRvIHZpc3VhbGl6ZSBkYXRhLiBUaGlzIHZpc3VhbGl6YXRpb24gb2YgZGF0YSBhbGxvd3MgdXMgdG8gc2VlIHRoZSBudW1iZXJzIGluIGEgY2xlYXIgYW5kIGNvbmNpc2Ugd2F5LiBCeSBjcmF0aW5nIGdyYXBocyBhbmQgY2hhcnRzLCB3ZSBjYW4gYW5zd2VyIHRoZSBxdWVzdGlvbnMgc3RhdGVkIGJlbG93LiANCg0KDQoNCiogV2hhdCBkZXBhcnRtZW50ICdiaW4nIGhhcyB0aGUgaGlnaGVzdCBjb3VudD8gV2hhdCBpcyB0aGUgY291bnQ/IA0KRGVwYXJ0bWVudCBvZiBQVWJsaWMgV29ya3MgaGFzIHRoZSBoaWdoZXN0IGNvdW50IGFuZCBpdCBpcyA1LDUyMy4NCiogRnJvbSB0aGUgdXBwZXIgcmlnaHQgY29ybmVyIG9mIHRoZSBzY3JlZW4gc2VsZWN0IG90aGVyIHZpZXdzIChzZWxlY3Qgb25lIG9mIHRoZSBvdGhlciB2aWV3cywgdGFsayBhYm91dCBpdCBhbmQgcG9zdCBhbiBzY3JlZW5zaG90KQ0KVGhlIHBpZSBjaGFydCBzaG93cyB0aGUgc2FtZSBpbmZvcm1hdGlvbiwgYnV0IGl0IGlzIG11Y2ggaGFyZGVyIHRvIHJlYWQgYmVjYXVzZSB0aGVyZSBhcmUgc28gbWFueSAicGllY2VzIiB0byB0aGUgcGllLiBZb3UgY2FuIGdvIGFyb3VuZCBlYWNoIHBpZWNlIGFuZCByZWFkIGhvdyBtYW55IGVhY2ggY2F0ZWdvcnkgaGFzLCBidXQgaXQgc3RpbGwgaXNudCB0aGUgYmVzdCB2aWV3LiANCg0KIVtdKGltZ3MvU2hlZXQgMS5wbmcpDQoNCmAjIENoYW5nZSB0aGUgaW1hZ2UgZm9yIHlvdXIgc2NyZWVuc2hvdHMgYW5kIE1BS0UgQ09NTUVOVFNgDQoNCjUuIENyZWF0ZSBhIG5ldyBzaGVldCBieSBjbGlja2luZyBvbiB0aGUgaWNvbiBuZXh0IHRvIHlvdXIgY3VycmVudCBzaGVldC4NCg0KIVtdKGltZ3MvdGFibGVhdV9uZXdzaGVldC5wbmcpDQoNClRoZW4gRE9VQkxFIGNsaWNrIG9uICdOdW1iZXIgb2YgUmVjb3JkcycgdmFyaWFibGUgdGhlbiBET1VCTEUgY2xpY2sgb24gJ1ZlbmRvci5aaXAnLCB0aGVuIG9uIHRoZSB0b3AgbGVmdCBzZWxlY3QgdGhlIHJlY29tbWVuZCB2aWV3LiANCg0KKiBXaGF0IGFyZSB0aGUgaGlnaGxpZ2h0cyBvbiB0aGUgbWFwPw0KVGhlIGxhcmdlc3QgY29uY2VudHJhdGlvbnMgb2YgcmVjb3JkcyBpbiB0ZXJtcyBvZiB6aXBjb2RlcyBhcHBlYXIgaW4gVGV4YXMsIElvd2EsIGFuZCBMb3Vpc2lhbmEuIFRoZXNlIHppcCBjb2RlcyBhcmUgNzg2ODIgd2l0aCAxMzM1IHJlY29yZHMsIDUyNzYxIHdpdGggOTY3LCBhbmQgNzA3MjYgd2l0aCAxNzcgcmVjb3Jkcy4gQWxsIG90aGVyIHBsYWNlcyBvbiB0aGUgbWFwIGhhdmUgZmFpcmx5IGxvdyBhbW91bnRzIG9mIHJlY29yZHMsIHRob3VnaCB5b3UgY2FuIHNlZSB3aGVyZSBzb21lIHJlY29yZHMgYXJlLiANCiogQ2FuIHlvdSBnaXZlIGFuIGV4cGxhbmF0aW9uIG9mIHdoeSB0aGVyZSBpcyBhIGNvbmNlbnRyYXRpb24gb24gYSBwYXJ0aWN1bGFyIHJlZ2lvbj8NClBlb3BsZSBpbiBhIHBhcnRpY3VsYXIgcmVnaW9uIG1pZ2h0IGhhdmUgYSBjb25zb2xpZGF0ZWQgYW1vdW50IG9mIHJlY29yZHMgYmVjYXN1ZSB0aGV5IGFyZSBhbGwgdXNpbmcgdGhlIHNhbWUgdGF4IHBsYW4uIFRoZXkgYWxzbyBtaWdodCBoYXZlIG1vdmVkIGZyb20gSWxsaW5vaXMuIA0KDQogICFbXShpbWdzL1NoZWV0IDIzLnBuZykNCiAgDQoNCg0K