look at sites hierarchy and output as css, for further analysis in R

sitesForR.ps1

clear-host
#depict the site hierarchy, for further analysis in R or SPSS
#setup csv
Add-Content -Path C:\SiteStructure.csv  -Value '"Node","Parent","Template"'

function GetAllWebs($url)
{
    try
    {
        $w = Get-SPWeb -identity $url;
        Write-Host ([String]::Format("Procesing web {0}",$w.Url)) -foregroundcolor Blue
        if($w.Webs.Count -gt 0)
        {
            foreach($web in $w.Webs)
            {
                $row = "" + $web.Title+","+$web.ParentWeb+","+$web.WebTemplate
                Add-Content -Path C:\SiteStructure.csv -Value $row
                GetAllWebs $web.Url;
            }
        }
    }
    catch
    {
        Write-Host ([String]::Format("Error processing web at $url, with Exception: {0}", $_.Exception.Message)) -foregroundcolor Red
    }   
}


$sites = Get-SPSite -webapplication 'https://www.xxx.org' -limit ALL;
foreach($site in $sites){
    #write-host $site.url
    getAllWebs $site.url
}