Interactively selecting indicators"

This short example introduces two new features included in the 0.1.1 version of the package:

The following libraries are needed for this vignette:


To begin with, we want to select the indicators that we want to analyse in this example. The select_indicators() function helps us do this:

inds <- select_indicators()

After running the above code a browser window opens and will spend some time loading while it accesses the available indicators. Once loaded, the search bar in the top right corner allows the user to type in any searches to help locate the indicators of interest. This example will use the following indicators, selected at random, which belong to the Public Health Outcomes Framework profile. Note, the indicator IDs of the selected indicators are displayed on the left-hand side. The user can click an indicator for a second time to deselect the indicator if it has been selected unnecessarily.

inds <- c(90630, 10101, 10301, 
          92313, 10401, 11401, 
          10501, 92314, 11502, 
          10601, 20101, 20201, 
          20601, 20301, 20602, 
          90284, 90832, 90285, 
          22001, 22002, 90244)

The second function to be highlighted in this vignette is fingertips_redred(). This will return a data frame of the data for all of the areas that are performing significantly worse than the chosen benchmark and are deteriorating.

df <- fingertips_redred(inds, AreaTypeID = 202, Comparator = "England")

The geom_tile() function from ggplot2 can be used to visualise the poorly performing areas:

df$IndicatorName <- sapply(strwrap(df$IndicatorName, 60, 
                                   simplify = FALSE), 
                           paste, collapse= "\n")
p <- ggplot(df, aes(IndicatorName, AreaName)) + 
        geom_point(colour = "darkred") + 
        theme_minimal() +
        theme(axis.text.x = element_text(angle = 45,
                                         hjust = 1,
                                         size = rel(0.85)),
              axis.text.y = element_text(size = rel(0.9))) +
        labs(y = "Upper Tier Local Authority",
             x = "Indicator")

Try the fingertipsR package in your browser

Any scripts or data that you put into this service are public.

fingertipsR documentation built on Sept. 16, 2020, 5:07 p.m.