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
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")
#view 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

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)