Hw. 4

Author

R. Luttinen

Published

February 28, 2023

Geocoding

Part 1. WIC services

#open packages
#download dataset
library(censusxy)
library(readr)
add<-read.csv("C:/Users/rlutt/OneDrive/Spring 2022/GIS data_wic.csv")
#view data
head(add)
         Source       Date Obsolescence.Date
1 AtoZDatabases 02/23/2023        08/23/2023
2 AtoZDatabases 02/23/2023        08/23/2023
3 AtoZDatabases 02/23/2023        08/23/2023
4 AtoZDatabases 02/23/2023        08/23/2023
5 AtoZDatabases 02/23/2023        08/23/2023
6 AtoZDatabases 02/23/2023        08/23/2023
                               Business.Name                     Legal.Name
1                         Executive Profiles                               
2                  Methodist Hospital Texsan                               
3 Central Cardiovascular Inst of San Antonio Central Cardiovascular-San Ant
4                   Texas Diabetes Institute                               
5               Community First Health Plans                               
6                                  Boys Town            Boys Town Texas Inc
              Physical.Address Physical.Address.Number Physical.Pre.Direction
1               419 S Main Ave                     419                      S
2         6700 W Interstate 10                    6700                      W
3 6800 W Interstate 10 Ste 200                    6800                      W
4               527 N Leona St                     527                      N
5    1410 Guadalupe St Ste 222                    1410                       
6               503 Urban Loop                     503                       
  Physical.Address.Name Physical.Address.Suffix Physical.Post.Direction
1                  Main                     Ave                      NA
2            Interstate                                              NA
3            Interstate                                              NA
4                 Leona                      St                      NA
5             Guadalupe                      St                      NA
6                 Urban                    Loop                      NA
  Physical.City Physical.State Physical.ZIP Physical.ZIP.4 Key.Executive.Name
1   San Antonio             TX        78204             NA     Fred Hernandez
2   San Antonio             TX        78201           2009        Amanda Wood
3   San Antonio             TX        78201           2041        Evelyn Sosa
4   San Antonio             TX        78207             NA   Roberta Washburn
5   San Antonio             TX        78207           5526     Stephen Bishop
6   San Antonio             TX        78204           3115         Janie Cook
  First.Name Middle.Initial Last.Name             Title Gender
1       Fred              Z Hernandez             Owner   Male
2     Amanda                     Wood Executive Officer   Male
3     Evelyn                     Sosa Executive Officer Female
4    Roberta                 Washburn    Other Contacts Female
5    Stephen                   Bishop           Manager   Male
6      Janie                     Cook Executive Officer Female
  Location.Employee.Size Corporate.Employee.Size Revenue...Yr
1                  2,613                          $94,483,000
2                    300                   2,575  $34,836,000
3                    165                          $10,467,000
4                    200                           $6,381,000
5                    167                           $6,163,000
6                     25                   3,536   $1,996,000
               Mailing.Address Mailing.Address.Number Mailing.Pre.Direction
1                                                  NA                      
2         6700 W Interstate 10                   6700                     W
3 6800 W Interstate 10 Ste 200                   6800                     W
4                                                  NA                      
5    1410 Guadalupe St Ste 222                   1410                      
6               503 Urban Loop                    503                      
  Mailing.Address.Name Mailing.Address.Suffix Mailing.Post.Direction
1                                                                 NA
2           Interstate                                            NA
3           Interstate                                            NA
4                                                                 NA
5            Guadalupe                     St                     NA
6                Urban                   Loop                     NA
  Mailing.City Mailing.State Mailing.ZIP Mailing.ZIP.4          Phone
1                                     NA            NA (210) 227-2707
2  San Antonio            TX       78201          2009 (210) 736-6700
3  San Antonio            TX       78201          2041 (210) 271-3203
4                                     NA            NA (210) 358-3757
5  San Antonio            TX       78207          5526 (210) 227-2347
6  San Antonio            TX       78204          3115 (210) 271-1010
             Fax      Toll.Free County.Name County.Population
1 (210) 225-7751            N/A       Bexar   500,000 or more
2            N/A            N/A       Bexar   500,000 or more
3            N/A            N/A       Bexar   500,000 or more
4 (210) 358-7406            N/A       Bexar   500,000 or more
5 (210) 358-6170 (800) 434-2347       Bexar   500,000 or more
6 (210) 271-3333            N/A       Bexar   500,000 or more
                     Metro.Area Latitude Longitude EIN
1 San Antonio-New Braunfels, TX 29.42071 -98.49487  NA
2 San Antonio-New Braunfels, TX 29.49032 -98.54667  NA
3 San Antonio-New Braunfels, TX 29.49050 -98.54756  NA
4 San Antonio-New Braunfels, TX 29.43179 -98.50210  NA
5 San Antonio-New Braunfels, TX 29.41829 -98.51601  NA
6 San Antonio-New Braunfels, TX 29.42086 -98.50099  NA
             Main.Line.of.Business Location.Type Importer.or.Exporter
1 Counselors & Counseling Services                                 NA
2                        Hospitals        Branch                   NA
3            Physicians & Surgeons                                 NA
4     Diabetes Information Centers                                 NA
5 Health Maintenance Organizations                                 NA
6  Rehabilitation Treatment Center        Branch                   NA
  Manufacturer Primary.SIC          Primary.SIC.Description   SIC02
1           No     8322002 Counselors & Counseling Services      NA
2           No     8062001                        Hospitals 8011001
3           No     8011001            Physicians & Surgeons 8322124
4           No     8322077     Diabetes Information Centers      NA
5           No     8099023 Health Maintenance Organizations 6324001
6           No     8093002  Rehabilitation Treatment Center 8322002
                           SIC02.Description   SIC03
1                                                 NA
2                      Physicians & Surgeons 8049001
3      Heart Disease Information & Treatment 8011161
4                                                 NA
5 Hospital & Medical Insurance Plan Carriers 8322090
6           Counselors & Counseling Services 8361012
                                SIC03.Description   SIC04
