My code I guess isn't the best but it does what I want it so far Full code: data work.Meteorite_Landings; infile 'H:\SAS\Final Project\Meteorite_Landings.csv' dlm = ',' missover dsd; length Name $ 25 Nametype $ 6 Recclass $ 15 Fall $ 6 Date $ 20 GeoLocation $ 30; input Name $ ID Nametype $ Recclass $ MassGrams Fall $ Date $ Reclat Reclong GeoLocation $; /* Drop latitude and longitude drop Reclat Reclong; */ if Name ne 'name'; if (Name = ' ') or (ID = '.') or (Nametype = ' ') or (Recclass = ' ') or (MassGrams = '.') or (Fall = ' ') or (Date = ' ') or (Reclat = '.') or (Reclong = '.') or (GeoLocation = ' ') then delete; if (length(GeoLocation) > 30) or (length(GeoLocation) < 6) or (index(GeoLocation,'"')) or (length(Date) < 6) or (length(Fall) > 😎 or (length(Fall) > 10) then delete; Year = substr(scan(Date,1,' '),7,4); Fall = tranwrd(Fall,'ound','Found'); Fall = tranwrd(Fall,'FFound','Found'); label Name = 'Meteorite*Name' ID = 'ID #' Nametype ='Name Type' Recclass = 'Classification' MassGrams = 'Mass in*Grams' Fall = 'Fall' GeoLocation = 'Geographic*Location' Year = 'Year Fell'; format MassGrams comma14.2; run; proc gproject data = work.Meteorite_Landings norangecheck degree out = work.gproject; id Reclat Reclong; run; proc gmap map = maps.world data = work.gproject; id Reclat Reclong; run; quit;
... View more