spData (version 2.3.3)

nc.sids: North Carolina SIDS data

Description

(Use example(nc.sids) to read the data set from shapefile, together with import of two different list of neighbours). The nc.sids data frame has 100 rows and 21 columns. It contains data given in Cressie (1991, pp. 386-9), Cressie and Read (1985) and Cressie and Chan (1989) on sudden infant deaths in North Carolina for 1974-78 and 1979-84. The data set also contains the neighbour list given by Cressie and Chan (1989) omitting self-neighbours (ncCC89.nb), and the neighbour list given by Cressie and Read (1985) for contiguities (ncCR85.nb). The data are ordered by county ID number, not alphabetically as in the source tables sidspolys is a "polylist" object of polygon boundaries, and sidscents is a matrix of their centroids.

Usage

nc.sids

Format

This data frame contains the following columns:

• SP_ID: SpatialPolygons ID

• CNTY_ID: county ID

• east: eastings, county seat, miles, local projection

• north: northings, county seat, miles, local projection

• L_id: Cressie and Read (1985) L index

• M_id: Cressie and Read (1985) M index

• names: County names

• AREA: County polygon areas in degree units

• PERIMETER: County polygon perimeters in degree units

• CNTY_: Internal county ID

• NAME: County names

• FIPS: County ID

• FIPSNO: County ID

• CRESS_ID: Cressie papers ID

• BIR74: births, 1974-78

• SID74: SID deaths, 1974-78

• NWBIR74: non-white births, 1974-78

• BIR79: births, 1979-84

• SID79: SID deaths, 1979-84

• NWBIR79: non-white births, 1979-84

Examples

if (requireNamespace("sf", quietly = TRUE)) {
  if (requireNamespace("spdep", quietly = TRUE)) {
    library(spdep)
    nc.sids <- sf::st_read(system.file("shapes/sids.gpkg", package="spData")[1])
    row.names(nc.sids) <- as.character(nc.sids$FIPS)
    rn <- row.names(nc.sids)
    ncCC89_nb <- read.gal(system.file("weights/ncCC89.gal", package="spData")[1],
                          region.id=rn)
    ncCR85_nb <- read.gal(system.file("weights/ncCR85.gal", package="spData")[1],
                          region.id=rn)
                          
    plot(sf::st_geometry(nc.sids), border="grey")
    plot(ncCR85_nb, sf::st_geometry(nc.sids), add=TRUE, col="blue")
    plot(sf::st_geometry(nc.sids), border="grey")
    plot(ncCC89_nb, sf::st_geometry(nc.sids), add=TRUE, col="blue")
  }
}