1                                                      NA
2                            Health Practitioners 8322008
3                               Internal Medicine 8011219
4                                                      NA
5 Health Programs Information & Referral Services 6324006
6                                     Group Homes      NA
               SIC04.Description   SIC05      SIC05.Description   SIC06
1                                     NA                             NA
2        Rehabilitation Services 8011161      Internal Medicine 8011141
3                     Pediatrics 8011115 Cardiovascular Disease 8011162
4                                     NA                             NA
5 Health Insurance Plan Carriers      NA                             NA
6                                     NA                             NA
          SIC06.Description   SIC07    SIC07.Description   SIC08
1                                NA                           NA
2        Emergency Medicine 8011189   Orthopedic Surgery 8011140
3 Interventional Cardiology 8011197 Pediatric Cardiology      NA
4                                NA                           NA
5                                NA                           NA
6                                NA                           NA
           SIC08.Description   SIC09 SIC09.Description   SIC10
1                                 NA                        NA
2 Emergency Medical Services 8049097           Therapy 8011190
3                                 NA                        NA
4                                 NA                        NA
5                                 NA                        NA
6                                 NA                        NA
                SIC10.Description NAICS.1
1                                  624190
2 Orthopedic Surgery of the Spine  622110
3                                  621111
4                                  624190
5                                  621491
6                                  621498
                                       NAICS.1.Description NAICS.2
1                     Other Individual and Family Services      NA
2                   General Medical and Surgical Hospitals  621111
3 Offices of Physicians (except Mental Health Specialists)  624190
4                     Other Individual and Family Services      NA
5                                      HMO Medical Centers  524114
6                        All Other Outpatient Care Centers  624190
                                       NAICS.2.Description NAICS.3
1                                                               NA
2 Offices of Physicians (except Mental Health Specialists)  621399
3                     Other Individual and Family Services      NA
4                                                               NA
5             Direct Health and Medical Insurance Carriers  624190
6                     Other Individual and Family Services  623220
                                       NAICS.3.Description NAICS.4
1                                                               NA
2  Offices of All Other Miscellaneous Health Practitioners  624190
3                                                               NA
4                                                               NA
5                     Other Individual and Family Services      NA
6 Residential Mental Health and Substance Abuse Facilities      NA
                   NAICS.4.Description NAICS.5 NAICS.5.Description NAICS.6
1                                           NA                          NA
2 Other Individual and Family Services      NA                          NA
3                                           NA                          NA
4                                           NA                          NA
5                                           NA                          NA
6                                           NA                          NA
  NAICS.6.Description NAICS.7 NAICS.7.Description NAICS.8 NAICS.8.Description
1                          NA                  NA      NA                  NA
2                          NA                  NA      NA                  NA
3                          NA                  NA      NA                  NA
4                          NA                  NA      NA                  NA
5                          NA                  NA      NA                  NA
6                          NA                  NA      NA                  NA
  NAICS.9 NAICS.9.Description NAICS.10 NAICS.10.Description Non.Profit
1      NA                  NA       NA                   NA         No
2      NA                  NA       NA                   NA         No
3      NA                  NA       NA                   NA         No
4      NA                  NA       NA                   NA         No
5      NA                  NA       NA                   NA         No
6      NA                  NA       NA                   NA         No
  Number.of.PCs Public...Private Small.Business   Square.Footage
1   500 or more          Private             No   50,000 or more
2   500 or more          Private             No   50,000 or more
3    100 to 499          Private             No 10,000 to 49,999
4    100 to 499          Private             No 10,000 to 49,999
5    100 to 499          Private             No 10,000 to 49,999
6      25 to 99          Private             No   5,000 to 9,999
                         Website Women.Owned Year.Established Ticker.Symbol
1             www.sanantonio.gov         Yes             2001            NA
2               www.sahealth.com          No             1988            NA
3                                         No             2011            NA
4 www.universityhealthsystem.com          No             2010            NA
5                   www.cfhp.com          No             2004            NA
6               www.boystown.org          No             1917            NA
  Stock.Exchange Fortune.1000.Ranking Credit.Score X2021.Revenue.Yr
1             NA                   NA            0           984000
2             NA                   NA            0         34836000
3             NA                   NA            0         10467000
4             NA                   NA            0          6381000
5             NA                   NA            0          6163000
6             NA                   NA            0          1996000
  X2020.Revenue.Yr X2019.Revenue.Yr X2018.Revenue.Yr X2020...Sales.Growth
1           132909           132909           132909                  640
2         50276772         50276772         51785075                  -31
3         30281351         30281351         30097828                  -65
4         13290914         13290914         13623187                  -52
5         23557630         23557630         24827202                  -74
6          3526591          3526591          2821273                  -43
  X2019...Sales.Growth X2018...Sales.Growth X2021.Employees X2020.Employees
1                    0                    0              16               2
2                    0                   -3             300             300
3                    0                    1             165             165
4                    0                   -2             200             200
5                    0                   -5             167             167
6                    0                   25              25              25
  X2019.Employees X2018.Employees X2020...Employee.Growth
1               2               2                     700
2             300             309                       0
3             165             164                       0
4             200             205                       0
5             167             176                       0
6              25              20                       0
  X2019...Employee.Growth X2018...Employee.Growth Executive.First.Name.1
1                       0                       0                   Fred
2                       0                      -3                 Amanda
3                       0                       1                 Evelyn
4                       0                      -2                Roberta
5                       0                      -5                Stephen
6                       0                      25                  Janie
  Executive.Last.Name.1 Executive.Title.1 Executive.Gender.1
1             Hernandez             Owner               Male
2                  Wood Executive Officer               Male
3                  Sosa Executive Officer             Female
4              Washburn    Other Contacts             Female
5                Bishop           Manager               Male
6                  Cook Executive Officer             Female
       Executive.Department.1 Executive.First.Name.2 Executive.Last.Name.2
1 Administration & Operations                Richard                Oliver
2 Administration & Operations                  Suraj                 Maraj
3        Accounting & Finance                  Steve                Burton
4            Health & Medical                                             
5      Information Technology                                             
6 Administration & Operations                                             
  Executive.Title.2 Executive.Gender.2      Executive.Department.2
