Windows Powershell Select String Recursive Function In R