(Using R) Write a function which reads in the file from txt with content 1 Math Tower 11794 631-631-1234 food 773 687 3241 888.888.9900 and output rows containing valid phone nu