1           Manager               Male Administration & Operations
2 Executive Officer               Male Administration & Operations
3           Manager               Male      Information Technology
4                                                             <NA>
5                                                             <NA>
6                                                             <NA>
  Executive.First.Name.3 Executive.Last.Name.3 Executive.Title.3
1                 Martha             Gutierrez           Manager
2                  Janet                 Mirza Executive Officer
3                 Debbie                 Gibbs           Manager
4                                                               
5                                                               
6                                                               
  Executive.Gender.3      Executive.Department.3 Executive.First.Name.4
1             Female             Human Resources               Victoria
2             Female Administration & Operations                       
3             Female             Human Resources                  Linda
4                                           <NA>                       
5                                           <NA>                       
6                                           <NA>                       
  Executive.Last.Name.4 Executive.Title.4 Executive.Gender.4
1             Shoemaker           Manager             Female
2                                                           
3               Sherman           Manager             Female
4                                                           
5                                                           
6                                                           
       Executive.Department.4 Executive.First.Name.5 Executive.Last.Name.5
1 Administration & Operations                 Marcel               Lemelle
2                        <NA>                                             
3                  Purchasing                                             
4                        <NA>                                             
5                        <NA>                                             
6                        <NA>                                             
  Executive.Title.5 Executive.Gender.5 Executive.Department.5
1    Other Contacts               Male                  Legal
2                                                        <NA>
3                                                        <NA>
4                                                        <NA>
5                                                        <NA>
6                                                        <NA>
  Executive.First.Name.6 Executive.Last.Name.6 Executive.Title.6
1                                                               
2                                                               
3                                                               
4                                                               
5                                                               
6                                                               
  Executive.Gender.6 Executive.Department.6 Executive.First.Name.7
1                                      <NA>                       
2                                      <NA>                       
3                                      <NA>                       
4                                      <NA>                       
5                                      <NA>                       
6                                      <NA>                       
  Executive.Last.Name.7 Executive.Title.7 Executive.Gender.7
1                                                           
2                                                           
3                                                           
4                                                           
5                                                           
6                                                           
  Executive.Department.7 Executive.First.Name.8 Executive.Last.Name.8
1                   <NA>                                             
2                   <NA>                                             
3                   <NA>                                             
4                   <NA>                                             
5                   <NA>                                             
6                   <NA>                                             
  Executive.Title.8 Executive.Gender.8 Executive.Department.8
1                                                        <NA>
2                                                        <NA>
3                                                        <NA>
4                                                        <NA>
5                                                        <NA>
6                                                        <NA>
  Executive.First.Name.9 Executive.Last.Name.9 Executive.Title.9
1                                                               
2                                                               
3                                                               
4                                                               
5                                                               
6                                                               
  Executive.Gender.9 Executive.Department.9 Executive.First.Name.10
1                                      <NA>                      NA
2                                      <NA>                      NA
3                                      <NA>                      NA
4                                      <NA>                      NA
5                                      <NA>                      NA
6                                      <NA>                      NA
  Executive.Last.Name.10 Executive.Title.10 Executive.Gender.10
1                     NA                 NA                  NA
2                     NA                 NA                  NA
3                     NA                 NA                  NA
4                     NA                 NA                  NA
5                     NA                 NA                  NA
6                     NA                 NA                  NA
  Executive.Department.10 Executive.First.Name.11 Executive.Last.Name.11
1                      NA                      NA                     NA
2                      NA                      NA                     NA
3                      NA                      NA                     NA
4                      NA                      NA                     NA
5                      NA                      NA                     NA
6                      NA                      NA                     NA
  Executive.Title.11 Executive.Gender.11 Executive.Department.11
1                 NA                  NA                      NA
2                 NA                  NA                      NA
3                 NA                  NA                      NA
4                 NA                  NA                      NA
5                 NA                  NA                      NA
6                 NA                  NA                      NA
  Executive.First.Name.12 Executive.Last.Name.12 Executive.Title.12
1                      NA                     NA                 NA
2                      NA                     NA                 NA
3                      NA                     NA                 NA
4                      NA                     NA                 NA
5                      NA                     NA                 NA
6                      NA                     NA                 NA
  Executive.Gender.12 Executive.Department.12 Executive.First.Name.13
1                  NA                      NA                      NA
2                  NA                      NA                      NA
3                  NA                      NA                      NA
4                  NA                      NA                      NA
5                  NA                      NA                      NA
6                  NA                      NA                      NA
  Executive.Last.Name.13 Executive.Title.13 Executive.Gender.13
1                     NA                 NA                  NA
2                     NA                 NA                  NA
3                     NA                 NA                  NA
4                     NA                 NA                  NA
5                     NA                 NA                  NA
6                     NA                 NA                  NA
  Executive.Department.13 Executive.First.Name.14 Executive.Last.Name.14
1                      NA                      NA                     NA
2                      NA                      NA                     NA
3                      NA                      NA                     NA
4                      NA                      NA                     NA
5                      NA                      NA                     NA
6                      NA                      NA                     NA
  Executive.Title.14 Executive.Gender.14 Executive.Department.14
1                 NA                  NA                      NA
2                 NA                  NA                      NA
3                 NA                  NA                      NA
4                 NA                  NA                      NA
5                 NA                  NA                      NA
6                 NA                  NA                      NA
  Executive.First.Name.15 Executive.Last.Name.15 Executive.Title.15
1                      NA                     NA                 NA
2                      NA                     NA                 NA
3                      NA                     NA                 NA
4                      NA                     NA                 NA
5                      NA                     NA                 NA
6                      NA                     NA                 NA
  Executive.Gender.15 Executive.Department.15 Executive.First.Name.16
1                  NA                      NA                      NA
2                  NA                      NA                      NA
3                  NA                      NA                      NA
4                  NA                      NA                      NA
5                  NA                      NA                      NA
6                  NA                      NA                      NA
  Executive.Last.Name.16 Executive.Title.16 Executive.Gender.16
