ProjectName.Rd
This function returns the Project Name or blank if none exists.
ProjectName()
A character string with the project name