Running examples in ‘censusapi-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: listCensusMetadata
> ### Title: Get variable or geography metadata for a given API as a data
> ###   frame
> ### Aliases: listCensusMetadata
> ### Keywords: metadata
> 
> ### ** Examples
> 
> bds_vars <- listCensusMetadata(name = "timeseries/bds/firms", type = "variables")
> head(bds_vars)
                     name                                          label
1       reallocation_rate                              Reallocation rate
2  job_destruction_deaths                         Job destruction deaths
3 job_creation_continuers                        Job creation continuers
4                    year                                 Year of survey
5             estabs_exit                          Establishments exited
6                  estabs Physical locations where business is conducted
              concept predicateType group limit required
1 Economic Statistics           int   N/A     0     <NA>
2 Economic Statistics           int   N/A     0     <NA>
3 Economic Statistics           int   N/A     0     <NA>
4 Economic Statistics           int   N/A     0     <NA>
5 Economic Statistics           int   N/A     0     <NA>
6 Economic Statistics           int   N/A     0     <NA>
> 
> bds_geos <- listCensusMetadata(name = "timeseries/bds/firms", type = "geographies")
> head(bds_geos)
                           name geoLevelId referenceDate
1                            us        010    2012-01-01
2 metropolitan statistical area        310          <NA>
3                         state        040    2012-01-01
> 
> acs_geos <- listCensusMetadata(name = "acs/acs5", vintage = 2017, type = "geographies")
> head(acs_geos)
                name geoLevelDisplay referenceDate      requires wildcard
1                 us             010    2017-01-01          NULL     NULL
2             region             020    2017-01-01          NULL     NULL
3           division             030    2017-01-01          NULL     NULL
4              state             040    2017-01-01          NULL     NULL
5             county             050    2017-01-01         state    state
6 county subdivision             060    2017-01-01 state, county   county
  optionalWithWCFor
1              <NA>
2              <NA>
3              <NA>
4              <NA>
5             state
6            county
> 
> acs_groups <- listCensusMetadata(name = "acs/acs5", vintage = 2017, type = "groups")
[1] "https://api.census.gov/data/2017/acs/acs5/groups.json"
Error: Invalid metadata request, (404) not found. 
 Your API call was:  https://api.census.gov/data/2017/acs/acs5/groups.json
Execution halted