1                     NA                 NA                  NA
2                     NA                 NA                  NA
3                     NA                 NA                  NA
4                     NA                 NA                  NA
5                     NA                 NA                  NA
6                     NA                 NA                  NA
  Executive.Department.16 Executive.First.Name.17 Executive.Last.Name.17
1                      NA                      NA                     NA
2                      NA                      NA                     NA
3                      NA                      NA                     NA
4                      NA                      NA                     NA
5                      NA                      NA                     NA
6                      NA                      NA                     NA
  Executive.Title.17 Executive.Gender.17 Executive.Department.17
1                 NA                  NA                      NA
2                 NA                  NA                      NA
3                 NA                  NA                      NA
4                 NA                  NA                      NA
5                 NA                  NA                      NA
6                 NA                  NA                      NA
  Executive.First.Name.18 Executive.Last.Name.18 Executive.Title.18
1                      NA                     NA                 NA
2                      NA                     NA                 NA
3                      NA                     NA                 NA
4                      NA                     NA                 NA
5                      NA                     NA                 NA
6                      NA                     NA                 NA
  Executive.Gender.18 Executive.Department.18 Executive.First.Name.19
1                  NA                      NA                      NA
2                  NA                      NA                      NA
3                  NA                      NA                      NA
4                  NA                      NA                      NA
5                  NA                      NA                      NA
6                  NA                      NA                      NA
  Executive.Last.Name.19 Executive.Title.19 Executive.Gender.19
1                     NA                 NA                  NA
2                     NA                 NA                  NA
3                     NA                 NA                  NA
4                     NA                 NA                  NA
5                     NA                 NA                  NA
6                     NA                 NA                  NA
  Executive.Department.19 Executive.First.Name.20 Executive.Last.Name.20
1                      NA                      NA                     NA
2                      NA                      NA                     NA
3                      NA                      NA                     NA
4                      NA                      NA                     NA
5                      NA                      NA                     NA
6                      NA                      NA                     NA
  Executive.Title.20 Executive.Gender.20 Executive.Department.20
1                 NA                  NA                      NA
2                 NA                  NA                      NA
3                 NA                  NA                      NA
4                 NA                  NA                      NA
5                 NA                  NA                      NA
6                 NA                  NA                      NA
  Est..Accounting.Annual.Expense Est..Advertising.Annual.Expense
1               $100,000 or more                                
2               $100,000 or more                                
3               $100,000 or more                                
4               $100,000 or more                                
5               $100,000 or more                                
6              $5,000 to $24,999                                
  Est..Business.Insurance.Annual.Expense Est..Legal.Annual.Expense
1                       $100,000 or more                          
2                       $100,000 or more                          
3                       $100,000 or more                          
4                       $100,000 or more                          
5                       $100,000 or more                          
6                     $20,000 to $49,999                          
  Est..Office.Equipment.Annual.Expense Est..Rent.Annual.Expense
1                     $100,000 or more         $100,000 or more
2                     $100,000 or more         $100,000 or more
3                     $100,000 or more         $100,000 or more
4                     $100,000 or more         $100,000 or more
5                     $100,000 or more         $100,000 or more
6                   $25,000 to $99,999       $25,000 to $99,999
  Est..Technology.Annual.Expense Est..Telecom.Annual.Expense
1               $100,000 or more            $100,000 or more
2               $100,000 or more            $100,000 or more
3               $100,000 or more          $25,000 to $99,999
4               $100,000 or more            $100,000 or more
5               $100,000 or more          $25,000 to $99,999
6             $25,000 to $99,999          $10,000 to $24,999
  Est..Utilities.Annual.Expense      AtoZ.ID Home.Based.Business Franchise.Type
1              $100,000 or more 1.113254e+13                  No               
2              $100,000 or more 1.113255e+13                  No               
3              $100,000 or more 1.113255e+13                  No               
4              $100,000 or more 1.113255e+13                  No               
5              $100,000 or more 1.113255e+13                  No               
6            $20,000 to $49,999 1.113255e+13                  No Chain Location
  Holding.Parent.Name      Source.1
1                  NA AtoZDatabases
2                  NA AtoZDatabases
3                  NA AtoZDatabases
4                  NA AtoZDatabases
5                  NA AtoZDatabases
6                  NA AtoZDatabases
#cut data down to what is necessary
addr<-add[c(6, 12:14)]
names(addr)<-c("street", "city", "st", "zip")
head(addr)
                        street        city st   zip
1               419 S Main Ave San Antonio TX 78204
2         6700 W Interstate 10 San Antonio TX 78201
3 6800 W Interstate 10 Ste 200 San Antonio TX 78201
4               527 N Leona St San Antonio TX 78207
5    1410 Guadalupe St Ste 222 San Antonio TX 78207
6               503 Urban Loop San Antonio TX 78204

The echo: false option disables the printing of code (only output is displayed).

library(censusxy)
results<-cxy_geocode(addr,
                     street = "street",
                     city = "city",
                     state ="st",
                     zip = "zip",
                     class="sf",
                     output = "simple")
5 rows removed to create an sf object. These were addresses that the geocoder could not match.

WIC services map

Author: R. Luttinen

Data Source: U.S. Census Bureau and atozdatabases.com

#basic map

library(mapview)
mapview(results, layer.name="WIC Services")
#longitude and latitude

library(sf)
Linking to GEOS 3.9.3, GDAL 3.5.2, PROJ 8.2.1; sf_use_s2() is TRUE
library(dplyr)

Attaching package: 'dplyr'
The following objects are masked from 'package:stats':

    filter, lag
The following objects are masked from 'package:base':

    intersect, setdiff, setequal, union
addLL<-read.csv("C:/Users/rlutt/OneDrive/Spring 2022/GIS data_wic.csv")
resultsWIC <- st_as_sf(addLL, coords=c("Longitude", "Latitude"), crs=4269,agr="constant")
resultsWIC.proj<-st_transform(resultsWIC,
                           crs = 2278)

WIC services map w/ Longitude and Latitude

Author: R. Luttinen

