Create a new function, `get_naics_codes()`, within `get_business_patterns.R`

[wcurrangroome]

Develop a utility function so that users can programmatically identify/select the NAICS codes they want to query via get_business_patterns().

• This should be a wrapper around censusapi::listCensusMetadata(name = "cbp")--refer to the object naics_code_metadatawithinget_business_patterns()`
• This should take a year and, optionally, the number of digits for desired NAICS codes (default to three)
• This should return the value code, the value label, and the vintage/year

[wcurrangroome]

(Add this work on a new branch)