Shorten my code, combine the two filter statements from number $1$ to create a list of states in the same region as $"$TX$"$ without having the region number explicitly used in the statement.

HINT: Get the first statement to return just the region $($use $region$).>$ tx$\_$data $<-$ states$\_1\_\%>\%$ filter$($abbreviation $=="$TX$")$

$>$ tx$\_$region $<-$ tx$\_$data$region

$>$ same$\_$region$\_$as$\_$TX $<-$ states$\_1\_\%>\%$ filter$($region $\%$in$\%$ tx$\_$region$)$

$>$ print$($same$\_$region$\_$as$\_$TX$)$

# A tibble: $5\backslash$times $6$

name abbreviation region area$\_$sq$\_$miles water$\_$area$\_$sq$\_$miles population$\_2015$

$1$ Arkansas AR $65317911432978204$

$2$ Louisiana LA $65237891744670724$

$3$ New Mexico NM $61215902922085109$

$4$ Oklahoma OK $66989913043911338$

$5$ Texas TX $6268596736527469114$