Data Source: U.S. Census Bureau and atozdatabases.com

#map with longitude and latitutde

mapview(resultsWIC.proj)

Part 2. Grocery Stores

#read in data for grocery stores

groc<-read.csv("C:/Users/rlutt/OneDrive/Spring 2022/GIS_groc (1).csv")
#vie data
head(groc)
         Source      Date Obsolescence.Date       Business.Name     Legal.Name
1 AtoZDatabases 2/28/2023         8/28/2023       Surlean Foods               
2 AtoZDatabases 2/28/2023         8/28/2023        Super Target               
3 AtoZDatabases 2/28/2023         8/28/2023       Pico De Gallo               
4 AtoZDatabases 2/28/2023         8/28/2023              Target Target Optical
5 AtoZDatabases 2/28/2023         8/28/2023            H-E-B LP               
6 AtoZDatabases 2/28/2023         8/28/2023 Balcones Food Store               
        Physical.Address Physical.Address.Number Physical.Pre.Direction
1      1545 S San Marcos                    1545                      S
2 4522 Fredericksburg Rd                    4522                       
3         111 S Leona St                     111                      S
4 4522 Fredericksburg Rd                    4522                       
5 3485 Fredericksburg Rd                    3485                       
6      3309 Hillcrest Dr                    3309                       
  Physical.Address.Name Physical.Address.Suffix Physical.Post.Direction
1            San Marcos                                              NA
2            Fredericks                      Rd                      NA
3                 Leona                      St                      NA
4            Fredericks                      Rd                      NA
5            Fredericks                      Rd                      NA
6             Hillcrest                      Dr                      NA
  Physical.City Physical.State Physical.ZIP Physical.ZIP.4 Key.Executive.Name
1   San Antonio             TX        78207           7033        Daryl Scott
2   San Antonio             TX        78201           6521         Reba Jolly
3   San Antonio             TX        78207           4417       Ruben Cortez
4   San Antonio             TX        78201           6521        Jose Deleon
5   San Antonio             TX        78201           3848     Pamela Oconnor
6   San Antonio             TX        78201           7045                   
  First.Name Middle.Initial Last.Name                   Title  Gender
1      Daryl                    Scott Chief Executive Officer    Male
2       Reba                    Jolly       Executive Officer  Female
3      Ruben                   Cortez               President    Male
4       Jose                   Deleon          Office Manager Unknown
5     Pamela        Mathews   Oconnor              Controller  Female
6                                                                    
  Location.Employee.Size Corporate.Employee.Size Revenue...Yr
1                    308                     308 $18,205,000 
2                    115                 450,000  $8,436,000 
3                    167                     699  $6,511,000 
4                     30                 450,000  $3,089,000 
5                     40                  45,000  $3,038,000 
6                     40                          $2,734,000 
         Mailing.Address Mailing.Address.Number Mailing.Pre.Direction
1          PO Box 831449                 831449                      
2 4522 Fredericksburg Rd                   4522                      
3         111 S Leona St                    111                     S
4 4522 Fredericksburg Rd                   4522                      
5 3485 Fredericksburg Rd                   3485                      
6      3309 Hillcrest Dr                   3309                      
  Mailing.Address.Name Mailing.Address.Suffix Mailing.Post.Direction
1               PO Box                                            NA
2           Fredericks                     Rd                     NA
3                Leona                     St                     NA
4           Fredericks                     Rd                     NA
5           Fredericks                     Rd                     NA
6            Hillcrest                     Dr                     NA
  Mailing.City Mailing.State Mailing.ZIP Mailing.ZIP.4          Phone
1  San Antonio            TX       78283          1449 (210) 227-4370
2  San Antonio            TX       78201          6521 (210) 280-0000
3  San Antonio            TX       78207          4417 (210) 225-6060
4  San Antonio            TX       78201          6521 (210) 280-0003
5  San Antonio            TX       78201          3848 (210) 731-6168
6  San Antonio            TX       78201          7045 (210) 437-0008
             Fax      Toll.Free County.Name County.Population
1 (210) 226-4208            N/A       Bexar   500,000 or more
2            N/A (800) 440-0680       Bexar   500,000 or more
3 (210) 225-7344            N/A       Bexar   500,000 or more
4            N/A (800) 440-0680       Bexar   500,000 or more
5            N/A (800) 432-3113       Bexar   500,000 or more
6            N/A            N/A       Bexar   500,000 or more
                     Metro.Area Latitude Longitude EIN Main.Line.of.Business
1 San Antonio-New Braunfels, TX 29.41095 -98.51111  NA          Supermarkets
2 San Antonio-New Braunfels, TX 29.49166 -98.55085  NA     Department Stores
3 San Antonio-New Braunfels, TX 29.42542 -98.50283  NA           Restaurants
4 San Antonio-New Braunfels, TX 29.49166 -98.55085  NA     Department Stores
5 San Antonio-New Braunfels, TX 29.47547 -98.53889  NA        Grocery Stores
6 San Antonio-New Braunfels, TX 29.49173 -98.55468  NA        Grocery Stores
  Location.Type Importer.or.Exporter Manufacturer Primary.SIC
1                                 NA          Yes     5411003
2        Branch                   NA           No     5311001
3        Branch                   NA           No     5812001
4        Branch                   NA           No     5311001
5        Branch                   NA           No     5411001
6                                 NA           No     5411001
  Primary.SIC.Description   SIC02           SIC02.Description   SIC03
1            Supermarkets 5499001            Misc Food Stores 5421002
2       Department Stores 5411001              Grocery Stores 5812020
3             Restaurants 5411001              Grocery Stores 5812006
4       Department Stores 5712001            Furniture Stores 5411001
5          Grocery Stores 5912005 Health Care Products Stores 5963037
6          Grocery Stores      NA                                  NA
   SIC03.Description   SIC04                         SIC04.Description   SIC05
