Regular (ER) Animalio Name outcomeTy outcomesu AnimalType Sexuponou Ageuponou Br
ID: 3183691 • Letter: R
Question
Regular (ER) Animalio Name outcomeTy outcomesu AnimalType Sexuponou Ageuponou Breed 1 A671945 Hambone Return to o NA Dog Neutered M 365 mix B 182200 3 A686464 Pearce Adoption Foster Blue/White 12 2800 2015 Blue Cream 1909:00 Intact Male 12 5200 M 730 Lhasa Apso Tan 5 A667013 Transfer Partner 31 Cairn Terrier Black/Tan 130400 act Femal 6 A677334 Blue Tabby 131100 2015 21 mix 7 A699218 Jimmy Transfer Partner Cat Intact Male 21 mix Brown Tabb 170200 White 71700 14800 B A701489 NA. Transfer 9 A671784 Lucy Adoption NA 10 A677747 NA Adoption Offsite Dog Spayed Fem 365 Cairn Terrier White 730 mix Transfer SCRP 11 A668402 NA 2016 112700 1460 mod 13 A684601 Rocket Adoption Foster 730 mix Neutered M 14 A704702 Scooter Return to o NA White/Crear 150000 2015 15 A688584 Orange Tab 12 1000 2014 16 A678825 Oliver Adoption Foster Cat Brown Tabb 161500 21 mix ntact Male Transfer Partner 17 A678050 NA 2014 12 54 00 14 mix Intact Femal Transfer Partner Dog 18 A680028 NA. 113200 Partner 9 A679010 17 3000 Return to o NA 20 A584787 Kuma BlackWhite 15.0300 ntact Male 21 A67065B Anders Transfer Partner Spayed Fem 22 A708812 Munchkin Transfer Partner Cat 730 Plott Hound Brown Brind .14 22 00 23 A705262 Jamaica Adoption NA 2013 163200 310 mok 17 4400 24 A665781 Quattro 25 A676333 Trigger Return to o NA 2015 Orange Tab 1544.00 Intact Femal Transfer Partner Cat 173100 26 A712750 2015 3 White/Tan 18 5000 Adoption Spayed Fem 1825 mix A718832 Adoption A698777Explanation / Answer
consider a new column consisting of time periods and name it say time
but the given format is not nmeric
so the code is
time=as.POSIXct(paste(TimePeriod),format="%H%M%S")
then the column time will contain the times in the given format
now use the code
time[which(as.POSIXct(paste(180000),format="%H%M%S")<time & time<as.POSIXct(paste(000000),format="%H%M%S"))]="evening"