1       Meat Markets 2013001 Sausages & Other Prepared Meat Production      NA
2      Delicatessens 5461001                                  Bakeries 5912003
3           Caterers 5812011                       Mexican Restaurants 5411020
4     Grocery Stores 5331001                            Variety Stores 5912003
5 Household Products 5441001        Candy, Nut, & Confectionery Stores 5431001
6                         NA                                                NA
          SIC05.Description   SIC06               SIC06.Description   SIC07
1                                NA                                      NA
2               Drug Stores 5963037              Household Products 5912005
3     Ethnic Grocery Stores      NA                                      NA
4               Drug Stores 5941001 Sporting Goods & Bicycle Stores 5731001
5 Fruit & Vegetable Markets 5451001           Dairy Products Stores 5411015
6                                NA                                      NA
                                        SIC07.Description   SIC08
1                                                              NA
2                             Health Care Products Stores 7384001
3                                                              NA
4 Radio, Television, & Consumer Electronics Retail Stores 5651001
5                                            Food Markets 5461001
6                                                              NA
            SIC08.Description   SIC09           SIC09.Description   SIC10
1                                  NA                                  NA
2 Photofinishing Laboratories 5999005    Pet Food & Supply Stores 5712001
3                                  NA                                  NA
4      Family Clothing Stores 5912005 Health Care Products Stores      NA
5                    Bakeries 5912003                 Drug Stores 5411003
6                                  NA                                  NA
  SIC10.Description NAICS.1
1                    445110
2  Furniture Stores  455110
3                    722511
4                    455110
5      Supermarkets  445110
6                    445110
                                         NAICS.1.Description NAICS.2
1 Supermarkets and Other Grocery (except Convenience) Stores  445298
2                                          Department Stores  445110
3                                   Full-Service Restaurants  445110
4                                          Department Stores  449110
5 Supermarkets and Other Grocery (except Convenience) Stores  459999
6 Supermarkets and Other Grocery (except Convenience) Stores      NA
                                         NAICS.2.Description NAICS.3
1                         All Other Specialty Food Retailers  445240
2 Supermarkets and Other Grocery (except Convenience) Stores  722513
3 Supermarkets and Other Grocery (except Convenience) Stores  722320
4                                        Furniture Retailers  445110
5                          All Other Miscellaneous Retailers  445292
6                                                                 NA
                                         NAICS.3.Description NAICS.4
1                                             Meat Retailers  311612
2                                Limited-Service Restaurants  311811
3                                                   Caterers      NA
4 Supermarkets and Other Grocery (except Convenience) Stores  455219
5                               Confectionery and Nut Stores  445230
6                                                                 NA
                      NAICS.4.Description NAICS.5
1           Meat Processed from Carcasses      NA
2                         Retail Bakeries  456110
3                                              NA
4 All Other General Merchandise Retailers  456110
5             Fruit and Vegetable Markets  445298
6                                              NA
                 NAICS.5.Description NAICS.6               NAICS.6.Description
1                                         NA                                  
2      Pharmacies and Drug Retailers  459999 All Other Miscellaneous Retailers
3                                         NA                                  
4      Pharmacies and Drug Retailers  459110          Sporting Goods Retailers
5 All Other Specialty Food Retailers  311811                   Retail Bakeries
6                                         NA                                  
  NAICS.7                           NAICS.7.Description NAICS.8
1      NA                                                    NA
2  812921 Photofinishing Laboratories (except One-Hour)  459910
3      NA                                                    NA
4  449210           Electronics and Appliance Retailers  458110
5  456110                 Pharmacies and Drug Retailers      NA
6      NA                                                    NA
                          NAICS.8.Description NAICS.9 NAICS.9.Description
1                                                  NA                    
2              Pet and Pet Supplies Retailers  449110 Furniture Retailers
3                                                  NA                    
4 Clothing and Clothing Accessories Retailers      NA                    
5                                                  NA                    
6                                                  NA                    
  NAICS.10 NAICS.10.Description Non.Profit Number.of.PCs Public...Private
1       NA                   NA         No    100 to 499          Private
2       NA                   NA         No      25 to 99           Public
3       NA                   NA         No    100 to 499          Private
4       NA                   NA         No      10 to 24           Public
5       NA                   NA         No      10 to 24          Private
6       NA                   NA         No      10 to 24          Private
  Small.Business   Square.Footage              Website Women.Owned
1             No   50,000 or more www.surleanfoods.com          No
2             No 10,000 to 49,999       www.target.com          No
3             No   50,000 or more  www.picodegallo.com          No
4             No   5,000 to 9,999       www.target.com          No
5             No 10,000 to 49,999          www.heb.com          No
6            Yes 10,000 to 49,999                               No
  Year.Established Ticker.Symbol Stock.Exchange Fortune.1000.Ranking
1             1984            NA             NA                   NA
2             1902            NA             NA                   NA
3             1941            NA             NA                   NA
4             1902            NA             NA                   NA
5             1905            NA             NA                   NA
6             2019            NA             NA                   NA
  Credit.Score X2022.Revenue.Yr X2021.Revenue.Yr X2020.Revenue.Yr
1          100         18205000         67120053         67120053
2          100          8170000         22808258         22808258
3          100          6511000         23839382         23839382
4          100          2991000           594998           594998
5           95          3646000          8716890          8716890
6           80          3221000          3188790          3284454
  X2019.Revenue.Yr X2021...Sales.Growth X2020...Sales.Growth
1         67120053                  -73                    0
2         24791585                  -64                    0
3         22554625                  -73                    0
4           396665                  403                    0
5          8281046                  -58                    0
6                0                    1                   -3
  X2019...Sales.Growth X2022.Employees X2021.Employees X2020.Employees
1                    0             308             308             308
2                   -8             115             115             115
3                    6             167             167             167
4                   50              30              32              34
5                    5              40              40              40
6                    0              40              41              41
  X2019.Employees X2021...Employee.Growth X2020...Employee.Growth
1             308                       0                       0
2             125                       0                       0
3             158                       0                       0
4              33                      -6                      -6
5              38                       0                       0
6              NA                      -2                       0
  X2019...Employee.Growth Executive.First.Name.1 Executive.Last.Name.1
1                       0                  Daryl                 Scott
2                      -8                   Reba                 Jolly
3                       6                  Ruben                Cortez
4                       3                   Jose                Deleon
5                       5                 Pamela               Oconnor
6                       0                                             
        Executive.Title.1 Executive.Gender.1      Executive.Department.1
1 Chief Executive Officer               Male Administration & Operations
2       Executive Officer             Female Administration & Operations
3               President               Male Administration & Operations
4          Office Manager            Unknown Administration & Operations
5              Controller             Female        Accounting & Finance
6                                                                       
  Executive.First.Name.2 Executive.Last.Name.2
1                 Travis                Holmes
2                                             
3                                             
4                   Phil               Cuellar
5                                             
6                                             
                                   Executive.Title.2 Executive.Gender.2
1 Chief Technology Officer Chief Information Officer               Male
2                                                                      
3                                                                      
4                                            Manager               Male
5                                                                      
6                                                                      
       Executive.Department.2 Executive.First.Name.3 Executive.Last.Name.3
1 Administration & Operations                   Hugo             Hernandez
2                        <NA>                                             
3                        <NA>                                             
4 Administration & Operations                                             
5                        <NA>                                             
6                        <NA>                                             
  Executive.Title.3 Executive.Gender.3 Executive.Department.3
1    Superintendent               Male             Production
2                                                        <NA>
3                                                        <NA>
4                                                        <NA>
5                                                        <NA>
6                                                        <NA>
  Executive.First.Name.4 Executive.Last.Name.4 Executive.Title.4
1                   Ryan                 Scott Executive Officer
2                                                               
3                                                               
4                                                               
5                                                               
6                                                               
  Executive.Gender.4 Executive.Department.4 Executive.First.Name.5
1            Unknown             Production                   Chad
2                                      <NA>                       
3                                      <NA>                       
4                                      <NA>                       
5                                      <NA>                       
6                                      <NA>                       
  Executive.Last.Name.5 Executive.Title.5 Executive.Gender.5
1               Wilhite Executive Officer               Male
2                                                           
3                                                           
4                                                           
5                                                           
6                                                           
  Executive.Department.5 Executive.First.Name.6 Executive.Last.Name.6
1                  Sales                  Karen                  Karl
2                   <NA>                                             
3                   <NA>                                             
4                   <NA>                                             
5                   <NA>                                             
6                   <NA>                                             
  Executive.Title.6 Executive.Gender.6 Executive.Department.6
1 Executive Officer             Female                  Sales
2                                                        <NA>
3                                                        <NA>
4                                                        <NA>
5                                                        <NA>
6                                                        <NA>
  Executive.First.Name.7 Executive.Last.Name.7 Executive.Title.7
1                Melanie               Schulte Executive Officer
2                                                               
3                                                               
4                                                               
5                                                               
6                                                               
  Executive.Gender.7      Executive.Department.7 Executive.First.Name.8
1             Female Administration & Operations                  Terry
2                                           <NA>                       
3                                           <NA>                       
4                                           <NA>                       
5                                           <NA>                       
6                                           <NA>                       
  Executive.Last.Name.8 Executive.Title.8 Executive.Gender.8
1                 Black Executive Officer            Unknown
2                                                           
3                                                           
4                                                           
5                                                           
6                                                           
       Executive.Department.8 Executive.First.Name.9 Executive.Last.Name.9
1 Administration & Operations                   Bill               McKenna
2                        <NA>                                             
3                        <NA>                                             
4                        <NA>                                             
5                        <NA>                                             
6                        <NA>                                             
  Executive.Title.9 Executive.Gender.9      Executive.Department.9
1 Executive Officer               Male Administration & Operations
2                                                             <NA>
3                                                             <NA>
4                                                             <NA>
5                                                             <NA>
6                                                             <NA>
  Executive.First.Name.10 Executive.Last.Name.10 Executive.Title.10
1                  Carlos               Alvarado  Executive Officer
2                                                                  
3                                                                  
4                                                                  
5                                                                  
6                                                                  
  Executive.Gender.10 Executive.Department.10 Executive.First.Name.11
1                Male    Accounting & Finance                    Chip
2                                        <NA>                        
3                                        <NA>                        
4                                        <NA>                        
5                                        <NA>                        
6                                        <NA>                        
  Executive.Last.Name.11 Executive.Title.11 Executive.Gender.11
1                Rowland  Executive Officer                Male
2                                                              
3                                                              
4                                                              
5                                                              
6                                                              
      Executive.Department.11 Executive.First.Name.12 Executive.Last.Name.12
1 Administration & Operations                  Clancy                   Hall
2                        <NA>                                               
3                        <NA>                                               
4                        <NA>                                               
5                        <NA>                                               
6                        <NA>                                               
  Executive.Title.12 Executive.Gender.12        Executive.Department.12
1  Executive Officer                Male Strategic Planning & Business 
2                                                                  <NA>
3                                                                  <NA>
4                                                                  <NA>
5                                                                  <NA>
6                                                                  <NA>
  Executive.First.Name.13 Executive.Last.Name.13 Executive.Title.13
1                    John               Kalmbach  Executive Officer
2                                                                  
3                                                                  
4                                                                  
5                                                                  
6                                                                  
  Executive.Gender.13     Executive.Department.13 Executive.First.Name.14
1                Male Administration & Operations                  Karrie
2                                            <NA>                        
3                                            <NA>                        
4                                            <NA>                        
5                                            <NA>                        
6                                            <NA>                        
  Executive.Last.Name.14 Executive.Title.14 Executive.Gender.14
1                   Menz  Executive Officer              Female
2                                                              
3                                                              
4                                                              
5                                                              
6                                                              
      Executive.Department.14 Executive.First.Name.15 Executive.Last.Name.15
1 Administration & Operations                 Jeffrey                 Osburn
2                        <NA>                                               
3                        <NA>                                               
4                        <NA>                                               
5                        <NA>                                               
6                        <NA>                                               
  Executive.Title.15 Executive.Gender.15        Executive.Department.15
1            Manager                Male Strategic Planning & Business 
2                                                                  <NA>
3                                                                  <NA>
4                                                                  <NA>
5                                                                  <NA>
6                                                                  <NA>
  Executive.First.Name.16 Executive.Last.Name.16 Executive.Title.16
1                  Ademar                 Orozco            Manager
2                                                                  
3                                                                  
4                                                                  
5                                                                  
6                                                                  
  Executive.Gender.16        Executive.Department.16 Executive.First.Name.17
1                Male Strategic Planning & Business                   Arthur
2                                               <NA>                        
3                                               <NA>                        
4                                               <NA>                        
5                                               <NA>                        
6                                               <NA>                        
  Executive.Last.Name.17 Executive.Title.17 Executive.Gender.17
1                 Conway            Manager                Male
2                                                              
3                                                              
4                                                              
5                                                              
6                                                              
      Executive.Department.17 Executive.First.Name.18 Executive.Last.Name.18
1 Administration & Operations                   Brent               Robinson
2                        <NA>                                               
3                        <NA>                                               
4                        <NA>                                               
5                        <NA>                                               
6                        <NA>                                               
  Executive.Title.18 Executive.Gender.18     Executive.Department.18
1            Manager                Male Administration & Operations
2                                                               <NA>
3                                                               <NA>
4                                                               <NA>
5                                                               <NA>
6                                                               <NA>
  Executive.First.Name.19 Executive.Last.Name.19 Executive.Title.19
1                  Carlos                Sanchez            Manager
2                                                                  
3                                                                  
4                                                                  
5                                                                  
6                                                                  
  Executive.Gender.19 Executive.Department.19 Executive.First.Name.20
1                Male              Production                    Chad
2                                        <NA>                        
3                                        <NA>                        
4                                        <NA>                        
5                                        <NA>                        
6                                        <NA>                        
  Executive.Last.Name.20 Executive.Title.20 Executive.Gender.20
1                Briscoe            Manager                  NA
2                                                            NA
3                                                            NA
4                                                            NA
5                                                            NA
6                                                            NA
      Executive.Department.20 Est..Accounting.Annual.Expense
1 Administration & Operations               $100,000 or more
2                        <NA>             $25,000 to $99,999
3                        <NA>               $100,000 or more
4                        <NA>              $5,000 to $24,999
5                        <NA>             $25,000 to $99,999
6                        <NA>             $25,000 to $99,999
  Est..Advertising.Annual.Expense Est..Business.Insurance.Annual.Expense
1                $100,000 or more                       $100,000 or more
2                $100,000 or more                       $100,000 or more
3                $100,000 or more                       $100,000 or more
4              $25,000 to $99,999                     $20,000 to $49,999
5              $25,000 to $99,999                     $20,000 to $49,999
6              $25,000 to $99,999                     $20,000 to $49,999
  Est..Legal.Annual.Expense Est..Office.Equipment.Annual.Expense
1          $100,000 or more                     $100,000 or more
2          $100,000 or more                   $25,000 to $99,999
3          $100,000 or more                     $100,000 or more
4        $25,000 to $99,999                   $10,000 to $24,999
5        $25,000 to $99,999                   $10,000 to $24,999
6        $25,000 to $99,999                   $10,000 to $24,999
  Est..Rent.Annual.Expense Est..Technology.Annual.Expense
1         $100,000 or more               $100,000 or more
2         $100,000 or more               $100,000 or more
3         $100,000 or more               $100,000 or more
4       $25,000 to $99,999             $25,000 to $99,999
5       $25,000 to $99,999             $25,000 to $99,999
6       $25,000 to $99,999             $25,000 to $99,999
  Est..Telecom.Annual.Expense Est..Utilities.Annual.Expense     AtoZ.ID
1          $25,000 to $99,999              $100,000 or more 1.11325e+13
2          $25,000 to $99,999              $100,000 or more 1.11326e+13
3          $25,000 to $99,999              $100,000 or more 1.11325e+13
4            $5,000 to $9,999            $50,000 to $99,999 1.11326e+13
5          $10,000 to $24,999            $50,000 to $99,999 1.11400e+13
6          $10,000 to $24,999            $50,000 to $99,999 1.11400e+13
  Home.Based.Business Franchise.Type Holding.Parent.Name      Source.1
1                  No                                 NA AtoZDatabases
2                  No Chain Location                  NA AtoZDatabases
3                  No                                 NA AtoZDatabases
4                  No Chain Location                  NA AtoZDatabases
5                  No Chain Location                  NA AtoZDatabases
6                  No                                 NA AtoZDatabases
#cut data down to what is necessary
grocery<-groc[c(6, 12:14)]
names(grocery)<-c("street", "city", "st", "zip")
head(grocery)
                  street        city st   zip
1      1545 S San Marcos San Antonio TX 78207
2 4522 Fredericksburg Rd San Antonio TX 78201
3         111 S Leona St San Antonio TX 78207
4 4522 Fredericksburg Rd San Antonio TX 78201
5 3485 Fredericksburg Rd San Antonio TX 78201
6      3309 Hillcrest Dr San Antonio TX 78201
results2<-cxy_geocode(grocery,
                     street = "street",
                     city = "city",
                     state ="st",
                     zip = "zip",
                     class="sf",
                     output = "simple")
4 rows removed to create an sf object. These were addresses that the geocoder could not match.

Basic Map of grocery stores Author: R. Luttinen Data Source: U.S. Census Bureau and atozdatabases.com

#basic map

library(mapview)
mapview(results2, layer.name="grocery stores")
#longitude and latitude

library(sf)
library(dplyr)
grocLL<-read.csv("C:/Users/rlutt/OneDrive/Spring 2022/GIS_groc (1).csv")
resultsgroc <- st_as_sf(addLL, coords=c("Longitude", "Latitude"), crs=4269,agr="constant")
resultsgroc.proj<-st_transform(resultsgroc,
                           crs = 2278)

Map of grocery stores with longitude and latitude Author: R. Luttinen Data Source: U.S. Census Bureau and atozdatabases.com

#map with longitude and latitutde

mapview(resultsgroc.proj)